Step | Hyp | Ref
| Expression |
1 | | xrlttri3 9733 |
. . 3
⊢ ((𝑓 ∈ ℝ*
∧ 𝑔 ∈
ℝ*) → (𝑓 = 𝑔 ↔ (¬ 𝑓 < 𝑔 ∧ ¬ 𝑔 < 𝑓))) |
2 | 1 | adantl 275 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑓 ∈ ℝ* ∧ 𝑔 ∈ ℝ*))
→ (𝑓 = 𝑔 ↔ (¬ 𝑓 < 𝑔 ∧ ¬ 𝑔 < 𝑓))) |
3 | | rexr 7944 |
. . 3
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℝ*) |
4 | | simp1 987 |
. . . 4
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐴 ∈
ℝ*) |
5 | | simp2 988 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐵 ∈
ℝ*) |
6 | | simp3 989 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐶 ∈
ℝ*) |
7 | | xrmaxcl 11193 |
. . . . 5
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
8 | 5, 6, 7 | syl2anc 409 |
. . . 4
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
9 | 4, 8 | xaddcld 9820 |
. . 3
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
10 | 3, 9 | syl3an1 1261 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
11 | | elpri 3599 |
. . . . 5
⊢ (𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} → (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) |
12 | | simpr 109 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 = (𝐴 +𝑒 𝐵)) |
13 | | xrmax1sup 11194 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
14 | 5, 6, 13 | syl2anc 409 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
15 | | xleadd2a 9810 |
. . . . . . . . 9
⊢ (((𝐵 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ*) ∧ 𝐵 ≤ sup({𝐵, 𝐶}, ℝ*, < )) →
(𝐴 +𝑒
𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
16 | 5, 8, 4, 14, 15 | syl31anc 1231 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
17 | 16 | adantr 274 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → (𝐴 +𝑒 𝐵) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
18 | 12, 17 | eqbrtrd 4004 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
19 | | simpr 109 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 = (𝐴 +𝑒 𝐶)) |
20 | | xrmax2sup 11195 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
21 | 5, 6, 20 | syl2anc 409 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, <
)) |
22 | | xleadd2a 9810 |
. . . . . . . . 9
⊢ (((𝐶 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ*) ∧ 𝐶 ≤ sup({𝐵, 𝐶}, ℝ*, < )) →
(𝐴 +𝑒
𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
23 | 6, 8, 4, 21, 22 | syl31anc 1231 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
24 | 23 | adantr 274 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → (𝐴 +𝑒 𝐶) ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
25 | 19, 24 | eqbrtrd 4004 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
26 | 18, 25 | jaodan 787 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
27 | 11, 26 | sylan2 284 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → 𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
28 | 4, 5 | xaddcld 9820 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐵) ∈
ℝ*) |
29 | 28 | adantr 274 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → (𝐴 +𝑒 𝐵) ∈
ℝ*) |
30 | 12, 29 | eqeltrd 2243 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐵)) → 𝑥 ∈ ℝ*) |
31 | 4, 6 | xaddcld 9820 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) → (𝐴 +𝑒 𝐶) ∈
ℝ*) |
32 | 31 | adantr 274 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → (𝐴 +𝑒 𝐶) ∈
ℝ*) |
33 | 19, 32 | eqeltrd 2243 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 = (𝐴 +𝑒 𝐶)) → 𝑥 ∈ ℝ*) |
34 | 30, 33 | jaodan 787 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ (𝑥 = (𝐴 +𝑒 𝐵) ∨ 𝑥 = (𝐴 +𝑒 𝐶))) → 𝑥 ∈ ℝ*) |
35 | 11, 34 | sylan2 284 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → 𝑥 ∈ ℝ*) |
36 | 9 | adantr 274 |
. . . . 5
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
37 | | xrlenlt 7963 |
. . . . 5
⊢ ((𝑥 ∈ ℝ*
∧ (𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) → (𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔ ¬
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥)) |
38 | 35, 36, 37 | syl2anc 409 |
. . . 4
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → (𝑥 ≤ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔ ¬
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥)) |
39 | 27, 38 | mpbid 146 |
. . 3
⊢ (((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝐶
∈ ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → ¬ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥) |
40 | 3, 39 | syl3anl1 1276 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ 𝑥 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) → ¬ (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) < 𝑥) |
41 | 3 | 3ad2ant1 1008 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → 𝐴 ∈
ℝ*) |
42 | 41 | adantr 274 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐴 ∈
ℝ*) |
43 | 42 | adantr 274 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐴 ∈
ℝ*) |
44 | | simpl2 991 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐵 ∈
ℝ*) |
45 | 44 | adantr 274 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐵 ∈
ℝ*) |
46 | 43, 45 | xaddcld 9820 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐴 +𝑒 𝐵) ∈
ℝ*) |
47 | | prid1g 3680 |
. . . . 5
⊢ ((𝐴 +𝑒 𝐵) ∈ ℝ*
→ (𝐴
+𝑒 𝐵)
∈ {(𝐴
+𝑒 𝐵),
(𝐴 +𝑒
𝐶)}) |
48 | 46, 47 | syl 14 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐴 +𝑒 𝐵) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) |
49 | | simpr 109 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝑥 +𝑒
-𝑒𝐴)
< 𝐵) |
50 | | simprl 521 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝑥 ∈
ℝ*) |
51 | 42 | xnegcld 9791 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴
∈ ℝ*) |
52 | 50, 51 | xaddcld 9820 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) |
53 | 52 | adantr 274 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) |
54 | | simpl1 990 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐴 ∈
ℝ) |
55 | 54 | adantr 274 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝐴 ∈
ℝ) |
56 | | xltadd1 9812 |
. . . . . . 7
⊢ (((𝑥 +𝑒
-𝑒𝐴)
∈ ℝ* ∧ 𝐵 ∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴))) |
57 | 53, 45, 55, 56 | syl3anc 1228 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴))) |
58 | 49, 57 | mpbid 146 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐵
+𝑒 𝐴)) |
59 | | xnpcan 9808 |
. . . . . . 7
⊢ ((𝑥 ∈ ℝ*
∧ 𝐴 ∈ ℝ)
→ ((𝑥
+𝑒 -𝑒𝐴) +𝑒 𝐴) = 𝑥) |
60 | 50, 54, 59 | syl2anc 409 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) |
61 | 60 | adantr 274 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) |
62 | | xaddcom 9797 |
. . . . . 6
⊢ ((𝐵 ∈ ℝ*
∧ 𝐴 ∈
ℝ*) → (𝐵 +𝑒 𝐴) = (𝐴 +𝑒 𝐵)) |
63 | 45, 43, 62 | syl2anc 409 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → (𝐵 +𝑒 𝐴) = (𝐴 +𝑒 𝐵)) |
64 | 58, 61, 63 | 3brtr3d 4013 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → 𝑥 < (𝐴 +𝑒 𝐵)) |
65 | | breq2 3986 |
. . . . 5
⊢ (𝑦 = (𝐴 +𝑒 𝐵) → (𝑥 < 𝑦 ↔ 𝑥 < (𝐴 +𝑒 𝐵))) |
66 | 65 | rspcev 2830 |
. . . 4
⊢ (((𝐴 +𝑒 𝐵) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} ∧ 𝑥 < (𝐴 +𝑒 𝐵)) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
67 | 48, 64, 66 | syl2anc 409 |
. . 3
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐵) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
68 | 54 | adantr 274 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝐴 ∈
ℝ) |
69 | 68, 3 | syl 14 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝐴 ∈
ℝ*) |
70 | | simpl3 992 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝐶 ∈
ℝ*) |
71 | 70 | adantr 274 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝐶 ∈
ℝ*) |
72 | 69, 71 | xaddcld 9820 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐴 +𝑒 𝐶) ∈
ℝ*) |
73 | | prid2g 3681 |
. . . . 5
⊢ ((𝐴 +𝑒 𝐶) ∈ ℝ*
→ (𝐴
+𝑒 𝐶)
∈ {(𝐴
+𝑒 𝐵),
(𝐴 +𝑒
𝐶)}) |
74 | 72, 73 | syl 14 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐴 +𝑒 𝐶) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}) |
75 | | simpr 109 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝑥 +𝑒
-𝑒𝐴)
< 𝐶) |
76 | 52 | adantr 274 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) |
77 | | xltadd1 9812 |
. . . . . . 7
⊢ (((𝑥 +𝑒
-𝑒𝐴)
∈ ℝ* ∧ 𝐶 ∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐶 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐶
+𝑒 𝐴))) |
78 | 76, 71, 68, 77 | syl3anc 1228 |
. . . . . 6
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ((𝑥 +𝑒
-𝑒𝐴)
< 𝐶 ↔ ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐶
+𝑒 𝐴))) |
79 | 75, 78 | mpbid 146 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴)
< (𝐶
+𝑒 𝐴)) |
80 | 60 | adantr 274 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ((𝑥 +𝑒
-𝑒𝐴)
+𝑒 𝐴) =
𝑥) |
81 | | xaddcom 9797 |
. . . . . 6
⊢ ((𝐶 ∈ ℝ*
∧ 𝐴 ∈
ℝ*) → (𝐶 +𝑒 𝐴) = (𝐴 +𝑒 𝐶)) |
82 | 71, 69, 81 | syl2anc 409 |
. . . . 5
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → (𝐶 +𝑒 𝐴) = (𝐴 +𝑒 𝐶)) |
83 | 79, 80, 82 | 3brtr3d 4013 |
. . . 4
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → 𝑥 < (𝐴 +𝑒 𝐶)) |
84 | | breq2 3986 |
. . . . 5
⊢ (𝑦 = (𝐴 +𝑒 𝐶) → (𝑥 < 𝑦 ↔ 𝑥 < (𝐴 +𝑒 𝐶))) |
85 | 84 | rspcev 2830 |
. . . 4
⊢ (((𝐴 +𝑒 𝐶) ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)} ∧ 𝑥 < (𝐴 +𝑒 𝐶)) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
86 | 74, 83, 85 | syl2anc 409 |
. . 3
⊢ ((((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) ∧
(𝑥 +𝑒
-𝑒𝐴)
< 𝐶) → ∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
87 | | simprr 522 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, <
))) |
88 | 10 | adantr 274 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ*) |
89 | | rexneg 9766 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℝ →
-𝑒𝐴 =
-𝐴) |
90 | 89 | 3ad2ant1 1008 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → -𝑒𝐴 = -𝐴) |
91 | 90 | adantr 274 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴 =
-𝐴) |
92 | 54 | renegcld 8278 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝐴 ∈
ℝ) |
93 | 91, 92 | eqeltrd 2243 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
-𝑒𝐴
∈ ℝ) |
94 | | xltadd1 9812 |
. . . . . . . 8
⊢ ((𝑥 ∈ ℝ*
∧ (𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ∈
ℝ* ∧ -𝑒𝐴 ∈ ℝ) → (𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔
(𝑥 +𝑒
-𝑒𝐴)
< ((𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴))) |
95 | 50, 88, 93, 94 | syl3anc 1228 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) ↔
(𝑥 +𝑒
-𝑒𝐴)
< ((𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴))) |
96 | 87, 95 | mpbid 146 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< ((𝐴
+𝑒 sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴)) |
97 | 3, 8 | syl3an1 1261 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
98 | 97 | adantr 274 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
sup({𝐵, 𝐶}, ℝ*, < ) ∈
ℝ*) |
99 | | xaddcom 9797 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℝ*
∧ sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ*) → (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )) =
(sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)) |
100 | 42, 98, 99 | syl2anc 409 |
. . . . . . 7
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < )) =
(sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)) |
101 | 100 | oveq1d 5857 |
. . . . . 6
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, < ))
+𝑒 -𝑒𝐴) = ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴)) |
102 | 96, 101 | breqtrd 4008 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴)) |
103 | | xpncan 9807 |
. . . . . 6
⊢
((sup({𝐵, 𝐶}, ℝ*, < )
∈ ℝ* ∧ 𝐴 ∈ ℝ) → ((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴) = sup({𝐵, 𝐶}, ℝ*, <
)) |
104 | 98, 54, 103 | syl2anc 409 |
. . . . 5
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((sup({𝐵, 𝐶}, ℝ*, < )
+𝑒 𝐴)
+𝑒 -𝑒𝐴) = sup({𝐵, 𝐶}, ℝ*, <
)) |
105 | 102, 104 | breqtrd 4008 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
(𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, <
)) |
106 | | xrltmaxsup 11198 |
. . . . 5
⊢ ((𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ* ∧ (𝑥 +𝑒
-𝑒𝐴)
∈ ℝ*) → ((𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, < )
↔ ((𝑥
+𝑒 -𝑒𝐴) < 𝐵 ∨ (𝑥 +𝑒
-𝑒𝐴)
< 𝐶))) |
107 | 44, 70, 52, 106 | syl3anc 1228 |
. . . 4
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
< sup({𝐵, 𝐶}, ℝ*, < )
↔ ((𝑥
+𝑒 -𝑒𝐴) < 𝐵 ∨ (𝑥 +𝑒
-𝑒𝐴)
< 𝐶))) |
108 | 105, 107 | mpbid 146 |
. . 3
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
((𝑥 +𝑒
-𝑒𝐴)
< 𝐵 ∨ (𝑥 +𝑒
-𝑒𝐴)
< 𝐶)) |
109 | 67, 86, 108 | mpjaodan 788 |
. 2
⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) ∧ (𝑥 ∈ ℝ* ∧ 𝑥 < (𝐴 +𝑒 sup({𝐵, 𝐶}, ℝ*, < )))) →
∃𝑦 ∈ {(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}𝑥 < 𝑦) |
110 | 2, 10, 40, 109 | eqsuptid 6962 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ*
∧ 𝐶 ∈
ℝ*) → sup({(𝐴 +𝑒 𝐵), (𝐴 +𝑒 𝐶)}, ℝ*, < ) = (𝐴 +𝑒
sup({𝐵, 𝐶}, ℝ*, <
))) |