MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mdetdiag Structured version   Visualization version   GIF version

Theorem mdetdiag 21819
Description: The determinant of a diagonal matrix is the product of the entries in the diagonal. (Contributed by AV, 17-Aug-2019.)
Hypotheses
Ref Expression
mdetdiag.d 𝐷 = (𝑁 maDet 𝑅)
mdetdiag.a 𝐴 = (𝑁 Mat 𝑅)
mdetdiag.b 𝐵 = (Base‘𝐴)
mdetdiag.g 𝐺 = (mulGrp‘𝑅)
mdetdiag.0 0 = (0g𝑅)
Assertion
Ref Expression
mdetdiag ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → (∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 ) → (𝐷𝑀) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘)))))
Distinct variable groups:   𝐵,𝑘   𝑘,𝐺   𝑖,𝑀,𝑗,𝑘   𝑖,𝑁,𝑗,𝑘   𝑅,𝑘   0 ,𝑖,𝑗,𝑘
Allowed substitution hints:   𝐴(𝑖,𝑗,𝑘)   𝐵(𝑖,𝑗)   𝐷(𝑖,𝑗,𝑘)   𝑅(𝑖,𝑗)   𝐺(𝑖,𝑗)

Proof of Theorem mdetdiag
Dummy variable 𝑝 is distinct from all other variables.
StepHypRef Expression
1 simpl3 1192 . . . 4 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → 𝑀𝐵)
2 mdetdiag.d . . . . 5 𝐷 = (𝑁 maDet 𝑅)
3 mdetdiag.a . . . . 5 𝐴 = (𝑁 Mat 𝑅)
4 mdetdiag.b . . . . 5 𝐵 = (Base‘𝐴)
5 eqid 2737 . . . . 5 (Base‘(SymGrp‘𝑁)) = (Base‘(SymGrp‘𝑁))
6 eqid 2737 . . . . 5 (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
7 eqid 2737 . . . . 5 (pmSgn‘𝑁) = (pmSgn‘𝑁)
8 eqid 2737 . . . . 5 (.r𝑅) = (.r𝑅)
9 mdetdiag.g . . . . 5 𝐺 = (mulGrp‘𝑅)
102, 3, 4, 5, 6, 7, 8, 9mdetleib 21807 . . . 4 (𝑀𝐵 → (𝐷𝑀) = (𝑅 Σg (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))))))
111, 10syl 17 . . 3 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (𝐷𝑀) = (𝑅 Σg (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))))))
12 simpl1 1190 . . . . . . . . 9 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → 𝑅 ∈ CRing)
1312ad2antrr 723 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ 𝑝 = ( I ↾ 𝑁)) → 𝑅 ∈ CRing)
141ad2antrr 723 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ 𝑝 = ( I ↾ 𝑁)) → 𝑀𝐵)
15 simpr 485 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ 𝑝 = ( I ↾ 𝑁)) → 𝑝 = ( I ↾ 𝑁))
163, 4, 9, 6, 7, 8madetsumid 21681 . . . . . . . 8 ((𝑅 ∈ CRing ∧ 𝑀𝐵𝑝 = ( I ↾ 𝑁)) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))))
1713, 14, 15, 16syl3anc 1370 . . . . . . 7 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ 𝑝 = ( I ↾ 𝑁)) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))))
18 iftrue 4475 . . . . . . . . 9 (𝑝 = ( I ↾ 𝑁) → if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))))
1918eqcomd 2743 . . . . . . . 8 (𝑝 = ( I ↾ 𝑁) → (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))) = if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
2019adantl 482 . . . . . . 7 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ 𝑝 = ( I ↾ 𝑁)) → (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))) = if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
2117, 20eqtrd 2777 . . . . . 6 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ 𝑝 = ( I ↾ 𝑁)) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
22 simplll 772 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → (𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵))
23 simpr 485 . . . . . . . . 9 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 ))
2423ad2antrr 723 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 ))
25 simpr 485 . . . . . . . . 9 ((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) → 𝑝 ∈ (Base‘(SymGrp‘𝑁)))
26 neqne 2949 . . . . . . . . 9 𝑝 = ( I ↾ 𝑁) → 𝑝 ≠ ( I ↾ 𝑁))
2725, 26anim12i 613 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ∧ 𝑝 ≠ ( I ↾ 𝑁)))
28 mdetdiag.0 . . . . . . . . 9 0 = (0g𝑅)
292, 3, 4, 9, 28, 5, 6, 7, 8mdetdiaglem 21818 . . . . . . . 8 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 ) ∧ (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ∧ 𝑝 ≠ ( I ↾ 𝑁))) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = 0 )
3022, 24, 27, 29syl3anc 1370 . . . . . . 7 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = 0 )
31 iffalse 4478 . . . . . . . . 9 𝑝 = ( I ↾ 𝑁) → if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ) = 0 )
3231adantl 482 . . . . . . . 8 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ) = 0 )
3332eqcomd 2743 . . . . . . 7 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → 0 = if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
3430, 33eqtrd 2777 . . . . . 6 (((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) ∧ ¬ 𝑝 = ( I ↾ 𝑁)) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
3521, 34pm2.61dan 810 . . . . 5 ((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑝 ∈ (Base‘(SymGrp‘𝑁))) → ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))) = if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
3635mpteq2dva 5185 . . . 4 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘))))) = (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 )))
3736oveq2d 7329 . . 3 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (𝑅 Σg (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ ((((ℤRHom‘𝑅) ∘ (pmSgn‘𝑁))‘𝑝)(.r𝑅)(𝐺 Σg (𝑘𝑁 ↦ ((𝑝𝑘)𝑀𝑘)))))) = (𝑅 Σg (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))))
38 crngring 19862 . . . . . . 7 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
39 ringmnd 19860 . . . . . . 7 (𝑅 ∈ Ring → 𝑅 ∈ Mnd)
4038, 39syl 17 . . . . . 6 (𝑅 ∈ CRing → 𝑅 ∈ Mnd)
41403ad2ant1 1132 . . . . 5 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → 𝑅 ∈ Mnd)
4241adantr 481 . . . 4 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → 𝑅 ∈ Mnd)
43 fvexd 6824 . . . 4 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (Base‘(SymGrp‘𝑁)) ∈ V)
44 eqid 2737 . . . . . . . 8 (SymGrp‘𝑁) = (SymGrp‘𝑁)
4544symgid 19076 . . . . . . 7 (𝑁 ∈ Fin → ( I ↾ 𝑁) = (0g‘(SymGrp‘𝑁)))
46453ad2ant2 1133 . . . . . 6 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → ( I ↾ 𝑁) = (0g‘(SymGrp‘𝑁)))
4744symggrp 19075 . . . . . . . 8 (𝑁 ∈ Fin → (SymGrp‘𝑁) ∈ Grp)
48473ad2ant2 1133 . . . . . . 7 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → (SymGrp‘𝑁) ∈ Grp)
49 eqid 2737 . . . . . . . 8 (0g‘(SymGrp‘𝑁)) = (0g‘(SymGrp‘𝑁))
505, 49grpidcl 18674 . . . . . . 7 ((SymGrp‘𝑁) ∈ Grp → (0g‘(SymGrp‘𝑁)) ∈ (Base‘(SymGrp‘𝑁)))
5148, 50syl 17 . . . . . 6 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → (0g‘(SymGrp‘𝑁)) ∈ (Base‘(SymGrp‘𝑁)))
5246, 51eqeltrd 2838 . . . . 5 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → ( I ↾ 𝑁) ∈ (Base‘(SymGrp‘𝑁)))
5352adantr 481 . . . 4 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → ( I ↾ 𝑁) ∈ (Base‘(SymGrp‘𝑁)))
54 eqid 2737 . . . 4 (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 )) = (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))
55 eqid 2737 . . . . . 6 (Base‘𝑅) = (Base‘𝑅)
569, 55mgpbas 19793 . . . . 5 (Base‘𝑅) = (Base‘𝐺)
579crngmgp 19858 . . . . . . 7 (𝑅 ∈ CRing → 𝐺 ∈ CMnd)
58573ad2ant1 1132 . . . . . 6 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → 𝐺 ∈ CMnd)
5958adantr 481 . . . . 5 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → 𝐺 ∈ CMnd)
60 simpl2 1191 . . . . 5 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → 𝑁 ∈ Fin)
61 simpr 485 . . . . . . 7 ((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑘𝑁) → 𝑘𝑁)
624eleq2i 2829 . . . . . . . . . 10 (𝑀𝐵𝑀 ∈ (Base‘𝐴))
6362biimpi 215 . . . . . . . . 9 (𝑀𝐵𝑀 ∈ (Base‘𝐴))
64633ad2ant3 1134 . . . . . . . 8 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → 𝑀 ∈ (Base‘𝐴))
6564ad2antrr 723 . . . . . . 7 ((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑘𝑁) → 𝑀 ∈ (Base‘𝐴))
663, 55matecl 21645 . . . . . . 7 ((𝑘𝑁𝑘𝑁𝑀 ∈ (Base‘𝐴)) → (𝑘𝑀𝑘) ∈ (Base‘𝑅))
6761, 61, 65, 66syl3anc 1370 . . . . . 6 ((((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) ∧ 𝑘𝑁) → (𝑘𝑀𝑘) ∈ (Base‘𝑅))
6867ralrimiva 3140 . . . . 5 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → ∀𝑘𝑁 (𝑘𝑀𝑘) ∈ (Base‘𝑅))
6956, 59, 60, 68gsummptcl 19635 . . . 4 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))) ∈ (Base‘𝑅))
7028, 42, 43, 53, 54, 69gsummptif1n0 19634 . . 3 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (𝑅 Σg (𝑝 ∈ (Base‘(SymGrp‘𝑁)) ↦ if(𝑝 = ( I ↾ 𝑁), (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))), 0 ))) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))))
7111, 37, 703eqtrd 2781 . 2 (((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) ∧ ∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 )) → (𝐷𝑀) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘))))
7271ex 413 1 ((𝑅 ∈ CRing ∧ 𝑁 ∈ Fin ∧ 𝑀𝐵) → (∀𝑖𝑁𝑗𝑁 (𝑖𝑗 → (𝑖𝑀𝑗) = 0 ) → (𝐷𝑀) = (𝐺 Σg (𝑘𝑁 ↦ (𝑘𝑀𝑘)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  w3a 1086   = wceq 1540  wcel 2105  wne 2941  wral 3062  Vcvv 3441  ifcif 4469  cmpt 5168   I cid 5504  cres 5607  ccom 5609  cfv 6463  (class class class)co 7313  Fincfn 8779  Basecbs 16979  .rcmulr 17030  0gc0g 17217   Σg cgsu 17218  Mndcmnd 18452  Grpcgrp 18644  SymGrpcsymg 19041  pmSgncpsgn 19164  CMndccmn 19453  mulGrpcmgp 19787  Ringcrg 19850  CRingccrg 19851  ℤRHomczrh 20772   Mat cmat 21625   maDet cmdat 21804
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2708  ax-rep 5222  ax-sep 5236  ax-nul 5243  ax-pow 5301  ax-pr 5365  ax-un 7626  ax-cnex 10997  ax-resscn 10998  ax-1cn 10999  ax-icn 11000  ax-addcl 11001  ax-addrcl 11002  ax-mulcl 11003  ax-mulrcl 11004  ax-mulcom 11005  ax-addass 11006  ax-mulass 11007  ax-distr 11008  ax-i2m1 11009  ax-1ne0 11010  ax-1rid 11011  ax-rnegex 11012  ax-rrecex 11013  ax-cnre 11014  ax-pre-lttri 11015  ax-pre-lttrn 11016  ax-pre-ltadd 11017  ax-pre-mulgt0 11018  ax-addf 11020  ax-mulf 11021
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-xor 1509  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3350  df-reu 3351  df-rab 3405  df-v 3443  df-sbc 3726  df-csb 3842  df-dif 3899  df-un 3901  df-in 3903  df-ss 3913  df-pss 3915  df-nul 4267  df-if 4470  df-pw 4545  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-ot 4578  df-uni 4849  df-int 4891  df-iun 4937  df-iin 4938  df-br 5086  df-opab 5148  df-mpt 5169  df-tr 5203  df-id 5505  df-eprel 5511  df-po 5519  df-so 5520  df-fr 5560  df-se 5561  df-we 5562  df-xp 5611  df-rel 5612  df-cnv 5613  df-co 5614  df-dm 5615  df-rn 5616  df-res 5617  df-ima 5618  df-pred 6222  df-ord 6289  df-on 6290  df-lim 6291  df-suc 6292  df-iota 6415  df-fun 6465  df-fn 6466  df-f 6467  df-f1 6468  df-fo 6469  df-f1o 6470  df-fv 6471  df-isom 6472  df-riota 7270  df-ov 7316  df-oprab 7317  df-mpo 7318  df-of 7571  df-om 7756  df-1st 7874  df-2nd 7875  df-supp 8023  df-tpos 8087  df-frecs 8142  df-wrecs 8173  df-recs 8247  df-rdg 8286  df-1o 8342  df-2o 8343  df-er 8544  df-map 8663  df-ixp 8732  df-en 8780  df-dom 8781  df-sdom 8782  df-fin 8783  df-fsupp 9197  df-sup 9269  df-oi 9337  df-card 9765  df-pnf 11081  df-mnf 11082  df-xr 11083  df-ltxr 11084  df-le 11085  df-sub 11277  df-neg 11278  df-div 11703  df-nn 12044  df-2 12106  df-3 12107  df-4 12108  df-5 12109  df-6 12110  df-7 12111  df-8 12112  df-9 12113  df-n0 12304  df-xnn0 12376  df-z 12390  df-dec 12508  df-uz 12653  df-rp 12801  df-fz 13310  df-fzo 13453  df-seq 13792  df-exp 13853  df-hash 14115  df-word 14287  df-lsw 14335  df-concat 14343  df-s1 14370  df-substr 14423  df-pfx 14453  df-splice 14532  df-reverse 14541  df-s2 14630  df-struct 16915  df-sets 16932  df-slot 16950  df-ndx 16962  df-base 16980  df-ress 17009  df-plusg 17042  df-mulr 17043  df-starv 17044  df-sca 17045  df-vsca 17046  df-ip 17047  df-tset 17048  df-ple 17049  df-ds 17051  df-unif 17052  df-hom 17053  df-cco 17054  df-0g 17219  df-gsum 17220  df-prds 17225  df-pws 17227  df-mre 17362  df-mrc 17363  df-acs 17365  df-mgm 18393  df-sgrp 18442  df-mnd 18453  df-mhm 18497  df-submnd 18498  df-efmnd 18575  df-grp 18647  df-minusg 18648  df-mulg 18768  df-subg 18819  df-ghm 18899  df-gim 18942  df-cntz 18990  df-oppg 19017  df-symg 19042  df-pmtr 19117  df-psgn 19166  df-cmn 19455  df-abl 19456  df-mgp 19788  df-ur 19805  df-ring 19852  df-cring 19853  df-oppr 19929  df-dvdsr 19950  df-unit 19951  df-invr 19981  df-dvr 19992  df-rnghom 20026  df-drng 20064  df-subrg 20093  df-sra 20505  df-rgmod 20506  df-cnfld 20669  df-zring 20742  df-zrh 20776  df-dsmm 21010  df-frlm 21025  df-mat 21626  df-mdet 21805
This theorem is referenced by:  mdetdiagid  21820  chpdmat  22061
  Copyright terms: Public domain W3C validator