Step | Hyp | Ref
| Expression |
1 | | zlmodzxz.z |
. . 3
⊢ 𝑍 = (ℤring
freeLMod {0, 1}) |
2 | | eqid 2610 |
. . 3
⊢
(Base‘𝑍) =
(Base‘𝑍) |
3 | | zringring 19640 |
. . . 4
⊢
ℤring ∈ Ring |
4 | 3 | a1i 11 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
ℤring ∈ Ring) |
5 | | prex 4836 |
. . . 4
⊢ {0, 1}
∈ V |
6 | 5 | a1i 11 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → {0, 1}
∈ V) |
7 | | simpl 472 |
. . . 4
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈
ℤ) |
8 | | simpl 472 |
. . . 4
⊢ ((𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ) → 𝐶 ∈
ℤ) |
9 | 1 | zlmodzxzel 41926 |
. . . 4
⊢ ((𝐴 ∈ ℤ ∧ 𝐶 ∈ ℤ) →
{〈0, 𝐴〉, 〈1,
𝐶〉} ∈
(Base‘𝑍)) |
10 | 7, 8, 9 | syl2an 493 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
{〈0, 𝐴〉, 〈1,
𝐶〉} ∈
(Base‘𝑍)) |
11 | | simpr 476 |
. . . 4
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐵 ∈
ℤ) |
12 | | simpr 476 |
. . . 4
⊢ ((𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ) → 𝐷 ∈
ℤ) |
13 | 1 | zlmodzxzel 41926 |
. . . 4
⊢ ((𝐵 ∈ ℤ ∧ 𝐷 ∈ ℤ) →
{〈0, 𝐵〉, 〈1,
𝐷〉} ∈
(Base‘𝑍)) |
14 | 11, 12, 13 | syl2an 493 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
{〈0, 𝐵〉, 〈1,
𝐷〉} ∈
(Base‘𝑍)) |
15 | | eqid 2610 |
. . 3
⊢
(+g‘ℤring) =
(+g‘ℤring) |
16 | | zlmodzxzadd.p |
. . 3
⊢ + =
(+g‘𝑍) |
17 | 1, 2, 4, 6, 10, 14, 15, 16 | frlmplusgval 19926 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐴〉,
〈1, 𝐶〉} + {〈0,
𝐵〉, 〈1, 𝐷〉}) = ({〈0, 𝐴〉, 〈1, 𝐶〉}
∘𝑓
(+g‘ℤring){〈0, 𝐵〉, 〈1, 𝐷〉})) |
18 | | c0ex 9913 |
. . . . . 6
⊢ 0 ∈
V |
19 | | 1ex 9914 |
. . . . . 6
⊢ 1 ∈
V |
20 | 18, 19 | pm3.2i 470 |
. . . . 5
⊢ (0 ∈
V ∧ 1 ∈ V) |
21 | 20 | a1i 11 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → (0
∈ V ∧ 1 ∈ V)) |
22 | 7, 8 | anim12i 588 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → (𝐴 ∈ ℤ ∧ 𝐶 ∈
ℤ)) |
23 | | 0ne1 10965 |
. . . . 5
⊢ 0 ≠
1 |
24 | 23 | a1i 11 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 0 ≠
1) |
25 | | fnprg 5861 |
. . . 4
⊢ (((0
∈ V ∧ 1 ∈ V) ∧ (𝐴 ∈ ℤ ∧ 𝐶 ∈ ℤ) ∧ 0 ≠ 1) →
{〈0, 𝐴〉, 〈1,
𝐶〉} Fn {0,
1}) |
26 | 21, 22, 24, 25 | syl3anc 1318 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
{〈0, 𝐴〉, 〈1,
𝐶〉} Fn {0,
1}) |
27 | 11, 12 | anim12i 588 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → (𝐵 ∈ ℤ ∧ 𝐷 ∈
ℤ)) |
28 | | fnprg 5861 |
. . . 4
⊢ (((0
∈ V ∧ 1 ∈ V) ∧ (𝐵 ∈ ℤ ∧ 𝐷 ∈ ℤ) ∧ 0 ≠ 1) →
{〈0, 𝐵〉, 〈1,
𝐷〉} Fn {0,
1}) |
29 | 21, 27, 24, 28 | syl3anc 1318 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
{〈0, 𝐵〉, 〈1,
𝐷〉} Fn {0,
1}) |
30 | 6, 26, 29 | offvalfv 41914 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐴〉,
〈1, 𝐶〉}
∘𝑓
(+g‘ℤring){〈0, 𝐵〉, 〈1, 𝐷〉}) = (𝑥 ∈ {0, 1} ↦ (({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥)))) |
31 | | zringplusg 19644 |
. . . . . . 7
⊢ + =
(+g‘ℤring) |
32 | 31 | eqcomi 2619 |
. . . . . 6
⊢
(+g‘ℤring) = + |
33 | 32 | oveqi 6562 |
. . . . 5
⊢ (𝐴(+g‘ℤring)𝐵) = (𝐴 + 𝐵) |
34 | 33 | opeq2i 4344 |
. . . 4
⊢ 〈0,
(𝐴(+g‘ℤring)𝐵)〉 = 〈0, (𝐴 + 𝐵)〉 |
35 | 32 | oveqi 6562 |
. . . . 5
⊢ (𝐶(+g‘ℤring)𝐷) = (𝐶 + 𝐷) |
36 | 35 | opeq2i 4344 |
. . . 4
⊢ 〈1,
(𝐶(+g‘ℤring)𝐷)〉 = 〈1, (𝐶 + 𝐷)〉 |
37 | 34, 36 | preq12i 4217 |
. . 3
⊢ {〈0,
(𝐴(+g‘ℤring)𝐵)〉, 〈1, (𝐶(+g‘ℤring)𝐷)〉} = {〈0, (𝐴 + 𝐵)〉, 〈1, (𝐶 + 𝐷)〉} |
38 | 18 | a1i 11 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 0
∈ V) |
39 | 19 | a1i 11 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 1
∈ V) |
40 | | ovex 6577 |
. . . . 5
⊢ (𝐴(+g‘ℤring)𝐵) ∈ V |
41 | 40 | a1i 11 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → (𝐴(+g‘ℤring)𝐵) ∈ V) |
42 | | ovex 6577 |
. . . . 5
⊢ (𝐶(+g‘ℤring)𝐷) ∈ V |
43 | 42 | a1i 11 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → (𝐶(+g‘ℤring)𝐷) ∈ V) |
44 | | fveq2 6103 |
. . . . . 6
⊢ (𝑥 = 0 → ({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥) = ({〈0, 𝐴〉, 〈1, 𝐶〉}‘0)) |
45 | | fveq2 6103 |
. . . . . 6
⊢ (𝑥 = 0 → ({〈0, 𝐵〉, 〈1, 𝐷〉}‘𝑥) = ({〈0, 𝐵〉, 〈1, 𝐷〉}‘0)) |
46 | 44, 45 | oveq12d 6567 |
. . . . 5
⊢ (𝑥 = 0 → (({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥)) = (({〈0, 𝐴〉, 〈1, 𝐶〉}‘0)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘0))) |
47 | 7 | adantr 480 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐴 ∈
ℤ) |
48 | | fvpr1g 6363 |
. . . . . . 7
⊢ ((0
∈ V ∧ 𝐴 ∈
ℤ ∧ 0 ≠ 1) → ({〈0, 𝐴〉, 〈1, 𝐶〉}‘0) = 𝐴) |
49 | 38, 47, 24, 48 | syl3anc 1318 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐴〉,
〈1, 𝐶〉}‘0)
= 𝐴) |
50 | 11 | adantr 480 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐵 ∈
ℤ) |
51 | | fvpr1g 6363 |
. . . . . . 7
⊢ ((0
∈ V ∧ 𝐵 ∈
ℤ ∧ 0 ≠ 1) → ({〈0, 𝐵〉, 〈1, 𝐷〉}‘0) = 𝐵) |
52 | 38, 50, 24, 51 | syl3anc 1318 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐵〉,
〈1, 𝐷〉}‘0)
= 𝐵) |
53 | 49, 52 | oveq12d 6567 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
(({〈0, 𝐴〉,
〈1, 𝐶〉}‘0)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘0)) = (𝐴(+g‘ℤring)𝐵)) |
54 | 46, 53 | sylan9eqr 2666 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝑥 = 0) → (({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥)) = (𝐴(+g‘ℤring)𝐵)) |
55 | | fveq2 6103 |
. . . . . 6
⊢ (𝑥 = 1 → ({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥) = ({〈0, 𝐴〉, 〈1, 𝐶〉}‘1)) |
56 | | fveq2 6103 |
. . . . . 6
⊢ (𝑥 = 1 → ({〈0, 𝐵〉, 〈1, 𝐷〉}‘𝑥) = ({〈0, 𝐵〉, 〈1, 𝐷〉}‘1)) |
57 | 55, 56 | oveq12d 6567 |
. . . . 5
⊢ (𝑥 = 1 → (({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥)) = (({〈0, 𝐴〉, 〈1, 𝐶〉}‘1)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘1))) |
58 | 8 | adantl 481 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐶 ∈
ℤ) |
59 | | fvpr2g 6364 |
. . . . . . 7
⊢ ((1
∈ V ∧ 𝐶 ∈
ℤ ∧ 0 ≠ 1) → ({〈0, 𝐴〉, 〈1, 𝐶〉}‘1) = 𝐶) |
60 | 39, 58, 24, 59 | syl3anc 1318 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐴〉,
〈1, 𝐶〉}‘1)
= 𝐶) |
61 | 12 | adantl 481 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → 𝐷 ∈
ℤ) |
62 | | fvpr2g 6364 |
. . . . . . 7
⊢ ((1
∈ V ∧ 𝐷 ∈
ℤ ∧ 0 ≠ 1) → ({〈0, 𝐵〉, 〈1, 𝐷〉}‘1) = 𝐷) |
63 | 39, 61, 24, 62 | syl3anc 1318 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐵〉,
〈1, 𝐷〉}‘1)
= 𝐷) |
64 | 60, 63 | oveq12d 6567 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
(({〈0, 𝐴〉,
〈1, 𝐶〉}‘1)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘1)) = (𝐶(+g‘ℤring)𝐷)) |
65 | 57, 64 | sylan9eqr 2666 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) ∧ 𝑥 = 1) → (({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥)) = (𝐶(+g‘ℤring)𝐷)) |
66 | 38, 39, 41, 43, 54, 65 | fmptpr 6343 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
{〈0, (𝐴(+g‘ℤring)𝐵)〉, 〈1, (𝐶(+g‘ℤring)𝐷)〉} = (𝑥 ∈ {0, 1} ↦ (({〈0, 𝐴〉, 〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥)))) |
67 | 37, 66 | syl5reqr 2659 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) → (𝑥 ∈ {0, 1} ↦
(({〈0, 𝐴〉,
〈1, 𝐶〉}‘𝑥)(+g‘ℤring)({〈0,
𝐵〉, 〈1, 𝐷〉}‘𝑥))) = {〈0, (𝐴 + 𝐵)〉, 〈1, (𝐶 + 𝐷)〉}) |
68 | 17, 30, 67 | 3eqtrd 2648 |
1
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝐶 ∈ ℤ ∧ 𝐷 ∈ ℤ)) →
({〈0, 𝐴〉,
〈1, 𝐶〉} + {〈0,
𝐵〉, 〈1, 𝐷〉}) = {〈0, (𝐴 + 𝐵)〉, 〈1, (𝐶 + 𝐷)〉}) |