| Step | Hyp | Ref
| Expression |
| 1 | | xrlttri3 9889 |
. . 3
⊢ ((𝑓 ∈ ℝ*
∧ 𝑔 ∈
ℝ*) → (𝑓 = 𝑔 ↔ (¬ 𝑓 < 𝑔 ∧ ¬ 𝑔 < 𝑓))) |
| 2 | 1 | adantl 277 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑓 ∈ ℝ* ∧ 𝑔 ∈ ℝ*))
→ (𝑓 = 𝑔 ↔ (¬ 𝑓 < 𝑔 ∧ ¬ 𝑔 < 𝑓))) |
| 3 | | rexr 8089 |
. . 3
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℝ*) |
| 4 | | simp1 999 |
. . . 4
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐴 ∈
ℝ*) |
| 5 | | simp2 1000 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐵 ∈
ℝ*) |
| 6 | | simp3 1001 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐶 ∈
ℝ*) |
| 7 | | xrmaxcl 11434 |
. . . . 5
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
| 8 | 5, 6, 7 | syl2anc 411 |
. . . 4
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
| 9 | 4, 8 | xaddcld 9976 |
. . 3
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
| 10 | 3, 9 | syl3an1 1282 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
| 11 | | elpri 3646 |
. . . . 5
⊢ (𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} → (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) |
| 12 | | simpr 110 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 = (𝐴 +𝑒 𝐵)) |
| 13 | | xrmax1sup 11435 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
| 14 | 5, 6, 13 | syl2anc 411 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
| 15 | | xleadd2a 9966 |
. . . . . . . . 9
⊢ (((𝐵 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ*) ∧ 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, < )) →
(𝐴 +𝑒
𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 16 | 5, 8, 4, 14, 15 | syl31anc 1252 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 17 | 16 | adantr 276 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → (𝐴 +𝑒 𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 18 | 12, 17 | eqbrtrd 4056 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 19 | | simpr 110 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 = (𝐴 +𝑒 𝐶)) |
| 20 | | xrmax2sup 11436 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
| 21 | 5, 6, 20 | syl2anc 411 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
| 22 | | xleadd2a 9966 |
. . . . . . . . 9
⊢ (((𝐶 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ*) ∧ 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, < )) →
(𝐴 +𝑒
𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 23 | 6, 8, 4, 21, 22 | syl31anc 1252 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 24 | 23 | adantr 276 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → (𝐴 +𝑒 𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 25 | 19, 24 | eqbrtrd 4056 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 26 | 18, 25 | jaodan 798 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 27 | 11, 26 | sylan2 286 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 28 | 4, 5 | xaddcld 9976 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐵) ∈
ℝ*) |
| 29 | 28 | adantr 276 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → (𝐴 +𝑒 𝐵) ∈
ℝ*) |
| 30 | 12, 29 | eqeltrd 2273 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 ∈ ℝ*) |
| 31 | 4, 6 | xaddcld 9976 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐶) ∈
ℝ*) |
| 32 | 31 | adantr 276 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → (𝐴 +𝑒 𝐶) ∈
ℝ*) |
| 33 | 19, 32 | eqeltrd 2273 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 ∈ ℝ*) |
| 34 | 30, 33 | jaodan 798 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) → 𝑥 ∈ ℝ*) |
| 35 | 11, 34 | sylan2 286 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → 𝑥 ∈ ℝ*) |
| 36 | 9 | adantr 276 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
| 37 | | xrlenlt 8108 |
. . . . 5
⊢ ((𝑥 ∈ ℝ*
∧ (𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) → (𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔ ¬
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥)) |
| 38 | 35, 36, 37 | syl2anc 411 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → (𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔ ¬
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥)) |
| 39 | 27, 38 | mpbid 147 |
. . 3
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → ¬ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥) |
| 40 | 3, 39 | syl3anl1 1297 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → ¬ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥) |
| 41 | 3 | 3ad2ant1 1020 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐴 ∈
ℝ*) |
| 42 | 41 | adantr 276 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐴 ∈
ℝ*) |
| 43 | 42 | adantr 276 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐴 ∈
ℝ*) |
| 44 | | simpl2 1003 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐵 ∈
ℝ*) |
| 45 | 44 | adantr 276 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐵 ∈
ℝ*) |
| 46 | 43, 45 | xaddcld 9976 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐴 +𝑒 𝐵) ∈
ℝ*) |
| 47 | | prid1g 3727 |
. . . . 5
⊢ ((𝐴 +𝑒 𝐵) ∈ ℝ*
→ (𝐴
+𝑒 𝐵)
∈ {(𝐴
+𝑒 𝐵),
(𝐴 +𝑒
𝐶)}) |
| 48 | 46, 47 | syl 14 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐴 +𝑒 𝐵) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) |
| 49 | | simpr 110 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝑥 +𝑒
-𝑒𝐴)
< 𝐵) |
| 50 | | simprl 529 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝑥 ∈
ℝ*) |
| 51 | 42 | xnegcld 9947 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴
∈ ℝ*) |
| 52 | 50, 51 | xaddcld 9976 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) |
| 53 | 52 | adantr 276 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) |
| 54 | | simpl1 1002 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐴 ∈
ℝ) |
| 55 | 54 | adantr 276 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐴 ∈
ℝ) |
| 56 | | xltadd1 9968 |
. . . . . . 7
⊢ (((𝑥 +𝑒
-𝑒𝐴)
∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴))) |
| 57 | 53, 45, 55, 56 | syl3anc 1249 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴))) |
| 58 | 49, 57 | mpbid 147 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴)) |
| 59 | | xnpcan 9964 |
. . . . . . 7
⊢ ((𝑥 ∈ ℝ*
∧ 𝐴 ∈ ℝ)
→ ((𝑥
+𝑒 -𝑒𝐴) +𝑒 𝐴) = 𝑥) |
| 60 | 50, 54, 59 | syl2anc 411 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) |
| 61 | 60 | adantr 276 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) |
| 62 | | xaddcom 9953 |
. . . . . 6
⊢ ((𝐵 ∈ ℝ*
∧ 𝐴 ∈
ℝ*) → (𝐵 +𝑒 𝐴) = (𝐴 +𝑒 𝐵)) |
| 63 | 45, 43, 62 | syl2anc 411 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐵 +𝑒 𝐴) = (𝐴 +𝑒 𝐵)) |
| 64 | 58, 61, 63 | 3brtr3d 4065 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝑥 < (𝐴 +𝑒 𝐵)) |
| 65 | | breq2 4038 |
. . . . 5
⊢ (𝑦 = (𝐴 +𝑒 𝐵) → (𝑥 < 𝑦 ↔ 𝑥 < (𝐴 +𝑒 𝐵))) |
| 66 | 65 | rspcev 2868 |
. . . 4
⊢ (((𝐴 +𝑒 𝐵) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} ∧ 𝑥 < (𝐴 +𝑒 𝐵)) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
| 67 | 48, 64, 66 | syl2anc 411 |
. . 3
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
| 68 | 54 | adantr 276 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝐴 ∈
ℝ) |
| 69 | 68, 3 | syl 14 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝐴 ∈
ℝ*) |
| 70 | | simpl3 1004 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐶 ∈
ℝ*) |
| 71 | 70 | adantr 276 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝐶 ∈
ℝ*) |
| 72 | 69, 71 | xaddcld 9976 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐴 +𝑒 𝐶) ∈
ℝ*) |
| 73 | | prid2g 3728 |
. . . . 5
⊢ ((𝐴 +𝑒 𝐶) ∈ ℝ*
→ (𝐴
+𝑒 𝐶)
∈ {(𝐴
+𝑒 𝐵),
(𝐴 +𝑒
𝐶)}) |
| 74 | 72, 73 | syl 14 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐴 +𝑒 𝐶) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) |
| 75 | | simpr 110 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝑥 +𝑒
-𝑒𝐴)
< 𝐶) |
| 76 | 52 | adantr 276 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) |
| 77 | | xltadd1 9968 |
. . . . . . 7
⊢ (((𝑥 +𝑒
-𝑒𝐴)
∈ ℝ* ∧ 𝐶 ∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐶 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐶
+𝑒 𝐴))) |
| 78 | 76, 71, 68, 77 | syl3anc 1249 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐶 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐶
+𝑒 𝐴))) |
| 79 | 75, 78 | mpbid 147 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐶
+𝑒 𝐴)) |
| 80 | 60 | adantr 276 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) |
| 81 | | xaddcom 9953 |
. . . . . 6
⊢ ((𝐶 ∈ ℝ*
∧ 𝐴 ∈
ℝ*) → (𝐶 +𝑒 𝐴) = (𝐴 +𝑒 𝐶)) |
| 82 | 71, 69, 81 | syl2anc 411 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐶 +𝑒 𝐴) = (𝐴 +𝑒 𝐶)) |
| 83 | 79, 80, 82 | 3brtr3d 4065 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝑥 < (𝐴 +𝑒 𝐶)) |
| 84 | | breq2 4038 |
. . . . 5
⊢ (𝑦 = (𝐴 +𝑒 𝐶) → (𝑥 < 𝑦 ↔ 𝑥 < (𝐴 +𝑒 𝐶))) |
| 85 | 84 | rspcev 2868 |
. . . 4
⊢ (((𝐴 +𝑒 𝐶) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} ∧ 𝑥 < (𝐴 +𝑒 𝐶)) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
| 86 | 74, 83, 85 | syl2anc 411 |
. . 3
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
| 87 | | simprr 531 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
| 88 | 10 | adantr 276 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
| 89 | | rexneg 9922 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℝ →
-𝑒𝐴 =
-𝐴) |
| 90 | 89 | 3ad2ant1 1020 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → -𝑒𝐴 = -𝐴) |
| 91 | 90 | adantr 276 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴 =
-𝐴) |
| 92 | 54 | renegcld 8423 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝐴 ∈
ℝ) |
| 93 | 91, 92 | eqeltrd 2273 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴
∈ ℝ) |
| 94 | | xltadd1 9968 |
. . . . . . . 8
⊢ ((𝑥 ∈ ℝ*
∧ (𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ* ∧ -𝑒𝐴 ∈ ℝ) → (𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔
(𝑥 +𝑒
-𝑒𝐴)
< ((𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴))) |
| 95 | 50, 88, 93, 94 | syl3anc 1249 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔
(𝑥 +𝑒
-𝑒𝐴)
< ((𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴))) |
| 96 | 87, 95 | mpbid 147 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< ((𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴)) |
| 97 | 3, 8 | syl3an1 1282 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
| 98 | 97 | adantr 276 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
| 99 | | xaddcom 9953 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) =
(sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)) |
| 100 | 42, 98, 99 | syl2anc 411 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) =
(sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)) |
| 101 | 100 | oveq1d 5940 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴) = ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴)) |
| 102 | 96, 101 | breqtrd 4060 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴)) |
| 103 | | xpncan 9963 |
. . . . . 6
⊢
((sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴) = sup({𝐵, 𝐶}, ℝ*, <
)) |
| 104 | 98, 54, 103 | syl2anc 411 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴) = sup({𝐵, 𝐶}, ℝ*, <
)) |
| 105 | 102, 104 | breqtrd 4060 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, <
)) |
| 106 | | xrltmaxsup 11439 |
. . . . 5
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ* ∧ (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) → ((𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, < )
↔ ((𝑥
+𝑒 -𝑒𝐴) < 𝐵 ∨ (𝑥 +𝑒
-𝑒𝐴)
< 𝐶))) |
| 107 | 44, 70, 52, 106 | syl3anc 1249 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, < )
↔ ((𝑥
+𝑒 -𝑒𝐴) < 𝐵 ∨ (𝑥 +𝑒
-𝑒𝐴)
< 𝐶))) |
| 108 | 105, 107 | mpbid 147 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ∨ (𝑥 +𝑒
-𝑒𝐴)
< 𝐶)) |
| 109 | 67, 86, 108 | mpjaodan 799 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
| 110 | 2, 10, 40, 109 | eqsuptid 7072 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}, ℝ*, < ) = (𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, <
))) |