Proof of Theorem zaddcom
Step | Hyp | Ref
| Expression |
1 | | reelznn0nn 40820 |
. 2
⊢ (𝐴 ∈ ℤ ↔ (𝐴 ∈ ℕ0 ∨
(𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ))) |
2 | | reelznn0nn 40820 |
. 2
⊢ (𝐵 ∈ ℤ ↔ (𝐵 ∈ ℕ0 ∨
(𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ))) |
3 | | nn0addcom 40821 |
. . 3
⊢ ((𝐴 ∈ ℕ0
∧ 𝐵 ∈
ℕ0) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |
4 | | zaddcomlem 40822 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ 𝐵 ∈ ℕ0) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |
5 | | zaddcomlem 40822 |
. . . . 5
⊢ (((𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ) ∧ 𝐴 ∈ ℕ0) → (𝐵 + 𝐴) = (𝐴 + 𝐵)) |
6 | 5 | eqcomd 2743 |
. . . 4
⊢ (((𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ) ∧ 𝐴 ∈ ℕ0) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |
7 | 6 | ancoms 459 |
. . 3
⊢ ((𝐴 ∈ ℕ0
∧ (𝐵 ∈ ℝ
∧ (0 −ℝ 𝐵) ∈ ℕ)) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |
8 | | renegid2 40784 |
. . . . . . . 8
⊢ (𝐵 ∈ ℝ → ((0
−ℝ 𝐵) + 𝐵) = 0) |
9 | 8 | ad2antrl 726 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐵) + 𝐵) = 0) |
10 | | renegid2 40784 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℝ → ((0
−ℝ 𝐴) + 𝐴) = 0) |
11 | 10 | ad2antrr 724 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐴) + 𝐴) = 0) |
12 | 11 | oveq1d 7366 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐴) + 𝐴) + 𝐵) = (0 + 𝐵)) |
13 | | simplr 767 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (0
−ℝ 𝐴) ∈ ℕ) |
14 | 13 | nncnd 12127 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (0
−ℝ 𝐴) ∈ ℂ) |
15 | | simpll 765 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → 𝐴 ∈ ℝ) |
16 | 15 | recnd 11141 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → 𝐴 ∈ ℂ) |
17 | | simprl 769 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → 𝐵 ∈ ℝ) |
18 | 17 | recnd 11141 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → 𝐵 ∈ ℂ) |
19 | 14, 16, 18 | addassd 11135 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐴) + 𝐴) + 𝐵) = ((0 −ℝ 𝐴) + (𝐴 + 𝐵))) |
20 | | readdid2 40774 |
. . . . . . . . . 10
⊢ (𝐵 ∈ ℝ → (0 +
𝐵) = 𝐵) |
21 | 20 | ad2antrl 726 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (0 + 𝐵) = 𝐵) |
22 | 12, 19, 21 | 3eqtr3d 2785 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐴) + (𝐴 + 𝐵)) = 𝐵) |
23 | 22 | oveq2d 7367 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐵) + ((0 −ℝ 𝐴) + (𝐴 + 𝐵))) = ((0 −ℝ 𝐵) + 𝐵)) |
24 | 9, 23, 11 | 3eqtr4d 2787 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐵) + ((0 −ℝ 𝐴) + (𝐴 + 𝐵))) = ((0 −ℝ 𝐴) + 𝐴)) |
25 | | simprr 771 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (0
−ℝ 𝐵) ∈ ℕ) |
26 | 25 | nncnd 12127 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (0
−ℝ 𝐵) ∈ ℂ) |
27 | 16, 18 | addcld 11132 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (𝐴 + 𝐵) ∈ ℂ) |
28 | 26, 14, 27 | addassd 11135 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐵) + (0 −ℝ 𝐴)) + (𝐴 + 𝐵)) = ((0 −ℝ 𝐵) + ((0
−ℝ 𝐴) + (𝐴 + 𝐵)))) |
29 | 9 | oveq1d 7366 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐵) + 𝐵) + 𝐴) = (0 + 𝐴)) |
30 | 26, 18, 16 | addassd 11135 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐵) + 𝐵) + 𝐴) = ((0 −ℝ 𝐵) + (𝐵 + 𝐴))) |
31 | | readdid2 40774 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℝ → (0 +
𝐴) = 𝐴) |
32 | 31 | ad2antrr 724 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (0 + 𝐴) = 𝐴) |
33 | 29, 30, 32 | 3eqtr3d 2785 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐵) + (𝐵 + 𝐴)) = 𝐴) |
34 | 33 | oveq2d 7367 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐴) + ((0 −ℝ 𝐵) + (𝐵 + 𝐴))) = ((0 −ℝ 𝐴) + 𝐴)) |
35 | 24, 28, 34 | 3eqtr4d 2787 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐵) + (0 −ℝ 𝐴)) + (𝐴 + 𝐵)) = ((0 −ℝ 𝐴) + ((0
−ℝ 𝐵) + (𝐵 + 𝐴)))) |
36 | | nnaddcom 40686 |
. . . . . . 7
⊢ (((0
−ℝ 𝐴) ∈ ℕ ∧ (0
−ℝ 𝐵) ∈ ℕ) → ((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) = ((0
−ℝ 𝐵) + (0 −ℝ 𝐴))) |
37 | 36 | ad2ant2l 744 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) = ((0
−ℝ 𝐵) + (0 −ℝ 𝐴))) |
38 | 37 | oveq1d 7366 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) + (𝐴 + 𝐵)) = (((0 −ℝ 𝐵) + (0 −ℝ
𝐴)) + (𝐴 + 𝐵))) |
39 | 18, 16 | addcld 11132 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (𝐵 + 𝐴) ∈ ℂ) |
40 | 14, 26, 39 | addassd 11135 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) + (𝐵 + 𝐴)) = ((0 −ℝ 𝐴) + ((0
−ℝ 𝐵) + (𝐵 + 𝐴)))) |
41 | 35, 38, 40 | 3eqtr4d 2787 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) + (𝐴 + 𝐵)) = (((0 −ℝ 𝐴) + (0 −ℝ
𝐵)) + (𝐵 + 𝐴))) |
42 | 13, 25 | nnaddcld 12163 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) ∈
ℕ) |
43 | 42 | nncnd 12127 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) ∈
ℂ) |
44 | 43, 27, 39 | sn-addcand 40790 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → ((((0
−ℝ 𝐴) + (0 −ℝ 𝐵)) + (𝐴 + 𝐵)) = (((0 −ℝ 𝐴) + (0 −ℝ
𝐵)) + (𝐵 + 𝐴)) ↔ (𝐴 + 𝐵) = (𝐵 + 𝐴))) |
45 | 41, 44 | mpbid 231 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ) ∧ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ)) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |
46 | 3, 4, 7, 45 | ccase 1036 |
. 2
⊢ (((𝐴 ∈ ℕ0 ∨
(𝐴 ∈ ℝ ∧ (0
−ℝ 𝐴) ∈ ℕ)) ∧ (𝐵 ∈ ℕ0 ∨ (𝐵 ∈ ℝ ∧ (0
−ℝ 𝐵) ∈ ℕ))) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |
47 | 1, 2, 46 | syl2anb 598 |
1
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 + 𝐵) = (𝐵 + 𝐴)) |