Step | Hyp | Ref
| Expression |
1 | | rexr 10952 |
. . . . . 6
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℝ*) |
2 | 1 | 3ad2ant1 1131 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → 𝐴 ∈
ℝ*) |
3 | | simp3 1136 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → 𝐴 ≤ 𝐵) |
4 | | df-ico 13014 |
. . . . . 6
⊢ [,) =
(𝑥 ∈
ℝ*, 𝑦
∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)}) |
5 | | xrletr 12821 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝑤
∈ ℝ*) → ((𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝑤) → 𝐴 ≤ 𝑤)) |
6 | 4, 4, 5 | ixxss1 13026 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐴 ≤ 𝐵) → (𝐵[,)+∞) ⊆ (𝐴[,)+∞)) |
7 | 2, 3, 6 | syl2anc 583 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (𝐵[,)+∞) ⊆ (𝐴[,)+∞)) |
8 | | imass2 5999 |
. . . 4
⊢ ((𝐵[,)+∞) ⊆ (𝐴[,)+∞) → (𝐹 “ (𝐵[,)+∞)) ⊆ (𝐹 “ (𝐴[,)+∞))) |
9 | | ssrin 4164 |
. . . 4
⊢ ((𝐹 “ (𝐵[,)+∞)) ⊆ (𝐹 “ (𝐴[,)+∞)) → ((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)) |
10 | 7, 8, 9 | 3syl 18 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → ((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)) |
11 | | inss2 4160 |
. . . . . 6
⊢ ((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*)
⊆ ℝ* |
12 | | supxrcl 12978 |
. . . . . 6
⊢ (((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*)
⊆ ℝ* → sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ∈ ℝ*) |
13 | 11, 12 | ax-mp 5 |
. . . . 5
⊢
sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ∈
ℝ* |
14 | | xrleid 12814 |
. . . . 5
⊢
(sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ∈ ℝ*
→ sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < )) |
15 | 13, 14 | ax-mp 5 |
. . . 4
⊢
sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) |
16 | | supxrleub 12989 |
. . . . 5
⊢ ((((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*)
⊆ ℝ* ∧ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ∈ ℝ*) → (sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ))) |
17 | 11, 13, 16 | mp2an 688 |
. . . 4
⊢
(sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < )) |
18 | 15, 17 | mpbi 229 |
. . 3
⊢
∀𝑥 ∈
((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) |
19 | | ssralv 3983 |
. . 3
⊢ (((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*) → (∀𝑥 ∈ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) → ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ))) |
20 | 10, 18, 19 | mpisyl 21 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < )) |
21 | | inss2 4160 |
. . 3
⊢ ((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ℝ* |
22 | | supxrleub 12989 |
. . 3
⊢ ((((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ℝ* ∧ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ∈ ℝ*) → (sup(((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*),
ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ))) |
23 | 21, 13, 22 | mp2an 688 |
. 2
⊢
(sup(((𝐹 “
(𝐵[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < )) |
24 | 20, 23 | sylibr 233 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → sup(((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*),
ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < )) |