Proof of Theorem xadd4d
Step | Hyp | Ref
| Expression |
1 | | xadd4d.3 |
. . . 4
⊢ (𝜑 → (𝐶 ∈ ℝ* ∧ 𝐶 ≠
-∞)) |
2 | | xadd4d.2 |
. . . 4
⊢ (𝜑 → (𝐵 ∈ ℝ* ∧ 𝐵 ≠
-∞)) |
3 | | xadd4d.4 |
. . . 4
⊢ (𝜑 → (𝐷 ∈ ℝ* ∧ 𝐷 ≠
-∞)) |
4 | | xaddass 9826 |
. . . 4
⊢ (((𝐶 ∈ ℝ*
∧ 𝐶 ≠ -∞)
∧ (𝐵 ∈
ℝ* ∧ 𝐵
≠ -∞) ∧ (𝐷
∈ ℝ* ∧ 𝐷 ≠ -∞)) → ((𝐶 +𝑒 𝐵) +𝑒 𝐷) = (𝐶 +𝑒 (𝐵 +𝑒 𝐷))) |
5 | 1, 2, 3, 4 | syl3anc 1233 |
. . 3
⊢ (𝜑 → ((𝐶 +𝑒 𝐵) +𝑒 𝐷) = (𝐶 +𝑒 (𝐵 +𝑒 𝐷))) |
6 | 5 | oveq2d 5869 |
. 2
⊢ (𝜑 → (𝐴 +𝑒 ((𝐶 +𝑒 𝐵) +𝑒 𝐷)) = (𝐴 +𝑒 (𝐶 +𝑒 (𝐵 +𝑒 𝐷)))) |
7 | | xadd4d.1 |
. . . 4
⊢ (𝜑 → (𝐴 ∈ ℝ* ∧ 𝐴 ≠
-∞)) |
8 | 1 | simpld 111 |
. . . . 5
⊢ (𝜑 → 𝐶 ∈
ℝ*) |
9 | 3 | simpld 111 |
. . . . 5
⊢ (𝜑 → 𝐷 ∈
ℝ*) |
10 | 8, 9 | xaddcld 9841 |
. . . 4
⊢ (𝜑 → (𝐶 +𝑒 𝐷) ∈
ℝ*) |
11 | | xaddnemnf 9814 |
. . . . 5
⊢ (((𝐶 ∈ ℝ*
∧ 𝐶 ≠ -∞)
∧ (𝐷 ∈
ℝ* ∧ 𝐷
≠ -∞)) → (𝐶
+𝑒 𝐷)
≠ -∞) |
12 | 1, 3, 11 | syl2anc 409 |
. . . 4
⊢ (𝜑 → (𝐶 +𝑒 𝐷) ≠ -∞) |
13 | | xaddass 9826 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐴 ≠ -∞)
∧ (𝐵 ∈
ℝ* ∧ 𝐵
≠ -∞) ∧ ((𝐶
+𝑒 𝐷)
∈ ℝ* ∧ (𝐶 +𝑒 𝐷) ≠ -∞)) → ((𝐴 +𝑒 𝐵) +𝑒 (𝐶 +𝑒 𝐷)) = (𝐴 +𝑒 (𝐵 +𝑒 (𝐶 +𝑒 𝐷)))) |
14 | 7, 2, 10, 12, 13 | syl112anc 1237 |
. . 3
⊢ (𝜑 → ((𝐴 +𝑒 𝐵) +𝑒 (𝐶 +𝑒 𝐷)) = (𝐴 +𝑒 (𝐵 +𝑒 (𝐶 +𝑒 𝐷)))) |
15 | 2 | simpld 111 |
. . . . . . 7
⊢ (𝜑 → 𝐵 ∈
ℝ*) |
16 | | xaddcom 9818 |
. . . . . . 7
⊢ ((𝐶 ∈ ℝ*
∧ 𝐵 ∈
ℝ*) → (𝐶 +𝑒 𝐵) = (𝐵 +𝑒 𝐶)) |
17 | 8, 15, 16 | syl2anc 409 |
. . . . . 6
⊢ (𝜑 → (𝐶 +𝑒 𝐵) = (𝐵 +𝑒 𝐶)) |
18 | 17 | oveq1d 5868 |
. . . . 5
⊢ (𝜑 → ((𝐶 +𝑒 𝐵) +𝑒 𝐷) = ((𝐵 +𝑒 𝐶) +𝑒 𝐷)) |
19 | | xaddass 9826 |
. . . . . 6
⊢ (((𝐵 ∈ ℝ*
∧ 𝐵 ≠ -∞)
∧ (𝐶 ∈
ℝ* ∧ 𝐶
≠ -∞) ∧ (𝐷
∈ ℝ* ∧ 𝐷 ≠ -∞)) → ((𝐵 +𝑒 𝐶) +𝑒 𝐷) = (𝐵 +𝑒 (𝐶 +𝑒 𝐷))) |
20 | 2, 1, 3, 19 | syl3anc 1233 |
. . . . 5
⊢ (𝜑 → ((𝐵 +𝑒 𝐶) +𝑒 𝐷) = (𝐵 +𝑒 (𝐶 +𝑒 𝐷))) |
21 | 18, 20 | eqtr2d 2204 |
. . . 4
⊢ (𝜑 → (𝐵 +𝑒 (𝐶 +𝑒 𝐷)) = ((𝐶 +𝑒 𝐵) +𝑒 𝐷)) |
22 | 21 | oveq2d 5869 |
. . 3
⊢ (𝜑 → (𝐴 +𝑒 (𝐵 +𝑒 (𝐶 +𝑒 𝐷))) = (𝐴 +𝑒 ((𝐶 +𝑒 𝐵) +𝑒 𝐷))) |
23 | 14, 22 | eqtrd 2203 |
. 2
⊢ (𝜑 → ((𝐴 +𝑒 𝐵) +𝑒 (𝐶 +𝑒 𝐷)) = (𝐴 +𝑒 ((𝐶 +𝑒 𝐵) +𝑒 𝐷))) |
24 | 15, 9 | xaddcld 9841 |
. . 3
⊢ (𝜑 → (𝐵 +𝑒 𝐷) ∈
ℝ*) |
25 | | xaddnemnf 9814 |
. . . 4
⊢ (((𝐵 ∈ ℝ*
∧ 𝐵 ≠ -∞)
∧ (𝐷 ∈
ℝ* ∧ 𝐷
≠ -∞)) → (𝐵
+𝑒 𝐷)
≠ -∞) |
26 | 2, 3, 25 | syl2anc 409 |
. . 3
⊢ (𝜑 → (𝐵 +𝑒 𝐷) ≠ -∞) |
27 | | xaddass 9826 |
. . 3
⊢ (((𝐴 ∈ ℝ*
∧ 𝐴 ≠ -∞)
∧ (𝐶 ∈
ℝ* ∧ 𝐶
≠ -∞) ∧ ((𝐵
+𝑒 𝐷)
∈ ℝ* ∧ (𝐵 +𝑒 𝐷) ≠ -∞)) → ((𝐴 +𝑒 𝐶) +𝑒 (𝐵 +𝑒 𝐷)) = (𝐴 +𝑒 (𝐶 +𝑒 (𝐵 +𝑒 𝐷)))) |
28 | 7, 1, 24, 26, 27 | syl112anc 1237 |
. 2
⊢ (𝜑 → ((𝐴 +𝑒 𝐶) +𝑒 (𝐵 +𝑒 𝐷)) = (𝐴 +𝑒 (𝐶 +𝑒 (𝐵 +𝑒 𝐷)))) |
29 | 6, 23, 28 | 3eqtr4d 2213 |
1
⊢ (𝜑 → ((𝐴 +𝑒 𝐵) +𝑒 (𝐶 +𝑒 𝐷)) = ((𝐴 +𝑒 𝐶) +𝑒 (𝐵 +𝑒 𝐷))) |