| Step | Hyp | Ref
| Expression |
| 1 | | scmatscm.k |
. . . 4
⊢ 𝐾 = (Base‘𝑅) |
| 2 | | scmatscm.a |
. . . 4
⊢ 𝐴 = (𝑁 Mat 𝑅) |
| 3 | | scmatscm.b |
. . . 4
⊢ 𝐵 = (Base‘𝐴) |
| 4 | | eqid 2740 |
. . . 4
⊢
(1r‘𝐴) = (1r‘𝐴) |
| 5 | | scmatscm.t |
. . . 4
⊢ ∗ = (
·𝑠 ‘𝐴) |
| 6 | | scmatscm.c |
. . . 4
⊢ 𝑆 = (𝑁 ScMat 𝑅) |
| 7 | 1, 2, 3, 4, 5, 6 | scmatscmid 22496 |
. . 3
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝐶 ∈ 𝑆) → ∃𝑐 ∈ 𝐾 𝐶 = (𝑐 ∗
(1r‘𝐴))) |
| 8 | 7 | 3expa 1124 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → ∃𝑐 ∈ 𝐾 𝐶 = (𝑐 ∗
(1r‘𝐴))) |
| 9 | | oveq1 7370 |
. . . . . 6
⊢ (𝐶 = (𝑐 ∗
(1r‘𝐴))
→ (𝐶 × 𝑚) = ((𝑐 ∗
(1r‘𝐴))
×
𝑚)) |
| 10 | | simpr 485 |
. . . . . . . . . . . 12
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑅 ∈ Ring) |
| 11 | 10 | ad4antr 738 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑅 ∈ Ring) |
| 12 | | simpl 483 |
. . . . . . . . . . . . . . 15
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
| 13 | 12 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
| 14 | 2 | matring 22433 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝐴 ∈ Ring) |
| 15 | 3, 4 | ringidcl 20244 |
. . . . . . . . . . . . . . . . 17
⊢ (𝐴 ∈ Ring →
(1r‘𝐴)
∈ 𝐵) |
| 16 | 14, 15 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) →
(1r‘𝐴)
∈ 𝐵) |
| 17 | 16 | adantr 481 |
. . . . . . . . . . . . . . 15
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → (1r‘𝐴) ∈ 𝐵) |
| 18 | 17 | anim1ci 622 |
. . . . . . . . . . . . . 14
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑐 ∈ 𝐾 ∧ (1r‘𝐴) ∈ 𝐵)) |
| 19 | 1, 2, 3, 5 | matvscl 22421 |
. . . . . . . . . . . . . 14
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑐 ∈ 𝐾 ∧ (1r‘𝐴) ∈ 𝐵)) → (𝑐 ∗
(1r‘𝐴))
∈ 𝐵) |
| 20 | 13, 18, 19 | syl2anc 590 |
. . . . . . . . . . . . 13
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑐 ∗
(1r‘𝐴))
∈ 𝐵) |
| 21 | 20 | anim1i 621 |
. . . . . . . . . . . 12
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
∈ 𝐵 ∧ 𝑚 ∈ 𝐵)) |
| 22 | 21 | adantr 481 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → ((𝑐 ∗
(1r‘𝐴))
∈ 𝐵 ∧ 𝑚 ∈ 𝐵)) |
| 23 | | simpr 485 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) |
| 24 | | scmatscm.m |
. . . . . . . . . . . 12
⊢ × =
(.r‘𝐴) |
| 25 | 2, 3, 24 | matmulcell 22435 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ Ring ∧ ((𝑐 ∗
(1r‘𝐴))
∈ 𝐵 ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗))))) |
| 26 | 11, 22, 23, 25 | syl3anc 1379 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗))))) |
| 27 | 12 | anim1i 621 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑐 ∈ 𝐾)) |
| 28 | | df-3an 1094 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾) ↔ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑐 ∈ 𝐾)) |
| 29 | 27, 28 | sylibr 235 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾)) |
| 30 | 29 | ad3antrrr 736 |
. . . . . . . . . . . . . . . 16
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾)) |
| 31 | | eqid 2740 |
. . . . . . . . . . . . . . . . 17
⊢
(0g‘𝑅) = (0g‘𝑅) |
| 32 | 2, 1, 5, 31 | matsc 22440 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾) → (𝑐 ∗
(1r‘𝐴)) =
(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, 𝑐, (0g‘𝑅)))) |
| 33 | 30, 32 | syl 17 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑐 ∗
(1r‘𝐴)) =
(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, 𝑐, (0g‘𝑅)))) |
| 34 | | eqeq12 2757 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑘) → (𝑥 = 𝑦 ↔ 𝑖 = 𝑘)) |
| 35 | 34 | ifbid 4485 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑘) → if(𝑥 = 𝑦, 𝑐, (0g‘𝑅)) = if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))) |
| 36 | 35 | adantl 482 |
. . . . . . . . . . . . . . 15
⊢
((((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) ∧ (𝑥 = 𝑖 ∧ 𝑦 = 𝑘)) → if(𝑥 = 𝑦, 𝑐, (0g‘𝑅)) = if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))) |
| 37 | | simpl 483 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁) → 𝑖 ∈ 𝑁) |
| 38 | 37 | adantl 482 |
. . . . . . . . . . . . . . . 16
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑖 ∈ 𝑁) |
| 39 | 38 | adantr 481 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑖 ∈ 𝑁) |
| 40 | | simpr 485 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑘 ∈ 𝑁) |
| 41 | | vex 3436 |
. . . . . . . . . . . . . . . . 17
⊢ 𝑐 ∈ V |
| 42 | | fvex 6847 |
. . . . . . . . . . . . . . . . 17
⊢
(0g‘𝑅) ∈ V |
| 43 | 41, 42 | ifex 4512 |
. . . . . . . . . . . . . . . 16
⊢ if(𝑖 = 𝑘, 𝑐, (0g‘𝑅)) ∈ V |
| 44 | 43 | a1i 11 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → if(𝑖 = 𝑘, 𝑐, (0g‘𝑅)) ∈ V) |
| 45 | 33, 36, 39, 40, 44 | ovmpod 7515 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑖(𝑐 ∗
(1r‘𝐴))𝑘) = if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))) |
| 46 | 45 | oveq1d 7378 |
. . . . . . . . . . . . 13
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗)) = (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗))) |
| 47 | 46 | mpteq2dva 5172 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗))) = (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)))) |
| 48 | 47 | oveq2d 7379 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗)))) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗))))) |
| 49 | | ovif 7461 |
. . . . . . . . . . . . . 14
⊢ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)) = if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗))) |
| 50 | | simp-6r 793 |
. . . . . . . . . . . . . . . 16
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑅 ∈ Ring) |
| 51 | | simplrr 783 |
. . . . . . . . . . . . . . . . 17
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑗 ∈ 𝑁) |
| 52 | | simpr 485 |
. . . . . . . . . . . . . . . . . 18
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → 𝑚 ∈ 𝐵) |
| 53 | 52 | ad2antrr 732 |
. . . . . . . . . . . . . . . . 17
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑚 ∈ 𝐵) |
| 54 | 2, 1, 3, 40, 51, 53 | matecld 22416 |
. . . . . . . . . . . . . . . 16
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑘𝑚𝑗) ∈ 𝐾) |
| 55 | | eqid 2740 |
. . . . . . . . . . . . . . . . 17
⊢
(.r‘𝑅) = (.r‘𝑅) |
| 56 | 1, 55, 31 | ringlz 20272 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑅 ∈ Ring ∧ (𝑘𝑚𝑗) ∈ 𝐾) → ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗)) = (0g‘𝑅)) |
| 57 | 50, 54, 56 | syl2anc 590 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗)) = (0g‘𝑅)) |
| 58 | 57 | ifeq2d 4482 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗))) = if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
| 59 | 49, 58 | eqtrid 2787 |
. . . . . . . . . . . . 13
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)) = if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
| 60 | 59 | mpteq2dva 5172 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗))) = (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)))) |
| 61 | 60 | oveq2d 7379 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)))) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))))) |
| 62 | | ringmnd 20222 |
. . . . . . . . . . . . . 14
⊢ (𝑅 ∈ Ring → 𝑅 ∈ Mnd) |
| 63 | 62 | adantl 482 |
. . . . . . . . . . . . 13
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑅 ∈ Mnd) |
| 64 | 63 | ad4antr 738 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑅 ∈ Mnd) |
| 65 | | simpl 483 |
. . . . . . . . . . . . 13
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑁 ∈ Fin) |
| 66 | 65 | ad4antr 738 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑁 ∈ Fin) |
| 67 | | equcom 2025 |
. . . . . . . . . . . . . 14
⊢ (𝑖 = 𝑘 ↔ 𝑘 = 𝑖) |
| 68 | | ifbi 4484 |
. . . . . . . . . . . . . 14
⊢ ((𝑖 = 𝑘 ↔ 𝑘 = 𝑖) → if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)) = if(𝑘 = 𝑖, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
| 69 | 67, 68 | ax-mp 5 |
. . . . . . . . . . . . 13
⊢ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)) = if(𝑘 = 𝑖, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)) |
| 70 | 69 | mpteq2i 5175 |
. . . . . . . . . . . 12
⊢ (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) = (𝑘 ∈ 𝑁 ↦ if(𝑘 = 𝑖, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
| 71 | 1 | eleq2i 2832 |
. . . . . . . . . . . . . . . 16
⊢ (𝑐 ∈ 𝐾 ↔ 𝑐 ∈ (Base‘𝑅)) |
| 72 | 71 | bilani 505 |
. . . . . . . . . . . . . . 15
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → 𝑐 ∈ (Base‘𝑅)) |
| 73 | 72 | ad3antrrr 736 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑐 ∈ (Base‘𝑅)) |
| 74 | | eqid 2740 |
. . . . . . . . . . . . . . 15
⊢
(Base‘𝑅) =
(Base‘𝑅) |
| 75 | 2, 74, 3, 40, 51, 53 | matecld 22416 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑘𝑚𝑗) ∈ (Base‘𝑅)) |
| 76 | 74, 55 | ringcl 20229 |
. . . . . . . . . . . . . 14
⊢ ((𝑅 ∈ Ring ∧ 𝑐 ∈ (Base‘𝑅) ∧ (𝑘𝑚𝑗) ∈ (Base‘𝑅)) → (𝑐(.r‘𝑅)(𝑘𝑚𝑗)) ∈ (Base‘𝑅)) |
| 77 | 50, 73, 75, 76 | syl3anc 1379 |
. . . . . . . . . . . . 13
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑐(.r‘𝑅)(𝑘𝑚𝑗)) ∈ (Base‘𝑅)) |
| 78 | 77 | ralrimiva 3132 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → ∀𝑘 ∈ 𝑁 (𝑐(.r‘𝑅)(𝑘𝑚𝑗)) ∈ (Base‘𝑅)) |
| 79 | 31, 64, 66, 38, 70, 78 | gsummpt1n0 19938 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)))) = ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗))) |
| 80 | 48, 61, 79 | 3eqtrd 2779 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗)))) = ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗))) |
| 81 | | csbov2g 7411 |
. . . . . . . . . . . . 13
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗))) |
| 82 | | csbov1g 7410 |
. . . . . . . . . . . . . . 15
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗) = (⦋𝑖 / 𝑘⦌𝑘𝑚𝑗)) |
| 83 | | csbvarg 4369 |
. . . . . . . . . . . . . . . 16
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌𝑘 = 𝑖) |
| 84 | 83 | oveq1d 7378 |
. . . . . . . . . . . . . . 15
⊢ (𝑖 ∈ 𝑁 → (⦋𝑖 / 𝑘⦌𝑘𝑚𝑗) = (𝑖𝑚𝑗)) |
| 85 | 82, 84 | eqtrd 2775 |
. . . . . . . . . . . . . 14
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗) = (𝑖𝑚𝑗)) |
| 86 | 85 | oveq2d 7379 |
. . . . . . . . . . . . 13
⊢ (𝑖 ∈ 𝑁 → (𝑐(.r‘𝑅)⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 87 | 81, 86 | eqtrd 2775 |
. . . . . . . . . . . 12
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 88 | 87 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁) → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 89 | 88 | adantl 482 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 90 | 26, 80, 89 | 3eqtrd 2779 |
. . . . . . . . 9
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 91 | | simpr 485 |
. . . . . . . . . . . 12
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → 𝑐 ∈ 𝐾) |
| 92 | 91 | anim1i 621 |
. . . . . . . . . . 11
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵)) |
| 93 | 92 | adantr 481 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵)) |
| 94 | 2, 3, 1, 5, 55 | matvscacell 22426 |
. . . . . . . . . 10
⊢ ((𝑅 ∈ Ring ∧ (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖(𝑐 ∗ 𝑚)𝑗) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 95 | 11, 93, 23, 94 | syl3anc 1379 |
. . . . . . . . 9
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖(𝑐 ∗ 𝑚)𝑗) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
| 96 | 90, 95 | eqtr4d 2778 |
. . . . . . . 8
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗)) |
| 97 | 96 | ralrimivva 3183 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗)) |
| 98 | 14 | ad3antrrr 736 |
. . . . . . . . 9
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → 𝐴 ∈ Ring) |
| 99 | 20 | adantr 481 |
. . . . . . . . 9
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑐 ∗
(1r‘𝐴))
∈ 𝐵) |
| 100 | 3, 24 | ringcl 20229 |
. . . . . . . . 9
⊢ ((𝐴 ∈ Ring ∧ (𝑐 ∗
(1r‘𝐴))
∈ 𝐵 ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
×
𝑚) ∈ 𝐵) |
| 101 | 98, 99, 52, 100 | syl3anc 1379 |
. . . . . . . 8
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
×
𝑚) ∈ 𝐵) |
| 102 | 12 | ad2antrr 732 |
. . . . . . . . 9
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
| 103 | 1, 2, 3, 5 | matvscl 22421 |
. . . . . . . . 9
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵)) → (𝑐 ∗ 𝑚) ∈ 𝐵) |
| 104 | 102, 92, 103 | syl2anc 590 |
. . . . . . . 8
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑐 ∗ 𝑚) ∈ 𝐵) |
| 105 | 2, 3 | eqmat 22414 |
. . . . . . . 8
⊢ ((((𝑐 ∗
(1r‘𝐴))
×
𝑚) ∈ 𝐵 ∧ (𝑐 ∗ 𝑚) ∈ 𝐵) → (((𝑐 ∗
(1r‘𝐴))
×
𝑚) = (𝑐 ∗ 𝑚) ↔ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗))) |
| 106 | 101, 104,
105 | syl2anc 590 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (((𝑐 ∗
(1r‘𝐴))
×
𝑚) = (𝑐 ∗ 𝑚) ↔ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗))) |
| 107 | 97, 106 | mpbird 258 |
. . . . . 6
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
×
𝑚) = (𝑐 ∗ 𝑚)) |
| 108 | 9, 107 | sylan9eqr 2797 |
. . . . 5
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ 𝐶 = (𝑐 ∗
(1r‘𝐴)))
→ (𝐶 × 𝑚) = (𝑐 ∗ 𝑚)) |
| 109 | 108 | ex 413 |
. . . 4
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝐶 = (𝑐 ∗
(1r‘𝐴))
→ (𝐶 × 𝑚) = (𝑐 ∗ 𝑚))) |
| 110 | 109 | ralrimdva 3140 |
. . 3
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝐶 = (𝑐 ∗
(1r‘𝐴))
→ ∀𝑚 ∈
𝐵 (𝐶 × 𝑚) = (𝑐 ∗ 𝑚))) |
| 111 | 110 | reximdva 3153 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → (∃𝑐 ∈ 𝐾 𝐶 = (𝑐 ∗
(1r‘𝐴))
→ ∃𝑐 ∈
𝐾 ∀𝑚 ∈ 𝐵 (𝐶 × 𝑚) = (𝑐 ∗ 𝑚))) |
| 112 | 8, 111 | mpd 15 |
1
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → ∃𝑐 ∈ 𝐾 ∀𝑚 ∈ 𝐵 (𝐶 × 𝑚) = (𝑐 ∗ 𝑚)) |