Step | Hyp | Ref
| Expression |
1 | | scmatscm.k |
. . . 4
⊢ 𝐾 = (Base‘𝑅) |
2 | | scmatscm.a |
. . . 4
⊢ 𝐴 = (𝑁 Mat 𝑅) |
3 | | scmatscm.b |
. . . 4
⊢ 𝐵 = (Base‘𝐴) |
4 | | eqid 2739 |
. . . 4
⊢
(1r‘𝐴) = (1r‘𝐴) |
5 | | scmatscm.t |
. . . 4
⊢ ∗ = (
·𝑠 ‘𝐴) |
6 | | scmatscm.c |
. . . 4
⊢ 𝑆 = (𝑁 ScMat 𝑅) |
7 | 1, 2, 3, 4, 5, 6 | scmatscmid 21664 |
. . 3
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝐶 ∈ 𝑆) → ∃𝑐 ∈ 𝐾 𝐶 = (𝑐 ∗
(1r‘𝐴))) |
8 | 7 | 3expa 1117 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → ∃𝑐 ∈ 𝐾 𝐶 = (𝑐 ∗
(1r‘𝐴))) |
9 | | oveq1 7291 |
. . . . . 6
⊢ (𝐶 = (𝑐 ∗
(1r‘𝐴))
→ (𝐶 × 𝑚) = ((𝑐 ∗
(1r‘𝐴))
×
𝑚)) |
10 | | simpr 485 |
. . . . . . . . . . . 12
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑅 ∈ Ring) |
11 | 10 | ad4antr 729 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑅 ∈ Ring) |
12 | | simpl 483 |
. . . . . . . . . . . . . . 15
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
13 | 12 | adantr 481 |
. . . . . . . . . . . . . 14
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
14 | 2 | matring 21601 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝐴 ∈ Ring) |
15 | 3, 4 | ringidcl 19816 |
. . . . . . . . . . . . . . . . 17
⊢ (𝐴 ∈ Ring →
(1r‘𝐴)
∈ 𝐵) |
16 | 14, 15 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) →
(1r‘𝐴)
∈ 𝐵) |
17 | 16 | adantr 481 |
. . . . . . . . . . . . . . 15
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → (1r‘𝐴) ∈ 𝐵) |
18 | 17 | anim1ci 616 |
. . . . . . . . . . . . . 14
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑐 ∈ 𝐾 ∧ (1r‘𝐴) ∈ 𝐵)) |
19 | 1, 2, 3, 5 | matvscl 21589 |
. . . . . . . . . . . . . 14
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑐 ∈ 𝐾 ∧ (1r‘𝐴) ∈ 𝐵)) → (𝑐 ∗
(1r‘𝐴))
∈ 𝐵) |
20 | 13, 18, 19 | syl2anc 584 |
. . . . . . . . . . . . 13
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑐 ∗
(1r‘𝐴))
∈ 𝐵) |
21 | 20 | anim1i 615 |
. . . . . . . . . . . 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 21603 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ Ring ∧ ((𝑐 ∗
(1r‘𝐴))
∈ 𝐵 ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗))))) |
26 | 11, 22, 23, 25 | syl3anc 1370 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗))))) |
27 | 12 | anim1i 615 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑐 ∈ 𝐾)) |
28 | | df-3an 1088 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾) ↔ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑐 ∈ 𝐾)) |
29 | 27, 28 | sylibr 233 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾)) |
30 | 29 | ad3antrrr 727 |
. . . . . . . . . . . . . . . 16
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾)) |
31 | | eqid 2739 |
. . . . . . . . . . . . . . . . 17
⊢
(0g‘𝑅) = (0g‘𝑅) |
32 | 2, 1, 5, 31 | matsc 21608 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑐 ∈ 𝐾) → (𝑐 ∗
(1r‘𝐴)) =
(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, 𝑐, (0g‘𝑅)))) |
33 | 30, 32 | syl 17 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑐 ∗
(1r‘𝐴)) =
(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, 𝑐, (0g‘𝑅)))) |
34 | | eqeq12 2756 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑘) → (𝑥 = 𝑦 ↔ 𝑖 = 𝑘)) |
35 | 34 | ifbid 4483 |
. . . . . . . . . . . . . . . 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 3437 |
. . . . . . . . . . . . . . . . 17
⊢ 𝑐 ∈ V |
42 | | fvex 6796 |
. . . . . . . . . . . . . . . . 17
⊢
(0g‘𝑅) ∈ V |
43 | 41, 42 | ifex 4510 |
. . . . . . . . . . . . . . . 16
⊢ if(𝑖 = 𝑘, 𝑐, (0g‘𝑅)) ∈ V |
44 | 43 | a1i 11 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → if(𝑖 = 𝑘, 𝑐, (0g‘𝑅)) ∈ V) |
45 | 33, 36, 39, 40, 44 | ovmpod 7434 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑖(𝑐 ∗
(1r‘𝐴))𝑘) = if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))) |
46 | 45 | oveq1d 7299 |
. . . . . . . . . . . . 13
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗)) = (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗))) |
47 | 46 | mpteq2dva 5175 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗))) = (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)))) |
48 | 47 | oveq2d 7300 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗)))) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗))))) |
49 | | ovif 7381 |
. . . . . . . . . . . . . 14
⊢ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)) = if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗))) |
50 | | simp-6r 785 |
. . . . . . . . . . . . . . . 16
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑅 ∈ Ring) |
51 | | simplrr 775 |
. . . . . . . . . . . . . . . . 17
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑗 ∈ 𝑁) |
52 | | simpr 485 |
. . . . . . . . . . . . . . . . . 18
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → 𝑚 ∈ 𝐵) |
53 | 52 | ad2antrr 723 |
. . . . . . . . . . . . . . . . 17
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑚 ∈ 𝐵) |
54 | 2, 1, 3, 40, 51, 53 | matecld 21584 |
. . . . . . . . . . . . . . . 16
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑘𝑚𝑗) ∈ 𝐾) |
55 | | eqid 2739 |
. . . . . . . . . . . . . . . . 17
⊢
(.r‘𝑅) = (.r‘𝑅) |
56 | 1, 55, 31 | ringlz 19835 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑅 ∈ Ring ∧ (𝑘𝑚𝑗) ∈ 𝐾) → ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗)) = (0g‘𝑅)) |
57 | 50, 54, 56 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗)) = (0g‘𝑅)) |
58 | 57 | ifeq2d 4480 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), ((0g‘𝑅)(.r‘𝑅)(𝑘𝑚𝑗))) = if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
59 | 49, 58 | eqtrid 2791 |
. . . . . . . . . . . . 13
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)) = if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
60 | 59 | mpteq2dva 5175 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗))) = (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)))) |
61 | 60 | oveq2d 7300 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ (if(𝑖 = 𝑘, 𝑐, (0g‘𝑅))(.r‘𝑅)(𝑘𝑚𝑗)))) = (𝑅 Σg (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))))) |
62 | | ringmnd 19802 |
. . . . . . . . . . . . . 14
⊢ (𝑅 ∈ Ring → 𝑅 ∈ Mnd) |
63 | 62 | adantl 482 |
. . . . . . . . . . . . 13
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑅 ∈ Mnd) |
64 | 63 | ad4antr 729 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑅 ∈ Mnd) |
65 | | simpl 483 |
. . . . . . . . . . . . 13
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑁 ∈ Fin) |
66 | 65 | ad4antr 729 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → 𝑁 ∈ Fin) |
67 | | equcom 2022 |
. . . . . . . . . . . . . 14
⊢ (𝑖 = 𝑘 ↔ 𝑘 = 𝑖) |
68 | | ifbi 4482 |
. . . . . . . . . . . . . 14
⊢ ((𝑖 = 𝑘 ↔ 𝑘 = 𝑖) → if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)) = if(𝑘 = 𝑖, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
69 | 67, 68 | ax-mp 5 |
. . . . . . . . . . . . 13
⊢ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)) = if(𝑘 = 𝑖, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)) |
70 | 69 | mpteq2i 5180 |
. . . . . . . . . . . 12
⊢ (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) = (𝑘 ∈ 𝑁 ↦ if(𝑘 = 𝑖, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅))) |
71 | 1 | eleq2i 2831 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑐 ∈ 𝐾 ↔ 𝑐 ∈ (Base‘𝑅)) |
72 | 71 | biimpi 215 |
. . . . . . . . . . . . . . . 16
⊢ (𝑐 ∈ 𝐾 → 𝑐 ∈ (Base‘𝑅)) |
73 | 72 | adantl 482 |
. . . . . . . . . . . . . . 15
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → 𝑐 ∈ (Base‘𝑅)) |
74 | 73 | ad3antrrr 727 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → 𝑐 ∈ (Base‘𝑅)) |
75 | | eqid 2739 |
. . . . . . . . . . . . . . 15
⊢
(Base‘𝑅) =
(Base‘𝑅) |
76 | 2, 75, 3, 40, 51, 53 | matecld 21584 |
. . . . . . . . . . . . . 14
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑘𝑚𝑗) ∈ (Base‘𝑅)) |
77 | 75, 55 | ringcl 19809 |
. . . . . . . . . . . . . 14
⊢ ((𝑅 ∈ Ring ∧ 𝑐 ∈ (Base‘𝑅) ∧ (𝑘𝑚𝑗) ∈ (Base‘𝑅)) → (𝑐(.r‘𝑅)(𝑘𝑚𝑗)) ∈ (Base‘𝑅)) |
78 | 50, 74, 76, 77 | syl3anc 1370 |
. . . . . . . . . . . . 13
⊢
(((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑘 ∈ 𝑁) → (𝑐(.r‘𝑅)(𝑘𝑚𝑗)) ∈ (Base‘𝑅)) |
79 | 78 | ralrimiva 3104 |
. . . . . . . . . . . 12
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → ∀𝑘 ∈ 𝑁 (𝑐(.r‘𝑅)(𝑘𝑚𝑗)) ∈ (Base‘𝑅)) |
80 | 31, 64, 66, 38, 70, 79 | gsummpt1n0 19575 |
. . . . . . . . . . 11
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ if(𝑖 = 𝑘, (𝑐(.r‘𝑅)(𝑘𝑚𝑗)), (0g‘𝑅)))) = ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗))) |
81 | 48, 61, 80 | 3eqtrd 2783 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑅 Σg (𝑘 ∈ 𝑁 ↦ ((𝑖(𝑐 ∗
(1r‘𝐴))𝑘)(.r‘𝑅)(𝑘𝑚𝑗)))) = ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗))) |
82 | | csbov2g 7330 |
. . . . . . . . . . . . 13
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗))) |
83 | | csbov1g 7329 |
. . . . . . . . . . . . . . 15
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗) = (⦋𝑖 / 𝑘⦌𝑘𝑚𝑗)) |
84 | | csbvarg 4366 |
. . . . . . . . . . . . . . . 16
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌𝑘 = 𝑖) |
85 | 84 | oveq1d 7299 |
. . . . . . . . . . . . . . 15
⊢ (𝑖 ∈ 𝑁 → (⦋𝑖 / 𝑘⦌𝑘𝑚𝑗) = (𝑖𝑚𝑗)) |
86 | 83, 85 | eqtrd 2779 |
. . . . . . . . . . . . . 14
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗) = (𝑖𝑚𝑗)) |
87 | 86 | oveq2d 7300 |
. . . . . . . . . . . . 13
⊢ (𝑖 ∈ 𝑁 → (𝑐(.r‘𝑅)⦋𝑖 / 𝑘⦌(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
88 | 82, 87 | eqtrd 2779 |
. . . . . . . . . . . 12
⊢ (𝑖 ∈ 𝑁 → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
89 | 88 | adantr 481 |
. . . . . . . . . . 11
⊢ ((𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁) → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
90 | 89 | adantl 482 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → ⦋𝑖 / 𝑘⦌(𝑐(.r‘𝑅)(𝑘𝑚𝑗)) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
91 | 26, 81, 90 | 3eqtrd 2783 |
. . . . . . . . 9
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
92 | | simpr 485 |
. . . . . . . . . . . 12
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → 𝑐 ∈ 𝐾) |
93 | 92 | anim1i 615 |
. . . . . . . . . . 11
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵)) |
94 | 93 | adantr 481 |
. . . . . . . . . 10
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵)) |
95 | 2, 3, 1, 5, 55 | matvscacell 21594 |
. . . . . . . . . 10
⊢ ((𝑅 ∈ Ring ∧ (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖(𝑐 ∗ 𝑚)𝑗) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
96 | 11, 94, 23, 95 | syl3anc 1370 |
. . . . . . . . 9
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖(𝑐 ∗ 𝑚)𝑗) = (𝑐(.r‘𝑅)(𝑖𝑚𝑗))) |
97 | 91, 96 | eqtr4d 2782 |
. . . . . . . 8
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗)) |
98 | 97 | ralrimivva 3124 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗)) |
99 | 14 | ad3antrrr 727 |
. . . . . . . . 9
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → 𝐴 ∈ Ring) |
100 | 20 | adantr 481 |
. . . . . . . . 9
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑐 ∗
(1r‘𝐴))
∈ 𝐵) |
101 | 3, 24 | ringcl 19809 |
. . . . . . . . 9
⊢ ((𝐴 ∈ Ring ∧ (𝑐 ∗
(1r‘𝐴))
∈ 𝐵 ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
×
𝑚) ∈ 𝐵) |
102 | 99, 100, 52, 101 | syl3anc 1370 |
. . . . . . . 8
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
×
𝑚) ∈ 𝐵) |
103 | 12 | ad2antrr 723 |
. . . . . . . . 9
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring)) |
104 | 1, 2, 3, 5 | matvscl 21589 |
. . . . . . . . 9
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑐 ∈ 𝐾 ∧ 𝑚 ∈ 𝐵)) → (𝑐 ∗ 𝑚) ∈ 𝐵) |
105 | 103, 93, 104 | syl2anc 584 |
. . . . . . . 8
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝑐 ∗ 𝑚) ∈ 𝐵) |
106 | 2, 3 | eqmat 21582 |
. . . . . . . 8
⊢ ((((𝑐 ∗
(1r‘𝐴))
×
𝑚) ∈ 𝐵 ∧ (𝑐 ∗ 𝑚) ∈ 𝐵) → (((𝑐 ∗
(1r‘𝐴))
×
𝑚) = (𝑐 ∗ 𝑚) ↔ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗))) |
107 | 102, 105,
106 | syl2anc 584 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (((𝑐 ∗
(1r‘𝐴))
×
𝑚) = (𝑐 ∗ 𝑚) ↔ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖((𝑐 ∗
(1r‘𝐴))
×
𝑚)𝑗) = (𝑖(𝑐 ∗ 𝑚)𝑗))) |
108 | 98, 107 | mpbird 256 |
. . . . . 6
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → ((𝑐 ∗
(1r‘𝐴))
×
𝑚) = (𝑐 ∗ 𝑚)) |
109 | 9, 108 | sylan9eqr 2801 |
. . . . 5
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) ∧ 𝐶 = (𝑐 ∗
(1r‘𝐴)))
→ (𝐶 × 𝑚) = (𝑐 ∗ 𝑚)) |
110 | 109 | ex 413 |
. . . 4
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) ∧ 𝑚 ∈ 𝐵) → (𝐶 = (𝑐 ∗
(1r‘𝐴))
→ (𝐶 × 𝑚) = (𝑐 ∗ 𝑚))) |
111 | 110 | ralrimdva 3107 |
. . 3
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) ∧ 𝑐 ∈ 𝐾) → (𝐶 = (𝑐 ∗
(1r‘𝐴))
→ ∀𝑚 ∈
𝐵 (𝐶 × 𝑚) = (𝑐 ∗ 𝑚))) |
112 | 111 | reximdva 3204 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → (∃𝑐 ∈ 𝐾 𝐶 = (𝑐 ∗
(1r‘𝐴))
→ ∃𝑐 ∈
𝐾 ∀𝑚 ∈ 𝐵 (𝐶 × 𝑚) = (𝑐 ∗ 𝑚))) |
113 | 8, 112 | mpd 15 |
1
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝐶 ∈ 𝑆) → ∃𝑐 ∈ 𝐾 ∀𝑚 ∈ 𝐵 (𝐶 × 𝑚) = (𝑐 ∗ 𝑚)) |