| Step | Hyp | Ref
| Expression |
| 1 | | rexr 11290 |
. . . . . 6
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℝ*) |
| 2 | 1 | 3ad2ant1 1133 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → 𝐴 ∈
ℝ*) |
| 3 | | simp3 1138 |
. . . . 5
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → 𝐴 ≤ 𝐵) |
| 4 | | df-ico 13376 |
. . . . . 6
⊢ [,) =
(𝑥 ∈
ℝ*, 𝑦
∈ ℝ* ↦ {𝑧 ∈ ℝ* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)}) |
| 5 | | xrletr 13183 |
. . . . . 6
⊢ ((𝐴 ∈ ℝ*
∧ 𝐵 ∈
ℝ* ∧ 𝑤
∈ ℝ*) → ((𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝑤) → 𝐴 ≤ 𝑤)) |
| 6 | 4, 4, 5 | ixxss1 13388 |
. . . . 5
⊢ ((𝐴 ∈ ℝ*
∧ 𝐴 ≤ 𝐵) → (𝐵[,)+∞) ⊆ (𝐴[,)+∞)) |
| 7 | 2, 3, 6 | syl2anc 584 |
. . . 4
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (𝐵[,)+∞) ⊆ (𝐴[,)+∞)) |
| 8 | | imass2 6102 |
. . . 4
⊢ ((𝐵[,)+∞) ⊆ (𝐴[,)+∞) → (𝐹 “ (𝐵[,)+∞)) ⊆ (𝐹 “ (𝐴[,)+∞))) |
| 9 | | ssrin 4224 |
. . . 4
⊢ ((𝐹 “ (𝐵[,)+∞)) ⊆ (𝐹 “ (𝐴[,)+∞)) → ((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)) |
| 10 | 7, 8, 9 | 3syl 18 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → ((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)) |
| 11 | | inss2 4220 |
. . . . . 6
⊢ ((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*)
⊆ ℝ* |
| 12 | | supxrcl 13340 |
. . . . . 6
⊢ (((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*)
⊆ ℝ* → sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ∈ ℝ*) |
| 13 | 11, 12 | ax-mp 5 |
. . . . 5
⊢
sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ∈
ℝ* |
| 14 | | xrleid 13176 |
. . . . 5
⊢
(sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ∈ ℝ*
→ sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < )) |
| 15 | 13, 14 | ax-mp 5 |
. . . 4
⊢
sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) |
| 16 | | supxrleub 13351 |
. . . . 5
⊢ ((((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*)
⊆ ℝ* ∧ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ∈ ℝ*) → (sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ))) |
| 17 | 11, 13, 16 | mp2an 692 |
. . . 4
⊢
(sup(((𝐹 “
(𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < )) |
| 18 | 15, 17 | mpbi 230 |
. . 3
⊢
∀𝑥 ∈
((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) |
| 19 | | ssralv 4034 |
. . 3
⊢ (((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*) → (∀𝑥 ∈ ((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ) → ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ))) |
| 20 | 10, 18, 19 | mpisyl 21 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < )) |
| 21 | | inss2 4220 |
. . 3
⊢ ((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ℝ* |
| 22 | | supxrleub 13351 |
. . 3
⊢ ((((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*)
⊆ ℝ* ∧ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ∈ ℝ*) → (sup(((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*),
ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < ))) |
| 23 | 21, 13, 22 | mp2an 692 |
. 2
⊢
(sup(((𝐹 “
(𝐵[,)+∞)) ∩
ℝ*), ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < ) ↔ ∀𝑥 ∈ ((𝐹 “ (𝐵[,)+∞)) ∩
ℝ*)𝑥 ≤
sup(((𝐹 “ (𝐴[,)+∞)) ∩
ℝ*), ℝ*, < )) |
| 24 | 20, 23 | sylibr 234 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → sup(((𝐹 “ (𝐵[,)+∞)) ∩ ℝ*),
ℝ*, < ) ≤ sup(((𝐹 “ (𝐴[,)+∞)) ∩ ℝ*),
ℝ*, < )) |