Proof of Theorem zlmodzxzequap
Step | Hyp | Ref
| Expression |
1 | | 3cn 11984 |
. . . . . . 7
⊢ 3 ∈
ℂ |
2 | | 2cn 11978 |
. . . . . . 7
⊢ 2 ∈
ℂ |
3 | 1, 2 | mulneg1i 11351 |
. . . . . 6
⊢ (-3
· 2) = -(3 · 2) |
4 | 3 | oveq2i 7266 |
. . . . 5
⊢ ((2
· 3) + (-3 · 2)) = ((2 · 3) + -(3 ·
2)) |
5 | 2, 1 | mulcli 10913 |
. . . . . 6
⊢ (2
· 3) ∈ ℂ |
6 | 1, 2 | mulcli 10913 |
. . . . . 6
⊢ (3
· 2) ∈ ℂ |
7 | | negsub 11199 |
. . . . . . 7
⊢ (((2
· 3) ∈ ℂ ∧ (3 · 2) ∈ ℂ) → ((2
· 3) + -(3 · 2)) = ((2 · 3) − (3 ·
2))) |
8 | 1, 2 | mulcomi 10914 |
. . . . . . . . 9
⊢ (3
· 2) = (2 · 3) |
9 | 8 | oveq2i 7266 |
. . . . . . . 8
⊢ ((2
· 3) − (3 · 2)) = ((2 · 3) − (2 ·
3)) |
10 | 5 | subidi 11222 |
. . . . . . . 8
⊢ ((2
· 3) − (2 · 3)) = 0 |
11 | 9, 10 | eqtri 2766 |
. . . . . . 7
⊢ ((2
· 3) − (3 · 2)) = 0 |
12 | 7, 11 | eqtrdi 2795 |
. . . . . 6
⊢ (((2
· 3) ∈ ℂ ∧ (3 · 2) ∈ ℂ) → ((2
· 3) + -(3 · 2)) = 0) |
13 | 5, 6, 12 | mp2an 688 |
. . . . 5
⊢ ((2
· 3) + -(3 · 2)) = 0 |
14 | 4, 13 | eqtri 2766 |
. . . 4
⊢ ((2
· 3) + (-3 · 2)) = 0 |
15 | 14 | opeq2i 4805 |
. . 3
⊢ 〈0,
((2 · 3) + (-3 · 2))〉 = 〈0, 0〉 |
16 | | 4cn 11988 |
. . . . . . 7
⊢ 4 ∈
ℂ |
17 | 1, 16 | mulneg1i 11351 |
. . . . . 6
⊢ (-3
· 4) = -(3 · 4) |
18 | 17 | oveq2i 7266 |
. . . . 5
⊢ ((2
· 6) + (-3 · 4)) = ((2 · 6) + -(3 ·
4)) |
19 | | 6cn 11994 |
. . . . . . . 8
⊢ 6 ∈
ℂ |
20 | 2, 19 | mulcli 10913 |
. . . . . . 7
⊢ (2
· 6) ∈ ℂ |
21 | 1, 16 | mulcli 10913 |
. . . . . . 7
⊢ (3
· 4) ∈ ℂ |
22 | 20, 21 | negsubi 11229 |
. . . . . 6
⊢ ((2
· 6) + -(3 · 4)) = ((2 · 6) − (3 ·
4)) |
23 | | 2t6m3t4e0 45572 |
. . . . . 6
⊢ ((2
· 6) − (3 · 4)) = 0 |
24 | 22, 23 | eqtri 2766 |
. . . . 5
⊢ ((2
· 6) + -(3 · 4)) = 0 |
25 | 18, 24 | eqtri 2766 |
. . . 4
⊢ ((2
· 6) + (-3 · 4)) = 0 |
26 | 25 | opeq2i 4805 |
. . 3
⊢ 〈1,
((2 · 6) + (-3 · 4))〉 = 〈1, 0〉 |
27 | 15, 26 | preq12i 4671 |
. 2
⊢ {〈0,
((2 · 3) + (-3 · 2))〉, 〈1, ((2 · 6) + (-3
· 4))〉} = {〈0, 0〉, 〈1, 0〉} |
28 | | zlmodzxzldep.a |
. . . . . 6
⊢ 𝐴 = {〈0, 3〉, 〈1,
6〉} |
29 | 28 | oveq2i 7266 |
. . . . 5
⊢ (2 ∙ 𝐴) = (2 ∙ {〈0, 3〉,
〈1, 6〉}) |
30 | | 2z 12282 |
. . . . . 6
⊢ 2 ∈
ℤ |
31 | | 3z 12283 |
. . . . . 6
⊢ 3 ∈
ℤ |
32 | | 6nn 11992 |
. . . . . . 7
⊢ 6 ∈
ℕ |
33 | 32 | nnzi 12274 |
. . . . . 6
⊢ 6 ∈
ℤ |
34 | | zlmodzxzldep.z |
. . . . . . 7
⊢ 𝑍 = (ℤring
freeLMod {0, 1}) |
35 | | zlmodzxzequap.t |
. . . . . . 7
⊢ ∙ = (
·𝑠 ‘𝑍) |
36 | 34, 35 | zlmodzxzscm 45581 |
. . . . . 6
⊢ ((2
∈ ℤ ∧ 3 ∈ ℤ ∧ 6 ∈ ℤ) → (2 ∙
{〈0, 3〉, 〈1, 6〉}) = {〈0, (2 · 3)〉,
〈1, (2 · 6)〉}) |
37 | 30, 31, 33, 36 | mp3an 1459 |
. . . . 5
⊢ (2 ∙
{〈0, 3〉, 〈1, 6〉}) = {〈0, (2 · 3)〉,
〈1, (2 · 6)〉} |
38 | 29, 37 | eqtri 2766 |
. . . 4
⊢ (2 ∙ 𝐴) = {〈0, (2 ·
3)〉, 〈1, (2 · 6)〉} |
39 | | zlmodzxzldep.b |
. . . . . 6
⊢ 𝐵 = {〈0, 2〉, 〈1,
4〉} |
40 | 39 | oveq2i 7266 |
. . . . 5
⊢ (-3 ∙ 𝐵) = (-3 ∙ {〈0, 2〉,
〈1, 4〉}) |
41 | | znegcl 12285 |
. . . . . . 7
⊢ (3 ∈
ℤ → -3 ∈ ℤ) |
42 | 31, 41 | ax-mp 5 |
. . . . . 6
⊢ -3 ∈
ℤ |
43 | | 4z 12284 |
. . . . . 6
⊢ 4 ∈
ℤ |
44 | 34, 35 | zlmodzxzscm 45581 |
. . . . . 6
⊢ ((-3
∈ ℤ ∧ 2 ∈ ℤ ∧ 4 ∈ ℤ) → (-3 ∙
{〈0, 2〉, 〈1, 4〉}) = {〈0, (-3 · 2)〉,
〈1, (-3 · 4)〉}) |
45 | 42, 30, 43, 44 | mp3an 1459 |
. . . . 5
⊢ (-3 ∙
{〈0, 2〉, 〈1, 4〉}) = {〈0, (-3 · 2)〉,
〈1, (-3 · 4)〉} |
46 | 40, 45 | eqtri 2766 |
. . . 4
⊢ (-3 ∙ 𝐵) = {〈0, (-3 ·
2)〉, 〈1, (-3 · 4)〉} |
47 | 38, 46 | oveq12i 7267 |
. . 3
⊢ ((2 ∙ 𝐴) + (-3 ∙ 𝐵)) = ({〈0, (2 · 3)〉,
〈1, (2 · 6)〉} + {〈0, (-3 ·
2)〉, 〈1, (-3 · 4)〉}) |
48 | | zmulcl 12299 |
. . . . 5
⊢ ((2
∈ ℤ ∧ 3 ∈ ℤ) → (2 · 3) ∈
ℤ) |
49 | 30, 31, 48 | mp2an 688 |
. . . 4
⊢ (2
· 3) ∈ ℤ |
50 | | zmulcl 12299 |
. . . . 5
⊢ ((-3
∈ ℤ ∧ 2 ∈ ℤ) → (-3 · 2) ∈
ℤ) |
51 | 42, 30, 50 | mp2an 688 |
. . . 4
⊢ (-3
· 2) ∈ ℤ |
52 | | zmulcl 12299 |
. . . . 5
⊢ ((2
∈ ℤ ∧ 6 ∈ ℤ) → (2 · 6) ∈
ℤ) |
53 | 30, 33, 52 | mp2an 688 |
. . . 4
⊢ (2
· 6) ∈ ℤ |
54 | | zmulcl 12299 |
. . . . 5
⊢ ((-3
∈ ℤ ∧ 4 ∈ ℤ) → (-3 · 4) ∈
ℤ) |
55 | 42, 43, 54 | mp2an 688 |
. . . 4
⊢ (-3
· 4) ∈ ℤ |
56 | | zlmodzxzequap.m |
. . . . 5
⊢ + =
(+g‘𝑍) |
57 | 34, 56 | zlmodzxzadd 45582 |
. . . 4
⊢ ((((2
· 3) ∈ ℤ ∧ (-3 · 2) ∈ ℤ) ∧ ((2
· 6) ∈ ℤ ∧ (-3 · 4) ∈ ℤ)) →
({〈0, (2 · 3)〉, 〈1, (2 · 6)〉} + {〈0, (-3
· 2)〉, 〈1, (-3 · 4)〉}) = {〈0, ((2 · 3)
+ (-3 · 2))〉, 〈1, ((2 · 6) + (-3 ·
4))〉}) |
58 | 49, 51, 53, 55, 57 | mp4an 689 |
. . 3
⊢
({〈0, (2 · 3)〉, 〈1, (2 · 6)〉} + {〈0, (-3
· 2)〉, 〈1, (-3 · 4)〉}) = {〈0, ((2 · 3)
+ (-3 · 2))〉, 〈1, ((2 · 6) + (-3 ·
4))〉} |
59 | 47, 58 | eqtri 2766 |
. 2
⊢ ((2 ∙ 𝐴) + (-3 ∙ 𝐵)) = {〈0, ((2 · 3) + (-3
· 2))〉, 〈1, ((2 · 6) + (-3 ·
4))〉} |
60 | | zlmodzxzequap.o |
. 2
⊢ 0 = {〈0,
0〉, 〈1, 0〉} |
61 | 27, 59, 60 | 3eqtr4i 2776 |
1
⊢ ((2 ∙ 𝐴) + (-3 ∙ 𝐵)) = 0 |