Metamath Proof Explorer


Theorem zaddcom

Description: Addition is commutative for integers. Proven without ax-mulcom . (Contributed by SN, 25-Jan-2025)

Ref Expression
Assertion zaddcom ⊢ A ∈ ℤ ∧ B ∈ ℤ → A + B = B + A

Proof

Step Hyp Ref Expression
1 reelznn0nn ⊢ A ∈ ℤ ↔ A ∈ ℕ 0 ∨ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ
2 reelznn0nn ⊢ B ∈ ℤ ↔ B ∈ ℕ 0 ∨ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ
3 nn0addcom ⊢ A ∈ ℕ 0 ∧ B ∈ ℕ 0 → A + B = B + A
4 zaddcomlem ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℕ 0 → A + B = B + A
5 zaddcomlem ⊢ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ ∧ A ∈ ℕ 0 → B + A = A + B
6 5 eqcomd ⊢ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ ∧ A ∈ ℕ 0 → A + B = B + A
7 6 ancoms ⊢ A ∈ ℕ 0 ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → A + B = B + A
8 renegid2 ⊢ B ∈ ℝ → 0 - ℝ B + B = 0
9 8 ad2antrl ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + B = 0
10 renegid2 ⊢ A ∈ ℝ → 0 - ℝ A + A = 0
11 10 ad2antrr ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + A = 0
12 11 oveq1d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + A + B = 0 + B
13 simplr ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A ∈ ℕ
14 13 nncnd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A ∈ ℂ
15 simpll ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → A ∈ ℝ
16 15 recnd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → A ∈ ℂ
17 simprl ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → B ∈ ℝ
18 17 recnd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → B ∈ ℂ
19 14 16 18 addassd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + A + B = 0 - ℝ A + A + B
20 readdlid ⊢ B ∈ ℝ → 0 + B = B
21 20 ad2antrl ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 + B = B
22 12 19 21 3eqtr3d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + A + B = B
23 22 oveq2d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + 0 - ℝ A + A + B = 0 - ℝ B + B
24 9 23 11 3eqtr4d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + 0 - ℝ A + A + B = 0 - ℝ A + A
25 simprr ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B ∈ ℕ
26 25 nncnd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B ∈ ℂ
27 16 18 addcld ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → A + B ∈ ℂ
28 26 14 27 addassd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + 0 - ℝ A + A + B = 0 - ℝ B + 0 - ℝ A + A + B
29 9 oveq1d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + B + A = 0 + A
30 26 18 16 addassd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + B + A = 0 - ℝ B + B + A
31 readdlid ⊢ A ∈ ℝ → 0 + A = A
32 31 ad2antrr ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 + A = A
33 29 30 32 3eqtr3d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + B + A = A
34 33 oveq2d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B + B + A = 0 - ℝ A + A
35 24 28 34 3eqtr4d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ B + 0 - ℝ A + A + B = 0 - ℝ A + 0 - ℝ B + B + A
36 nnaddcom ⊢ 0 - ℝ A ∈ ℕ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B = 0 - ℝ B + 0 - ℝ A
37 36 ad2ant2l ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B = 0 - ℝ B + 0 - ℝ A
38 37 oveq1d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B + A + B = 0 - ℝ B + 0 - ℝ A + A + B
39 18 16 addcld ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → B + A ∈ ℂ
40 14 26 39 addassd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B + B + A = 0 - ℝ A + 0 - ℝ B + B + A
41 35 38 40 3eqtr4d ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B + A + B = 0 - ℝ A + 0 - ℝ B + B + A
42 13 25 nnaddcld ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B ∈ ℕ
43 42 nncnd ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B ∈ ℂ
44 43 27 39 sn-addcand ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → 0 - ℝ A + 0 - ℝ B + A + B = 0 - ℝ A + 0 - ℝ B + B + A ↔ A + B = B + A
45 41 44 mpbid ⊢ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → A + B = B + A
46 3 4 7 45 ccase ⊢ A ∈ ℕ 0 ∨ A ∈ ℝ ∧ 0 - ℝ A ∈ ℕ ∧ B ∈ ℕ 0 ∨ B ∈ ℝ ∧ 0 - ℝ B ∈ ℕ → A + B = B + A
47 1 2 46 syl2anb ⊢ A ∈ ℤ ∧ B ∈ ℤ → A + B = B + A