Step | Hyp | Ref
| Expression |
1 | | ressxr 10950 |
. . . . 5
⊢ ℝ
⊆ ℝ* |
2 | | sstr 3925 |
. . . . 5
⊢ ((𝐴 ⊆ ℝ ∧ ℝ
⊆ ℝ*) → 𝐴 ⊆
ℝ*) |
3 | 1, 2 | mpan2 687 |
. . . 4
⊢ (𝐴 ⊆ ℝ → 𝐴 ⊆
ℝ*) |
4 | | supxrcl 12978 |
. . . . . . 7
⊢ (𝐴 ⊆ ℝ*
→ sup(𝐴,
ℝ*, < ) ∈ ℝ*) |
5 | | pnfxr 10960 |
. . . . . . . . . 10
⊢ +∞
∈ ℝ* |
6 | | xrltne 12826 |
. . . . . . . . . 10
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ* ∧ +∞ ∈
ℝ* ∧ sup(𝐴, ℝ*, < ) < +∞)
→ +∞ ≠ sup(𝐴,
ℝ*, < )) |
7 | 5, 6 | mp3an2 1447 |
. . . . . . . . 9
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ* ∧ sup(𝐴, ℝ*, < )
< +∞) → +∞ ≠ sup(𝐴, ℝ*, <
)) |
8 | 7 | necomd 2998 |
. . . . . . . 8
⊢
((sup(𝐴,
ℝ*, < ) ∈ ℝ* ∧ sup(𝐴, ℝ*, < )
< +∞) → sup(𝐴, ℝ*, < ) ≠
+∞) |
9 | 8 | ex 412 |
. . . . . . 7
⊢
(sup(𝐴,
ℝ*, < ) ∈ ℝ* → (sup(𝐴, ℝ*, < )
< +∞ → sup(𝐴,
ℝ*, < ) ≠ +∞)) |
10 | 4, 9 | syl 17 |
. . . . . 6
⊢ (𝐴 ⊆ ℝ*
→ (sup(𝐴,
ℝ*, < ) < +∞ → sup(𝐴, ℝ*, < ) ≠
+∞)) |
11 | | supxrunb2 12983 |
. . . . . . . . 9
⊢ (𝐴 ⊆ ℝ*
→ (∀𝑥 ∈
ℝ ∃𝑦 ∈
𝐴 𝑥 < 𝑦 ↔ sup(𝐴, ℝ*, < ) =
+∞)) |
12 | | ssel2 3912 |
. . . . . . . . . . . . . 14
⊢ ((𝐴 ⊆ ℝ*
∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*) |
13 | 12 | adantlr 711 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ⊆ ℝ*
∧ 𝑥 ∈ ℝ)
∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*) |
14 | | rexr 10952 |
. . . . . . . . . . . . . 14
⊢ (𝑥 ∈ ℝ → 𝑥 ∈
ℝ*) |
15 | 14 | ad2antlr 723 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ⊆ ℝ*
∧ 𝑥 ∈ ℝ)
∧ 𝑦 ∈ 𝐴) → 𝑥 ∈ ℝ*) |
16 | | xrlenlt 10971 |
. . . . . . . . . . . . . 14
⊢ ((𝑦 ∈ ℝ*
∧ 𝑥 ∈
ℝ*) → (𝑦 ≤ 𝑥 ↔ ¬ 𝑥 < 𝑦)) |
17 | 16 | con2bid 354 |
. . . . . . . . . . . . 13
⊢ ((𝑦 ∈ ℝ*
∧ 𝑥 ∈
ℝ*) → (𝑥 < 𝑦 ↔ ¬ 𝑦 ≤ 𝑥)) |
18 | 13, 15, 17 | syl2anc 583 |
. . . . . . . . . . . 12
⊢ (((𝐴 ⊆ ℝ*
∧ 𝑥 ∈ ℝ)
∧ 𝑦 ∈ 𝐴) → (𝑥 < 𝑦 ↔ ¬ 𝑦 ≤ 𝑥)) |
19 | 18 | rexbidva 3224 |
. . . . . . . . . . 11
⊢ ((𝐴 ⊆ ℝ*
∧ 𝑥 ∈ ℝ)
→ (∃𝑦 ∈
𝐴 𝑥 < 𝑦 ↔ ∃𝑦 ∈ 𝐴 ¬ 𝑦 ≤ 𝑥)) |
20 | | rexnal 3165 |
. . . . . . . . . . 11
⊢
(∃𝑦 ∈
𝐴 ¬ 𝑦 ≤ 𝑥 ↔ ¬ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) |
21 | 19, 20 | bitrdi 286 |
. . . . . . . . . 10
⊢ ((𝐴 ⊆ ℝ*
∧ 𝑥 ∈ ℝ)
→ (∃𝑦 ∈
𝐴 𝑥 < 𝑦 ↔ ¬ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥)) |
22 | 21 | ralbidva 3119 |
. . . . . . . . 9
⊢ (𝐴 ⊆ ℝ*
→ (∀𝑥 ∈
ℝ ∃𝑦 ∈
𝐴 𝑥 < 𝑦 ↔ ∀𝑥 ∈ ℝ ¬ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥)) |
23 | 11, 22 | bitr3d 280 |
. . . . . . . 8
⊢ (𝐴 ⊆ ℝ*
→ (sup(𝐴,
ℝ*, < ) = +∞ ↔ ∀𝑥 ∈ ℝ ¬ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥)) |
24 | | ralnex 3163 |
. . . . . . . 8
⊢
(∀𝑥 ∈
ℝ ¬ ∀𝑦
∈ 𝐴 𝑦 ≤ 𝑥 ↔ ¬ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) |
25 | 23, 24 | bitrdi 286 |
. . . . . . 7
⊢ (𝐴 ⊆ ℝ*
→ (sup(𝐴,
ℝ*, < ) = +∞ ↔ ¬ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥)) |
26 | 25 | necon2abid 2985 |
. . . . . 6
⊢ (𝐴 ⊆ ℝ*
→ (∃𝑥 ∈
ℝ ∀𝑦 ∈
𝐴 𝑦 ≤ 𝑥 ↔ sup(𝐴, ℝ*, < ) ≠
+∞)) |
27 | 10, 26 | sylibrd 258 |
. . . . 5
⊢ (𝐴 ⊆ ℝ*
→ (sup(𝐴,
ℝ*, < ) < +∞ → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥)) |
28 | 27 | imp 406 |
. . . 4
⊢ ((𝐴 ⊆ ℝ*
∧ sup(𝐴,
ℝ*, < ) < +∞) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) |
29 | 3, 28 | sylan 579 |
. . 3
⊢ ((𝐴 ⊆ ℝ ∧ sup(𝐴, ℝ*, < )
< +∞) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) |
30 | 29 | 3adant2 1129 |
. 2
⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ sup(𝐴, ℝ*, < )
< +∞) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) |
31 | | supxrre 12990 |
. . 3
⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) → sup(𝐴, ℝ*, < ) = sup(𝐴, ℝ, <
)) |
32 | | suprcl 11865 |
. . 3
⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) → sup(𝐴, ℝ, < ) ∈
ℝ) |
33 | 31, 32 | eqeltrd 2839 |
. 2
⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝐴 𝑦 ≤ 𝑥) → sup(𝐴, ℝ*, < ) ∈
ℝ) |
34 | 30, 33 | syld3an3 1407 |
1
⊢ ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ sup(𝐴, ℝ*, < )
< +∞) → sup(𝐴, ℝ*, < ) ∈
ℝ) |