Metamath Proof Explorer


Theorem smadiadetg

Description: The determinant of a square matrix with one row replaced with 0's and an arbitrary element of the underlying ring at the diagonal position equals the ring element multiplied with the determinant of a submatrix of the square matrix obtained by removing the row and the column at the same index. (Contributed by AV, 14-Feb-2019)

Ref Expression
Hypotheses smadiadet.a โŠข ๐ด = ( ๐‘ Mat ๐‘… )
smadiadet.b โŠข ๐ต = ( Base โ€˜ ๐ด )
smadiadet.r โŠข ๐‘… โˆˆ CRing
smadiadet.d โŠข ๐ท = ( ๐‘ maDet ๐‘… )
smadiadet.h โŠข ๐ธ = ( ( ๐‘ โˆ– { ๐พ } ) maDet ๐‘… )
smadiadetg.x โŠข ยท = ( .r โ€˜ ๐‘… )
Assertion smadiadetg ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐ท โ€˜ ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) ) = ( ๐‘† ยท ( ๐ธ โ€˜ ( ๐พ ( ( ๐‘ subMat ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) ) )

Proof

Step Hyp Ref Expression
1 smadiadet.a โŠข ๐ด = ( ๐‘ Mat ๐‘… )
2 smadiadet.b โŠข ๐ต = ( Base โ€˜ ๐ด )
3 smadiadet.r โŠข ๐‘… โˆˆ CRing
4 smadiadet.d โŠข ๐ท = ( ๐‘ maDet ๐‘… )
5 smadiadet.h โŠข ๐ธ = ( ( ๐‘ โˆ– { ๐พ } ) maDet ๐‘… )
6 smadiadetg.x โŠข ยท = ( .r โ€˜ ๐‘… )
7 eqid โŠข ( Base โ€˜ ๐‘… ) = ( Base โ€˜ ๐‘… )
8 3 a1i โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ๐‘… โˆˆ CRing )
9 crngring โŠข ( ๐‘… โˆˆ CRing โ†’ ๐‘… โˆˆ Ring )
10 3 9 mp1i โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ๐‘… โˆˆ Ring )
11 simp1 โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ๐‘€ โˆˆ ๐ต )
12 simp3 โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) )
13 simp2 โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ๐พ โˆˆ ๐‘ )
14 1 2 marrepcl โŠข ( ( ( ๐‘… โˆˆ Ring โˆง ๐‘€ โˆˆ ๐ต โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โˆง ( ๐พ โˆˆ ๐‘ โˆง ๐พ โˆˆ ๐‘ ) ) โ†’ ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) โˆˆ ๐ต )
15 10 11 12 13 13 14 syl32anc โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) โˆˆ ๐ต )
16 1 2 minmar1cl โŠข ( ( ( ๐‘… โˆˆ Ring โˆง ๐‘€ โˆˆ ๐ต ) โˆง ( ๐พ โˆˆ ๐‘ โˆง ๐พ โˆˆ ๐‘ ) ) โ†’ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) โˆˆ ๐ต )
17 10 11 13 13 16 syl22anc โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) โˆˆ ๐ต )
18 1 2 3 4 5 6 smadiadetglem2 โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) โ†พ ( { ๐พ } ร— ๐‘ ) ) = ( ( ( { ๐พ } ร— ๐‘ ) ร— { ๐‘† } ) โˆ˜f ยท ( ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) โ†พ ( { ๐พ } ร— ๐‘ ) ) ) )
19 1 2 3 4 5 smadiadetglem1 โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) โ†พ ( ( ๐‘ โˆ– { ๐พ } ) ร— ๐‘ ) ) = ( ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) โ†พ ( ( ๐‘ โˆ– { ๐พ } ) ร— ๐‘ ) ) )
20 4 1 2 7 6 8 15 12 17 13 18 19 mdetrsca โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐ท โ€˜ ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) ) = ( ๐‘† ยท ( ๐ท โ€˜ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) ) )
21 1 2 3 4 5 smadiadet โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ ) โ†’ ( ๐ธ โ€˜ ( ๐พ ( ( ๐‘ subMat ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) = ( ๐ท โ€˜ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) )
22 21 3adant3 โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐ธ โ€˜ ( ๐พ ( ( ๐‘ subMat ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) = ( ๐ท โ€˜ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) )
23 22 eqcomd โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐ท โ€˜ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) = ( ๐ธ โ€˜ ( ๐พ ( ( ๐‘ subMat ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) )
24 23 oveq2d โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐‘† ยท ( ๐ท โ€˜ ( ๐พ ( ( ๐‘ minMatR1 ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) ) = ( ๐‘† ยท ( ๐ธ โ€˜ ( ๐พ ( ( ๐‘ subMat ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) ) )
25 20 24 eqtrd โŠข ( ( ๐‘€ โˆˆ ๐ต โˆง ๐พ โˆˆ ๐‘ โˆง ๐‘† โˆˆ ( Base โ€˜ ๐‘… ) ) โ†’ ( ๐ท โ€˜ ( ๐พ ( ๐‘€ ( ๐‘ matRRep ๐‘… ) ๐‘† ) ๐พ ) ) = ( ๐‘† ยท ( ๐ธ โ€˜ ( ๐พ ( ( ๐‘ subMat ๐‘… ) โ€˜ ๐‘€ ) ๐พ ) ) ) )