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

Theorem madurid 20207
Description: Multiplying a matrix with its adjunct results in the identity matrix multiplied with the determinant of the matrix. See Proposition 4.16 in [Lang] p. 518. (Contributed by Stefan O'Rear, 16-Jul-2018.)
Hypotheses
Ref Expression
madurid.a 𝐴 = (𝑁 Mat 𝑅)
madurid.b 𝐵 = (Base‘𝐴)
madurid.j 𝐽 = (𝑁 maAdju 𝑅)
madurid.d 𝐷 = (𝑁 maDet 𝑅)
madurid.i 1 = (1r𝐴)
madurid.t · = (.r𝐴)
madurid.s = ( ·𝑠𝐴)
Assertion
Ref Expression
madurid ((𝑀𝐵𝑅 ∈ CRing) → (𝑀 · (𝐽𝑀)) = ((𝐷𝑀) 1 ))

Proof of Theorem madurid
Dummy variables 𝑎 𝑏 𝑐 𝑑 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2605 . . 3 (𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩) = (𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩)
2 eqid 2605 . . 3 (Base‘𝑅) = (Base‘𝑅)
3 eqid 2605 . . 3 (.r𝑅) = (.r𝑅)
4 simpr 475 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → 𝑅 ∈ CRing)
5 madurid.a . . . . . 6 𝐴 = (𝑁 Mat 𝑅)
6 madurid.b . . . . . 6 𝐵 = (Base‘𝐴)
75, 6matrcl 19975 . . . . 5 (𝑀𝐵 → (𝑁 ∈ Fin ∧ 𝑅 ∈ V))
87simpld 473 . . . 4 (𝑀𝐵𝑁 ∈ Fin)
98adantr 479 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → 𝑁 ∈ Fin)
105, 2, 6matbas2i 19985 . . . 4 (𝑀𝐵𝑀 ∈ ((Base‘𝑅) ↑𝑚 (𝑁 × 𝑁)))
1110adantr 479 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → 𝑀 ∈ ((Base‘𝑅) ↑𝑚 (𝑁 × 𝑁)))
12 madurid.j . . . . . . 7 𝐽 = (𝑁 maAdju 𝑅)
135, 12, 6maduf 20204 . . . . . 6 (𝑅 ∈ CRing → 𝐽:𝐵𝐵)
1413adantl 480 . . . . 5 ((𝑀𝐵𝑅 ∈ CRing) → 𝐽:𝐵𝐵)
15 simpl 471 . . . . 5 ((𝑀𝐵𝑅 ∈ CRing) → 𝑀𝐵)
1614, 15ffvelrnd 6249 . . . 4 ((𝑀𝐵𝑅 ∈ CRing) → (𝐽𝑀) ∈ 𝐵)
175, 2, 6matbas2i 19985 . . . 4 ((𝐽𝑀) ∈ 𝐵 → (𝐽𝑀) ∈ ((Base‘𝑅) ↑𝑚 (𝑁 × 𝑁)))
1816, 17syl 17 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → (𝐽𝑀) ∈ ((Base‘𝑅) ↑𝑚 (𝑁 × 𝑁)))
191, 2, 3, 4, 9, 9, 9, 11, 18mamuval 19949 . 2 ((𝑀𝐵𝑅 ∈ CRing) → (𝑀(𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩)(𝐽𝑀)) = (𝑎𝑁, 𝑏𝑁 ↦ (𝑅 Σg (𝑐𝑁 ↦ ((𝑎𝑀𝑐)(.r𝑅)(𝑐(𝐽𝑀)𝑏))))))
205, 1matmulr 20001 . . . . 5 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩) = (.r𝐴))
218, 20sylan 486 . . . 4 ((𝑀𝐵𝑅 ∈ CRing) → (𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩) = (.r𝐴))
22 madurid.t . . . 4 · = (.r𝐴)
2321, 22syl6eqr 2657 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → (𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩) = · )
2423oveqd 6540 . 2 ((𝑀𝐵𝑅 ∈ CRing) → (𝑀(𝑅 maMul ⟨𝑁, 𝑁, 𝑁⟩)(𝐽𝑀)) = (𝑀 · (𝐽𝑀)))
25 madurid.d . . . . . 6 𝐷 = (𝑁 maDet 𝑅)
26 simp1l 1077 . . . . . 6 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → 𝑀𝐵)
27 simp1r 1078 . . . . . 6 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → 𝑅 ∈ CRing)
28 elmapi 7738 . . . . . . . . . 10 (𝑀 ∈ ((Base‘𝑅) ↑𝑚 (𝑁 × 𝑁)) → 𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅))
2911, 28syl 17 . . . . . . . . 9 ((𝑀𝐵𝑅 ∈ CRing) → 𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅))
30293ad2ant1 1074 . . . . . . . 8 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → 𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅))
3130adantr 479 . . . . . . 7 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ 𝑐𝑁) → 𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅))
32 simpl2 1057 . . . . . . 7 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ 𝑐𝑁) → 𝑎𝑁)
33 simpr 475 . . . . . . 7 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ 𝑐𝑁) → 𝑐𝑁)
3431, 32, 33fovrnd 6677 . . . . . 6 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ 𝑐𝑁) → (𝑎𝑀𝑐) ∈ (Base‘𝑅))
35 simp3 1055 . . . . . 6 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → 𝑏𝑁)
365, 12, 6, 25, 3, 2, 26, 27, 34, 35madugsum 20206 . . . . 5 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → (𝑅 Σg (𝑐𝑁 ↦ ((𝑎𝑀𝑐)(.r𝑅)(𝑐(𝐽𝑀)𝑏)))) = (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))))
37 iftrue 4037 . . . . . . . . 9 (𝑎 = 𝑏 → if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)) = (𝐷𝑀))
3837adantl 480 . . . . . . . 8 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)) = (𝐷𝑀))
39 ffn 5940 . . . . . . . . . . . . 13 (𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅) → 𝑀 Fn (𝑁 × 𝑁))
4029, 39syl 17 . . . . . . . . . . . 12 ((𝑀𝐵𝑅 ∈ CRing) → 𝑀 Fn (𝑁 × 𝑁))
41 fnov 6640 . . . . . . . . . . . 12 (𝑀 Fn (𝑁 × 𝑁) ↔ 𝑀 = (𝑑𝑁, 𝑐𝑁 ↦ (𝑑𝑀𝑐)))
4240, 41sylib 206 . . . . . . . . . . 11 ((𝑀𝐵𝑅 ∈ CRing) → 𝑀 = (𝑑𝑁, 𝑐𝑁 ↦ (𝑑𝑀𝑐)))
4342adantr 479 . . . . . . . . . 10 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → 𝑀 = (𝑑𝑁, 𝑐𝑁 ↦ (𝑑𝑀𝑐)))
44 equtr2 1939 . . . . . . . . . . . . . . 15 ((𝑎 = 𝑏𝑑 = 𝑏) → 𝑎 = 𝑑)
4544oveq1d 6538 . . . . . . . . . . . . . 14 ((𝑎 = 𝑏𝑑 = 𝑏) → (𝑎𝑀𝑐) = (𝑑𝑀𝑐))
4645ifeq1da 4061 . . . . . . . . . . . . 13 (𝑎 = 𝑏 → if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)) = if(𝑑 = 𝑏, (𝑑𝑀𝑐), (𝑑𝑀𝑐)))
47 ifid 4070 . . . . . . . . . . . . 13 if(𝑑 = 𝑏, (𝑑𝑀𝑐), (𝑑𝑀𝑐)) = (𝑑𝑀𝑐)
4846, 47syl6eq 2655 . . . . . . . . . . . 12 (𝑎 = 𝑏 → if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)) = (𝑑𝑀𝑐))
4948adantl 480 . . . . . . . . . . 11 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)) = (𝑑𝑀𝑐))
5049mpt2eq3dv 6593 . . . . . . . . . 10 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → (𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐))) = (𝑑𝑁, 𝑐𝑁 ↦ (𝑑𝑀𝑐)))
5143, 50eqtr4d 2642 . . . . . . . . 9 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → 𝑀 = (𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐))))
5251fveq2d 6088 . . . . . . . 8 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → (𝐷𝑀) = (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))))
5338, 52eqtr2d 2640 . . . . . . 7 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎 = 𝑏) → (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))) = if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)))
54533ad2antl1 1215 . . . . . 6 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ 𝑎 = 𝑏) → (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))) = if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)))
55 eqid 2605 . . . . . . . 8 (0g𝑅) = (0g𝑅)
56 simpl1r 1105 . . . . . . . 8 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → 𝑅 ∈ CRing)
5793ad2ant1 1074 . . . . . . . . 9 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → 𝑁 ∈ Fin)
5857adantr 479 . . . . . . . 8 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → 𝑁 ∈ Fin)
5930ad2antrr 757 . . . . . . . . 9 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ 𝑐𝑁) → 𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅))
60 simpll2 1093 . . . . . . . . 9 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ 𝑐𝑁) → 𝑎𝑁)
61 simpr 475 . . . . . . . . 9 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ 𝑐𝑁) → 𝑐𝑁)
6259, 60, 61fovrnd 6677 . . . . . . . 8 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ 𝑐𝑁) → (𝑎𝑀𝑐) ∈ (Base‘𝑅))
6330adantr 479 . . . . . . . . . 10 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → 𝑀:(𝑁 × 𝑁)⟶(Base‘𝑅))
6463fovrnda 6676 . . . . . . . . 9 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ (𝑑𝑁𝑐𝑁)) → (𝑑𝑀𝑐) ∈ (Base‘𝑅))
65643impb 1251 . . . . . . . 8 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ 𝑑𝑁𝑐𝑁) → (𝑑𝑀𝑐) ∈ (Base‘𝑅))
66 simpl3 1058 . . . . . . . 8 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → 𝑏𝑁)
67 simpl2 1057 . . . . . . . 8 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → 𝑎𝑁)
68 df-ne 2777 . . . . . . . . . . 11 (𝑎𝑏 ↔ ¬ 𝑎 = 𝑏)
6968biimpri 216 . . . . . . . . . 10 𝑎 = 𝑏𝑎𝑏)
7069necomd 2832 . . . . . . . . 9 𝑎 = 𝑏𝑏𝑎)
7170adantl 480 . . . . . . . 8 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → 𝑏𝑎)
7225, 2, 55, 56, 58, 62, 65, 66, 67, 71mdetralt2 20172 . . . . . . 7 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), if(𝑑 = 𝑎, (𝑎𝑀𝑐), (𝑑𝑀𝑐))))) = (0g𝑅))
73 ifid 4070 . . . . . . . . . . 11 if(𝑑 = 𝑎, (𝑑𝑀𝑐), (𝑑𝑀𝑐)) = (𝑑𝑀𝑐)
74 oveq1 6530 . . . . . . . . . . . . 13 (𝑑 = 𝑎 → (𝑑𝑀𝑐) = (𝑎𝑀𝑐))
7574adantl 480 . . . . . . . . . . . 12 (((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) ∧ 𝑑 = 𝑎) → (𝑑𝑀𝑐) = (𝑎𝑀𝑐))
7675ifeq1da 4061 . . . . . . . . . . 11 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → if(𝑑 = 𝑎, (𝑑𝑀𝑐), (𝑑𝑀𝑐)) = if(𝑑 = 𝑎, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))
7773, 76syl5eqr 2653 . . . . . . . . . 10 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → (𝑑𝑀𝑐) = if(𝑑 = 𝑎, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))
7877ifeq2d 4050 . . . . . . . . 9 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)) = if(𝑑 = 𝑏, (𝑎𝑀𝑐), if(𝑑 = 𝑎, (𝑎𝑀𝑐), (𝑑𝑀𝑐))))
7978mpt2eq3dv 6593 . . . . . . . 8 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → (𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐))) = (𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), if(𝑑 = 𝑎, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))))
8079fveq2d 6088 . . . . . . 7 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))) = (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), if(𝑑 = 𝑎, (𝑎𝑀𝑐), (𝑑𝑀𝑐))))))
81 iffalse 4040 . . . . . . . 8 𝑎 = 𝑏 → if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)) = (0g𝑅))
8281adantl 480 . . . . . . 7 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)) = (0g𝑅))
8372, 80, 823eqtr4d 2649 . . . . . 6 ((((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) ∧ ¬ 𝑎 = 𝑏) → (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))) = if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)))
8454, 83pm2.61dan 827 . . . . 5 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → (𝐷‘(𝑑𝑁, 𝑐𝑁 ↦ if(𝑑 = 𝑏, (𝑎𝑀𝑐), (𝑑𝑀𝑐)))) = if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)))
8536, 84eqtrd 2639 . . . 4 (((𝑀𝐵𝑅 ∈ CRing) ∧ 𝑎𝑁𝑏𝑁) → (𝑅 Σg (𝑐𝑁 ↦ ((𝑎𝑀𝑐)(.r𝑅)(𝑐(𝐽𝑀)𝑏)))) = if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅)))
8685mpt2eq3dva 6591 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → (𝑎𝑁, 𝑏𝑁 ↦ (𝑅 Σg (𝑐𝑁 ↦ ((𝑎𝑀𝑐)(.r𝑅)(𝑐(𝐽𝑀)𝑏))))) = (𝑎𝑁, 𝑏𝑁 ↦ if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅))))
87 madurid.i . . . . 5 1 = (1r𝐴)
8887oveq2i 6534 . . . 4 ((𝐷𝑀) 1 ) = ((𝐷𝑀) (1r𝐴))
89 crngring 18323 . . . . . 6 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
9089adantl 480 . . . . 5 ((𝑀𝐵𝑅 ∈ CRing) → 𝑅 ∈ Ring)
9125, 5, 6, 2mdetf 20158 . . . . . . 7 (𝑅 ∈ CRing → 𝐷:𝐵⟶(Base‘𝑅))
9291adantl 480 . . . . . 6 ((𝑀𝐵𝑅 ∈ CRing) → 𝐷:𝐵⟶(Base‘𝑅))
9392, 15ffvelrnd 6249 . . . . 5 ((𝑀𝐵𝑅 ∈ CRing) → (𝐷𝑀) ∈ (Base‘𝑅))
94 madurid.s . . . . . 6 = ( ·𝑠𝐴)
955, 2, 94, 55matsc 20013 . . . . 5 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝐷𝑀) ∈ (Base‘𝑅)) → ((𝐷𝑀) (1r𝐴)) = (𝑎𝑁, 𝑏𝑁 ↦ if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅))))
969, 90, 93, 95syl3anc 1317 . . . 4 ((𝑀𝐵𝑅 ∈ CRing) → ((𝐷𝑀) (1r𝐴)) = (𝑎𝑁, 𝑏𝑁 ↦ if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅))))
9788, 96syl5eq 2651 . . 3 ((𝑀𝐵𝑅 ∈ CRing) → ((𝐷𝑀) 1 ) = (𝑎𝑁, 𝑏𝑁 ↦ if(𝑎 = 𝑏, (𝐷𝑀), (0g𝑅))))
9886, 97eqtr4d 2642 . 2 ((𝑀𝐵𝑅 ∈ CRing) → (𝑎𝑁, 𝑏𝑁 ↦ (𝑅 Σg (𝑐𝑁 ↦ ((𝑎𝑀𝑐)(.r𝑅)(𝑐(𝐽𝑀)𝑏))))) = ((𝐷𝑀) 1 ))
9919, 24, 983eqtr3d 2647 1 ((𝑀𝐵𝑅 ∈ CRing) → (𝑀 · (𝐽𝑀)) = ((𝐷𝑀) 1 ))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 382  w3a 1030   = wceq 1474  wcel 1975  wne 2775  Vcvv 3168  ifcif 4031  cotp 4128  cmpt 4633   × cxp 5022   Fn wfn 5781  wf 5782  cfv 5786  (class class class)co 6523  cmpt2 6525  𝑚 cmap 7717  Fincfn 7814  Basecbs 15637  .rcmulr 15711   ·𝑠 cvsca 15714  0gc0g 15865   Σg cgsu 15866  1rcur 18266  Ringcrg 18312  CRingccrg 18313   maMul cmmul 19946   Mat cmat 19970   maDet cmdat 20147   maAdju cmadu 20195
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1711  ax-4 1726  ax-5 1825  ax-6 1873  ax-7 1920  ax-8 1977  ax-9 1984  ax-10 2004  ax-11 2019  ax-12 2031  ax-13 2228  ax-ext 2585  ax-rep 4689  ax-sep 4699  ax-nul 4708  ax-pow 4760  ax-pr 4824  ax-un 6820  ax-inf2 8394  ax-cnex 9844  ax-resscn 9845  ax-1cn 9846  ax-icn 9847  ax-addcl 9848  ax-addrcl 9849  ax-mulcl 9850  ax-mulrcl 9851  ax-mulcom 9852  ax-addass 9853  ax-mulass 9854  ax-distr 9855  ax-i2m1 9856  ax-1ne0 9857  ax-1rid 9858  ax-rnegex 9859  ax-rrecex 9860  ax-cnre 9861  ax-pre-lttri 9862  ax-pre-lttrn 9863  ax-pre-ltadd 9864  ax-pre-mulgt0 9865  ax-addf 9867  ax-mulf 9868
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3or 1031  df-3an 1032  df-xor 1456  df-tru 1477  df-fal 1480  df-ex 1695  df-nf 1700  df-sb 1866  df-eu 2457  df-mo 2458  df-clab 2592  df-cleq 2598  df-clel 2601  df-nfc 2735  df-ne 2777  df-nel 2778  df-ral 2896  df-rex 2897  df-reu 2898  df-rmo 2899  df-rab 2900  df-v 3170  df-sbc 3398  df-csb 3495  df-dif 3538  df-un 3540  df-in 3542  df-ss 3549  df-pss 3551  df-nul 3870  df-if 4032  df-pw 4105  df-sn 4121  df-pr 4123  df-tp 4125  df-op 4127  df-ot 4129  df-uni 4363  df-int 4401  df-iun 4447  df-iin 4448  df-br 4574  df-opab 4634  df-mpt 4635  df-tr 4671  df-eprel 4935  df-id 4939  df-po 4945  df-so 4946  df-fr 4983  df-se 4984  df-we 4985  df-xp 5030  df-rel 5031  df-cnv 5032  df-co 5033  df-dm 5034  df-rn 5035  df-res 5036  df-ima 5037  df-pred 5579  df-ord 5625  df-on 5626  df-lim 5627  df-suc 5628  df-iota 5750  df-fun 5788  df-fn 5789  df-f 5790  df-f1 5791  df-fo 5792  df-f1o 5793  df-fv 5794  df-isom 5795  df-riota 6485  df-ov 6526  df-oprab 6527  df-mpt2 6528  df-of 6768  df-om 6931  df-1st 7032  df-2nd 7033  df-supp 7156  df-tpos 7212  df-wrecs 7267  df-recs 7328  df-rdg 7366  df-1o 7420  df-2o 7421  df-oadd 7424  df-er 7602  df-map 7719  df-pm 7720  df-ixp 7768  df-en 7815  df-dom 7816  df-sdom 7817  df-fin 7818  df-fsupp 8132  df-sup 8204  df-oi 8271  df-card 8621  df-pnf 9928  df-mnf 9929  df-xr 9930  df-ltxr 9931  df-le 9932  df-sub 10115  df-neg 10116  df-div 10530  df-nn 10864  df-2 10922  df-3 10923  df-4 10924  df-5 10925  df-6 10926  df-7 10927  df-8 10928  df-9 10929  df-n0 11136  df-z 11207  df-dec 11322  df-uz 11516  df-rp 11661  df-fz 12149  df-fzo 12286  df-seq 12615  df-exp 12674  df-hash 12931  df-word 13096  df-lsw 13097  df-concat 13098  df-s1 13099  df-substr 13100  df-splice 13101  df-reverse 13102  df-s2 13386  df-struct 15639  df-ndx 15640  df-slot 15641  df-base 15642  df-sets 15643  df-ress 15644  df-plusg 15723  df-mulr 15724  df-starv 15725  df-sca 15726  df-vsca 15727  df-ip 15728  df-tset 15729  df-ple 15730  df-ds 15733  df-unif 15734  df-hom 15735  df-cco 15736  df-0g 15867  df-gsum 15868  df-prds 15873  df-pws 15875  df-mre 16011  df-mrc 16012  df-acs 16014  df-mgm 17007  df-sgrp 17049  df-mnd 17060  df-mhm 17100  df-submnd 17101  df-grp 17190  df-minusg 17191  df-sbg 17192  df-mulg 17306  df-subg 17356  df-ghm 17423  df-gim 17466  df-cntz 17515  df-oppg 17541  df-symg 17563  df-pmtr 17627  df-psgn 17676  df-evpm 17677  df-cmn 17960  df-abl 17961  df-mgp 18255  df-ur 18267  df-ring 18314  df-cring 18315  df-oppr 18388  df-dvdsr 18406  df-unit 18407  df-invr 18437  df-dvr 18448  df-rnghom 18480  df-drng 18514  df-subrg 18543  df-lmod 18630  df-lss 18696  df-sra 18935  df-rgmod 18936  df-cnfld 19510  df-zring 19580  df-zrh 19612  df-dsmm 19833  df-frlm 19848  df-mamu 19947  df-mat 19971  df-mdet 20148  df-madu 20197
This theorem is referenced by:  madulid  20208  matinv  20240  cpmadurid  20429  cpmidgsum2  20441
  Copyright terms: Public domain W3C validator