Metamath Proof Explorer


Theorem mdetlap

Description: Laplace expansion of the determinant of a square matrix. (Contributed by Thierry Arnoux, 19-Aug-2020)

Ref Expression
Hypotheses madjusmdet.b B = Base A
madjusmdet.a A = 1 N Mat R
madjusmdet.d D = 1 N maDet R
madjusmdet.k K = 1 N maAdju R
madjusmdet.t · ˙ = R
madjusmdet.z Z = ℤRHom R
madjusmdet.e E = 1 N 1 maDet R
madjusmdet.n φ N
madjusmdet.r φ R CRing
madjusmdet.i φ I 1 N
madjusmdet.j φ J 1 N
madjusmdet.m φ M B
Assertion mdetlap φ D M = R j = 1 N Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j

Proof

Step Hyp Ref Expression
1 madjusmdet.b B = Base A
2 madjusmdet.a A = 1 N Mat R
3 madjusmdet.d D = 1 N maDet R
4 madjusmdet.k K = 1 N maAdju R
5 madjusmdet.t · ˙ = R
6 madjusmdet.z Z = ℤRHom R
7 madjusmdet.e E = 1 N 1 maDet R
8 madjusmdet.n φ N
9 madjusmdet.r φ R CRing
10 madjusmdet.i φ I 1 N
11 madjusmdet.j φ J 1 N
12 madjusmdet.m φ M B
13 2 1 3 4 5 mdetlap1 R CRing M B I 1 N D M = R j = 1 N I M j · ˙ j K M I
14 9 12 10 13 syl3anc φ D M = R j = 1 N I M j · ˙ j K M I
15 8 adantr φ j 1 N N
16 9 adantr φ j 1 N R CRing
17 10 adantr φ j 1 N I 1 N
18 simpr φ j 1 N j 1 N
19 12 adantr φ j 1 N M B
20 1 2 3 4 5 6 7 15 16 17 18 19 madjusmdet φ j 1 N j K M I = Z 1 I + j · ˙ E I subMat 1 M j
21 20 oveq2d φ j 1 N I M j · ˙ j K M I = I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j
22 eqid Base R = Base R
23 2 22 1 17 18 19 matecld φ j 1 N I M j Base R
24 crngring R CRing R Ring
25 9 24 syl φ R Ring
26 6 zrhrhm R Ring Z ring RingHom R
27 zringbas = Base ring
28 27 22 rhmf Z ring RingHom R Z : Base R
29 25 26 28 3syl φ Z : Base R
30 29 adantr φ j 1 N Z : Base R
31 1zzd φ j 1 N 1
32 31 znegcld φ j 1 N 1
33 fz1ssnn 1 N
34 33 17 sseldi φ j 1 N I
35 33 18 sseldi φ j 1 N j
36 34 35 nnaddcld φ j 1 N I + j
37 36 nnnn0d φ j 1 N I + j 0
38 zexpcl 1 I + j 0 1 I + j
39 32 37 38 syl2anc φ j 1 N 1 I + j
40 30 39 ffvelrnd φ j 1 N Z 1 I + j Base R
41 22 5 crngcom R CRing I M j Base R Z 1 I + j Base R I M j · ˙ Z 1 I + j = Z 1 I + j · ˙ I M j
42 16 23 40 41 syl3anc φ j 1 N I M j · ˙ Z 1 I + j = Z 1 I + j · ˙ I M j
43 42 oveq1d φ j 1 N I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j = Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
44 16 24 syl φ j 1 N R Ring
45 eqid Base 1 N 1 Mat R = Base 1 N 1 Mat R
46 eqid I subMat 1 M j = I subMat 1 M j
47 2 1 45 46 15 17 18 19 smatcl φ j 1 N I subMat 1 M j Base 1 N 1 Mat R
48 eqid 1 N 1 Mat R = 1 N 1 Mat R
49 7 48 45 22 mdetcl R CRing I subMat 1 M j Base 1 N 1 Mat R E I subMat 1 M j Base R
50 16 47 49 syl2anc φ j 1 N E I subMat 1 M j Base R
51 22 5 ringass R Ring I M j Base R Z 1 I + j Base R E I subMat 1 M j Base R I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j = I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j
52 44 23 40 50 51 syl13anc φ j 1 N I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j = I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j
53 22 5 ringass R Ring Z 1 I + j Base R I M j Base R E I subMat 1 M j Base R Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j = Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
54 44 40 23 50 53 syl13anc φ j 1 N Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j = Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
55 43 52 54 3eqtr3d φ j 1 N I M j · ˙ Z 1 I + j · ˙ E I subMat 1 M j = Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
56 21 55 eqtrd φ j 1 N I M j · ˙ j K M I = Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
57 56 mpteq2dva φ j 1 N I M j · ˙ j K M I = j 1 N Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
58 57 oveq2d φ R j = 1 N I M j · ˙ j K M I = R j = 1 N Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j
59 14 58 eqtrd φ D M = R j = 1 N Z 1 I + j · ˙ I M j · ˙ E I subMat 1 M j