Proof of Theorem xlesubadd
Step | Hyp | Ref
| Expression |
1 | | simpl1 990 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐴 ∈
ℝ*) |
2 | | simpl2 991 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐵 ∈
ℝ*) |
3 | 2 | xnegcld 9791 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) →
-𝑒𝐵
∈ ℝ*) |
4 | | xaddcl 9796 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ*
∧ -𝑒𝐵 ∈ ℝ*) → (𝐴 +𝑒
-𝑒𝐵)
∈ ℝ*) |
5 | 1, 3, 4 | syl2anc 409 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐴 +𝑒
-𝑒𝐵)
∈ ℝ*) |
6 | 5 | adantr 274 |
. . . 4
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → (𝐴 +𝑒
-𝑒𝐵)
∈ ℝ*) |
7 | | simpll3 1028 |
. . . 4
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → 𝐶 ∈
ℝ*) |
8 | | simpr 109 |
. . . 4
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → 𝐵 ∈ ℝ) |
9 | | xleadd1 9811 |
. . . 4
⊢ (((𝐴 +𝑒
-𝑒𝐵)
∈ ℝ* ∧ 𝐶 ∈ ℝ* ∧ 𝐵 ∈ ℝ) → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ ((𝐴 +𝑒
-𝑒𝐵)
+𝑒 𝐵)
≤ (𝐶
+𝑒 𝐵))) |
10 | 6, 7, 8, 9 | syl3anc 1228 |
. . 3
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ ((𝐴 +𝑒
-𝑒𝐵)
+𝑒 𝐵)
≤ (𝐶
+𝑒 𝐵))) |
11 | | xnpcan 9808 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈ ℝ)
→ ((𝐴
+𝑒 -𝑒𝐵) +𝑒 𝐵) = 𝐴) |
12 | 1, 11 | sylan 281 |
. . . 4
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → ((𝐴 +𝑒
-𝑒𝐵)
+𝑒 𝐵) =
𝐴) |
13 | 12 | breq1d 3992 |
. . 3
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → (((𝐴 +𝑒
-𝑒𝐵)
+𝑒 𝐵)
≤ (𝐶
+𝑒 𝐵)
↔ 𝐴 ≤ (𝐶 +𝑒 𝐵))) |
14 | 10, 13 | bitrd 187 |
. 2
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 ∈ ℝ) → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒 𝐵))) |
15 | | simpr3 995 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 0 ≤ 𝐶) |
16 | | oveq1 5849 |
. . . . . . . . 9
⊢ (𝐴 = +∞ → (𝐴 +𝑒 -∞)
= (+∞ +𝑒 -∞)) |
17 | | pnfaddmnf 9786 |
. . . . . . . . 9
⊢ (+∞
+𝑒 -∞) = 0 |
18 | 16, 17 | eqtrdi 2215 |
. . . . . . . 8
⊢ (𝐴 = +∞ → (𝐴 +𝑒 -∞)
= 0) |
19 | 18 | breq1d 3992 |
. . . . . . 7
⊢ (𝐴 = +∞ → ((𝐴 +𝑒 -∞)
≤ 𝐶 ↔ 0 ≤ 𝐶)) |
20 | 15, 19 | syl5ibrcom 156 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐴 = +∞ → (𝐴 +𝑒 -∞) ≤ 𝐶)) |
21 | | xaddmnf1 9784 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐴 ≠ +∞)
→ (𝐴
+𝑒 -∞) = -∞) |
22 | 21 | ex 114 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ*
→ (𝐴 ≠ +∞
→ (𝐴
+𝑒 -∞) = -∞)) |
23 | 1, 22 | syl 14 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐴 ≠ +∞ → (𝐴 +𝑒 -∞) =
-∞)) |
24 | | simpl3 992 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐶 ∈
ℝ*) |
25 | | mnfle 9728 |
. . . . . . . . 9
⊢ (𝐶 ∈ ℝ*
→ -∞ ≤ 𝐶) |
26 | 24, 25 | syl 14 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → -∞ ≤ 𝐶) |
27 | | breq1 3985 |
. . . . . . . 8
⊢ ((𝐴 +𝑒 -∞)
= -∞ → ((𝐴
+𝑒 -∞) ≤ 𝐶 ↔ -∞ ≤ 𝐶)) |
28 | 26, 27 | syl5ibrcom 156 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → ((𝐴 +𝑒 -∞) = -∞
→ (𝐴
+𝑒 -∞) ≤ 𝐶)) |
29 | 23, 28 | syld 45 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐴 ≠ +∞ → (𝐴 +𝑒 -∞) ≤ 𝐶)) |
30 | | xrpnfdc 9778 |
. . . . . . . 8
⊢ (𝐴 ∈ ℝ*
→ DECID 𝐴 = +∞) |
31 | | dcne 2347 |
. . . . . . . 8
⊢
(DECID 𝐴 = +∞ ↔ (𝐴 = +∞ ∨ 𝐴 ≠ +∞)) |
32 | 30, 31 | sylib 121 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ*
→ (𝐴 = +∞ ∨
𝐴 ≠
+∞)) |
33 | 1, 32 | syl 14 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐴 = +∞ ∨ 𝐴 ≠ +∞)) |
34 | 20, 29, 33 | mpjaod 708 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐴 +𝑒 -∞) ≤ 𝐶) |
35 | | pnfge 9725 |
. . . . . . 7
⊢ (𝐴 ∈ ℝ*
→ 𝐴 ≤
+∞) |
36 | 1, 35 | syl 14 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐴 ≤ +∞) |
37 | | ge0nemnf 9760 |
. . . . . . . 8
⊢ ((𝐶 ∈ ℝ*
∧ 0 ≤ 𝐶) →
𝐶 ≠
-∞) |
38 | 24, 15, 37 | syl2anc 409 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐶 ≠ -∞) |
39 | | xaddpnf1 9782 |
. . . . . . 7
⊢ ((𝐶 ∈ ℝ*
∧ 𝐶 ≠ -∞)
→ (𝐶
+𝑒 +∞) = +∞) |
40 | 24, 38, 39 | syl2anc 409 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐶 +𝑒 +∞) =
+∞) |
41 | 36, 40 | breqtrrd 4010 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐴 ≤ (𝐶 +𝑒
+∞)) |
42 | 34, 41 | 2thd 174 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → ((𝐴 +𝑒 -∞) ≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒
+∞))) |
43 | | xnegeq 9763 |
. . . . . . . 8
⊢ (𝐵 = +∞ →
-𝑒𝐵 =
-𝑒+∞) |
44 | | xnegpnf 9764 |
. . . . . . . 8
⊢
-𝑒+∞ = -∞ |
45 | 43, 44 | eqtrdi 2215 |
. . . . . . 7
⊢ (𝐵 = +∞ →
-𝑒𝐵 =
-∞) |
46 | 45 | oveq2d 5858 |
. . . . . 6
⊢ (𝐵 = +∞ → (𝐴 +𝑒
-𝑒𝐵) =
(𝐴 +𝑒
-∞)) |
47 | 46 | breq1d 3992 |
. . . . 5
⊢ (𝐵 = +∞ → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ (𝐴 +𝑒 -∞)
≤ 𝐶)) |
48 | | oveq2 5850 |
. . . . . 6
⊢ (𝐵 = +∞ → (𝐶 +𝑒 𝐵) = (𝐶 +𝑒
+∞)) |
49 | 48 | breq2d 3994 |
. . . . 5
⊢ (𝐵 = +∞ → (𝐴 ≤ (𝐶 +𝑒 𝐵) ↔ 𝐴 ≤ (𝐶 +𝑒
+∞))) |
50 | 47, 49 | bibi12d 234 |
. . . 4
⊢ (𝐵 = +∞ → (((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒 𝐵)) ↔ ((𝐴 +𝑒 -∞) ≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒
+∞)))) |
51 | 42, 50 | syl5ibrcom 156 |
. . 3
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐵 = +∞ → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒 𝐵)))) |
52 | 51 | imp 123 |
. 2
⊢ ((((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) ∧ 𝐵 = +∞) → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒 𝐵))) |
53 | | simpr2 994 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → 𝐵 ≠ -∞) |
54 | 2, 53 | jca 304 |
. . 3
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐵 ∈ ℝ* ∧ 𝐵 ≠
-∞)) |
55 | | xrnemnf 9713 |
. . 3
⊢ ((𝐵 ∈ ℝ*
∧ 𝐵 ≠ -∞)
↔ (𝐵 ∈ ℝ
∨ 𝐵 =
+∞)) |
56 | 54, 55 | sylib 121 |
. 2
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → (𝐵 ∈ ℝ ∨ 𝐵 = +∞)) |
57 | 14, 52, 56 | mpjaodan 788 |
1
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (0 ≤ 𝐴 ∧ 𝐵 ≠ -∞ ∧ 0 ≤ 𝐶)) → ((𝐴 +𝑒
-𝑒𝐵)
≤ 𝐶 ↔ 𝐴 ≤ (𝐶 +𝑒 𝐵))) |