Step | Hyp | Ref
| Expression |
1 | | dmatid.a |
. . . 4
⊢ 𝐴 = (𝑁 Mat 𝑅) |
2 | | eqid 2610 |
. . . 4
⊢
(Base‘𝑅) =
(Base‘𝑅) |
3 | | dmatid.b |
. . . 4
⊢ 𝐵 = (Base‘𝐴) |
4 | | simpll 786 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → 𝑁 ∈ Fin) |
5 | | simplr 788 |
. . . 4
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → 𝑅 ∈ Ring) |
6 | 5 | 3ad2ant1 1075 |
. . . . . 6
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → 𝑅 ∈ Ring) |
7 | | eqid 2610 |
. . . . . . 7
⊢
(Base‘𝐴) =
(Base‘𝐴) |
8 | | simp2 1055 |
. . . . . . 7
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → 𝑥 ∈ 𝑁) |
9 | | simp3 1056 |
. . . . . . 7
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → 𝑦 ∈ 𝑁) |
10 | | dmatid.0 |
. . . . . . . . . . 11
⊢ 0 =
(0g‘𝑅) |
11 | | dmatid.d |
. . . . . . . . . . 11
⊢ 𝐷 = (𝑁 DMat 𝑅) |
12 | 1, 7, 10, 11 | dmatmat 20119 |
. . . . . . . . . 10
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → (𝑋 ∈ 𝐷 → 𝑋 ∈ (Base‘𝐴))) |
13 | 12 | imp 444 |
. . . . . . . . 9
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑋 ∈ 𝐷) → 𝑋 ∈ (Base‘𝐴)) |
14 | 13 | adantrr 749 |
. . . . . . . 8
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → 𝑋 ∈ (Base‘𝐴)) |
15 | 14 | 3ad2ant1 1075 |
. . . . . . 7
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → 𝑋 ∈ (Base‘𝐴)) |
16 | 1, 2, 7, 8, 9, 15 | matecld 20051 |
. . . . . 6
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → (𝑥𝑋𝑦) ∈ (Base‘𝑅)) |
17 | 1, 7, 10, 11 | dmatmat 20119 |
. . . . . . . . . 10
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → (𝑌 ∈ 𝐷 → 𝑌 ∈ (Base‘𝐴))) |
18 | 17 | imp 444 |
. . . . . . . . 9
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑌 ∈ 𝐷) → 𝑌 ∈ (Base‘𝐴)) |
19 | 18 | adantrl 748 |
. . . . . . . 8
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → 𝑌 ∈ (Base‘𝐴)) |
20 | 19 | 3ad2ant1 1075 |
. . . . . . 7
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → 𝑌 ∈ (Base‘𝐴)) |
21 | 1, 2, 7, 8, 9, 20 | matecld 20051 |
. . . . . 6
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → (𝑥𝑌𝑦) ∈ (Base‘𝑅)) |
22 | | eqid 2610 |
. . . . . . 7
⊢
(.r‘𝑅) = (.r‘𝑅) |
23 | 2, 22 | ringcl 18384 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ (𝑥𝑋𝑦) ∈ (Base‘𝑅) ∧ (𝑥𝑌𝑦) ∈ (Base‘𝑅)) → ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)) ∈ (Base‘𝑅)) |
24 | 6, 16, 21, 23 | syl3anc 1318 |
. . . . 5
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)) ∈ (Base‘𝑅)) |
25 | 2, 10 | ring0cl 18392 |
. . . . . . . 8
⊢ (𝑅 ∈ Ring → 0 ∈
(Base‘𝑅)) |
26 | 25 | adantl 481 |
. . . . . . 7
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 0 ∈
(Base‘𝑅)) |
27 | 26 | adantr 480 |
. . . . . 6
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → 0 ∈ (Base‘𝑅)) |
28 | 27 | 3ad2ant1 1075 |
. . . . 5
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → 0 ∈ (Base‘𝑅)) |
29 | 24, 28 | ifcld 4081 |
. . . 4
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ 𝑥 ∈ 𝑁 ∧ 𝑦 ∈ 𝑁) → if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ) ∈ (Base‘𝑅)) |
30 | 1, 2, 3, 4, 5, 29 | matbas2d 20048 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) ∈ 𝐵) |
31 | | eqidd 2611 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) = (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))) |
32 | | eqeq12 2623 |
. . . . . . . . 9
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑗) → (𝑥 = 𝑦 ↔ 𝑖 = 𝑗)) |
33 | | oveq12 6558 |
. . . . . . . . . 10
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑗) → (𝑥𝑋𝑦) = (𝑖𝑋𝑗)) |
34 | | oveq12 6558 |
. . . . . . . . . 10
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑗) → (𝑥𝑌𝑦) = (𝑖𝑌𝑗)) |
35 | 33, 34 | oveq12d 6567 |
. . . . . . . . 9
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑗) → ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)) = ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗))) |
36 | 32, 35 | ifbieq1d 4059 |
. . . . . . . 8
⊢ ((𝑥 = 𝑖 ∧ 𝑦 = 𝑗) → if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ) = if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 )) |
37 | 36 | adantl 481 |
. . . . . . 7
⊢
((((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) ∧ (𝑥 = 𝑖 ∧ 𝑦 = 𝑗)) → if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ) = if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 )) |
38 | | simplrl 796 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → 𝑖 ∈ 𝑁) |
39 | | simplrr 797 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → 𝑗 ∈ 𝑁) |
40 | | ovex 6577 |
. . . . . . . . 9
⊢ ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)) ∈ V |
41 | | fvex 6113 |
. . . . . . . . . 10
⊢
(0g‘𝑅) ∈ V |
42 | 10, 41 | eqeltri 2684 |
. . . . . . . . 9
⊢ 0 ∈
V |
43 | 40, 42 | ifex 4106 |
. . . . . . . 8
⊢ if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 ) ∈
V |
44 | 43 | a1i 11 |
. . . . . . 7
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 ) ∈
V) |
45 | 31, 37, 38, 39, 44 | ovmpt2d 6686 |
. . . . . 6
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 )) |
46 | | ifnefalse 4048 |
. . . . . . 7
⊢ (𝑖 ≠ 𝑗 → if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 ) = 0 ) |
47 | 46 | adantl 481 |
. . . . . 6
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → if(𝑖 = 𝑗, ((𝑖𝑋𝑗)(.r‘𝑅)(𝑖𝑌𝑗)), 0 ) = 0 ) |
48 | 45, 47 | eqtrd 2644 |
. . . . 5
⊢
(((((𝑁 ∈ Fin
∧ 𝑅 ∈ Ring) ∧
(𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) ∧ 𝑖 ≠ 𝑗) → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 ) |
49 | 48 | ex 449 |
. . . 4
⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) ∧ (𝑖 ∈ 𝑁 ∧ 𝑗 ∈ 𝑁)) → (𝑖 ≠ 𝑗 → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 )) |
50 | 49 | ralrimivva 2954 |
. . 3
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 )) |
51 | | oveq 6555 |
. . . . . . 7
⊢ (𝑚 = (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) → (𝑖𝑚𝑗) = (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗)) |
52 | 51 | eqeq1d 2612 |
. . . . . 6
⊢ (𝑚 = (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) → ((𝑖𝑚𝑗) = 0 ↔ (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 )) |
53 | 52 | imbi2d 329 |
. . . . 5
⊢ (𝑚 = (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) → ((𝑖 ≠ 𝑗 → (𝑖𝑚𝑗) = 0 ) ↔ (𝑖 ≠ 𝑗 → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 ))) |
54 | 53 | 2ralbidv 2972 |
. . . 4
⊢ (𝑚 = (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) → (∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖𝑚𝑗) = 0 ) ↔ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 ))) |
55 | 54 | elrab 3331 |
. . 3
⊢ ((𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) ∈ {𝑚 ∈ 𝐵 ∣ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖𝑚𝑗) = 0 )} ↔ ((𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) ∈ 𝐵 ∧ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖(𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))𝑗) = 0 ))) |
56 | 30, 50, 55 | sylanbrc 695 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 )) ∈ {𝑚 ∈ 𝐵 ∣ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖𝑚𝑗) = 0 )}) |
57 | 1, 3, 10, 11 | dmatmul 20122 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → (𝑋(.r‘𝐴)𝑌) = (𝑥 ∈ 𝑁, 𝑦 ∈ 𝑁 ↦ if(𝑥 = 𝑦, ((𝑥𝑋𝑦)(.r‘𝑅)(𝑥𝑌𝑦)), 0 ))) |
58 | 1, 3, 10, 11 | dmatval 20117 |
. . 3
⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝐷 = {𝑚 ∈ 𝐵 ∣ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖𝑚𝑗) = 0 )}) |
59 | 58 | adantr 480 |
. 2
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → 𝐷 = {𝑚 ∈ 𝐵 ∣ ∀𝑖 ∈ 𝑁 ∀𝑗 ∈ 𝑁 (𝑖 ≠ 𝑗 → (𝑖𝑚𝑗) = 0 )}) |
60 | 56, 57, 59 | 3eltr4d 2703 |
1
⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑋 ∈ 𝐷 ∧ 𝑌 ∈ 𝐷)) → (𝑋(.r‘𝐴)𝑌) ∈ 𝐷) |