| Step | Hyp | Ref
 | Expression | 
| 1 |   | xrlttri3 9872 | 
. . 3
⊢ ((𝑓 ∈ ℝ*
∧ 𝑔 ∈
ℝ*) → (𝑓 = 𝑔 ↔ (¬ 𝑓 < 𝑔 ∧ ¬ 𝑔 < 𝑓))) | 
| 2 | 1 | adantl 277 | 
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑓 ∈ ℝ* ∧ 𝑔 ∈ ℝ*))
→ (𝑓 = 𝑔 ↔ (¬ 𝑓 < 𝑔 ∧ ¬ 𝑔 < 𝑓))) | 
| 3 |   | rexr 8072 | 
. . 3
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℝ*) | 
| 4 |   | simp1 999 | 
. . . 4
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐴 ∈
ℝ*) | 
| 5 |   | simp2 1000 | 
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐵 ∈
ℝ*) | 
| 6 |   | simp3 1001 | 
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐶 ∈
ℝ*) | 
| 7 |   | xrmaxcl 11417 | 
. . . . 5
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) | 
| 8 | 5, 6, 7 | syl2anc 411 | 
. . . 4
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) | 
| 9 | 4, 8 | xaddcld 9959 | 
. . 3
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) | 
| 10 | 3, 9 | syl3an1 1282 | 
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) | 
| 11 |   | elpri 3645 | 
. . . . 5
⊢ (𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} → (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) | 
| 12 |   | simpr 110 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 = (𝐴 +𝑒 𝐵)) | 
| 13 |   | xrmax1sup 11418 | 
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 14 | 5, 6, 13 | syl2anc 411 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 15 |   | xleadd2a 9949 | 
. . . . . . . . 9
⊢ (((𝐵 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ*) ∧ 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, < )) →
(𝐴 +𝑒
𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 16 | 5, 8, 4, 14, 15 | syl31anc 1252 | 
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 17 | 16 | adantr 276 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → (𝐴 +𝑒 𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 18 | 12, 17 | eqbrtrd 4055 | 
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 19 |   | simpr 110 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 = (𝐴 +𝑒 𝐶)) | 
| 20 |   | xrmax2sup 11419 | 
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 21 | 5, 6, 20 | syl2anc 411 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 22 |   | xleadd2a 9949 | 
. . . . . . . . 9
⊢ (((𝐶 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ*) ∧ 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, < )) →
(𝐴 +𝑒
𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 23 | 6, 8, 4, 21, 22 | syl31anc 1252 | 
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 24 | 23 | adantr 276 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → (𝐴 +𝑒 𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 25 | 19, 24 | eqbrtrd 4055 | 
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 26 | 18, 25 | jaodan 798 | 
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 27 | 11, 26 | sylan2 286 | 
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) | 
| 28 | 4, 5 | xaddcld 9959 | 
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐵) ∈
ℝ*) | 
| 29 | 28 | adantr 276 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → (𝐴 +𝑒 𝐵) ∈
ℝ*) | 
| 30 | 12, 29 | eqeltrd 2273 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 ∈ ℝ*) | 
| 31 | 4, 6 | xaddcld 9959 | 
. . . . . . . . 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 8091 | 
. . . . 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 9959 | 
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐴 +𝑒 𝐵) ∈
ℝ*) | 
| 47 |   | prid1g 3726 | 
. . . . 5
⊢ ((𝐴 +𝑒 𝐵) ∈ ℝ*
→ (𝐴
+𝑒 𝐵)
∈ {(𝐴
+𝑒 𝐵),
(𝐴 +𝑒
𝐶)}) | 
| 48 | 46, 47 | syl 14 | 
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐴 +𝑒 𝐵) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) | 
| 49 |   | simpr 110 | 
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝑥 +𝑒
-𝑒𝐴)
< 𝐵) | 
| 50 |   | simprl 529 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝑥 ∈
ℝ*) | 
| 51 | 42 | xnegcld 9930 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴
∈ ℝ*) | 
| 52 | 50, 51 | xaddcld 9959 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) | 
| 53 | 52 | adantr 276 | 
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) | 
| 54 |   | simpl1 1002 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐴 ∈
ℝ) | 
| 55 | 54 | adantr 276 | 
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐴 ∈
ℝ) | 
| 56 |   | xltadd1 9951 | 
. . . . . . 7
⊢ (((𝑥 +𝑒
-𝑒𝐴)
∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴))) | 
| 57 | 53, 45, 55, 56 | syl3anc 1249 | 
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴))) | 
| 58 | 49, 57 | mpbid 147 | 
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴)) | 
| 59 |   | xnpcan 9947 | 
. . . . . . 7
⊢ ((𝑥 ∈ ℝ*
∧ 𝐴 ∈ ℝ)
→ ((𝑥
+𝑒 -𝑒𝐴) +𝑒 𝐴) = 𝑥) | 
| 60 | 50, 54, 59 | syl2anc 411 | 
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) | 
| 61 | 60 | adantr 276 | 
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) | 
| 62 |   | xaddcom 9936 | 
. . . . . 6
⊢ ((𝐵 ∈ ℝ*
∧ 𝐴 ∈
ℝ*) → (𝐵 +𝑒 𝐴) = (𝐴 +𝑒 𝐵)) | 
| 63 | 45, 43, 62 | syl2anc 411 | 
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐵 +𝑒 𝐴) = (𝐴 +𝑒 𝐵)) | 
| 64 | 58, 61, 63 | 3brtr3d 4064 | 
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝑥 < (𝐴 +𝑒 𝐵)) | 
| 65 |   | breq2 4037 | 
. . . . 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 9959 | 
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐴 +𝑒 𝐶) ∈
ℝ*) | 
| 73 |   | prid2g 3727 | 
. . . . 5
⊢ ((𝐴 +𝑒 𝐶) ∈ ℝ*
→ (𝐴
+𝑒 𝐶)
∈ {(𝐴
+𝑒 𝐵),
(𝐴 +𝑒
𝐶)}) | 
| 74 | 72, 73 | syl 14 | 
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐴 +𝑒 𝐶) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) | 
| 75 |   | simpr 110 | 
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝑥 +𝑒
-𝑒𝐴)
< 𝐶) | 
| 76 | 52 | adantr 276 | 
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) | 
| 77 |   | xltadd1 9951 | 
. . . . . . 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 9936 | 
. . . . . 6
⊢ ((𝐶 ∈ ℝ*
∧ 𝐴 ∈
ℝ*) → (𝐶 +𝑒 𝐴) = (𝐴 +𝑒 𝐶)) | 
| 82 | 71, 69, 81 | syl2anc 411 | 
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐶 +𝑒 𝐴) = (𝐴 +𝑒 𝐶)) | 
| 83 | 79, 80, 82 | 3brtr3d 4064 | 
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝑥 < (𝐴 +𝑒 𝐶)) | 
| 84 |   | breq2 4037 | 
. . . . 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 9905 | 
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℝ →
-𝑒𝐴 =
-𝐴) | 
| 90 | 89 | 3ad2ant1 1020 | 
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → -𝑒𝐴 = -𝐴) | 
| 91 | 90 | adantr 276 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴 =
-𝐴) | 
| 92 | 54 | renegcld 8406 | 
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝐴 ∈
ℝ) | 
| 93 | 91, 92 | eqeltrd 2273 | 
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴
∈ ℝ) | 
| 94 |   | xltadd1 9951 | 
. . . . . . . 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 9936 | 
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) =
(sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)) | 
| 100 | 42, 98, 99 | syl2anc 411 | 
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) =
(sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)) | 
| 101 | 100 | oveq1d 5937 | 
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴) = ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴)) | 
| 102 | 96, 101 | breqtrd 4059 | 
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴)) | 
| 103 |   | xpncan 9946 | 
. . . . . 6
⊢
((sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴) = sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 104 | 98, 54, 103 | syl2anc 411 | 
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴) = sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 105 | 102, 104 | breqtrd 4059 | 
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, <
)) | 
| 106 |   | xrltmaxsup 11422 | 
. . . . 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 7063 | 
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}, ℝ*, < ) = (𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, <
))) |