Metamath Proof Explorer


Theorem supxrge

Description: If an extended real number can be approximated from below by members of a set, then it is less than or equal to the supremum of the set. (Contributed by Glauco Siliprandi, 17-Aug-2020)

Ref Expression
Hypotheses supxrge.xph ⊢ Ⅎ x φ
supxrge.a ⊢ φ → A ⊆ ℝ *
supxrge.b ⊢ φ → B ∈ ℝ *
supxrge.y ⊢ φ ∧ x ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 x
Assertion supxrge ⊢ φ → B ≤ sup A ℝ * <

Proof

Step Hyp Ref Expression
1 supxrge.xph ⊢ Ⅎ x φ
2 supxrge.a ⊢ φ → A ⊆ ℝ *
3 supxrge.b ⊢ φ → B ∈ ℝ *
4 supxrge.y ⊢ φ ∧ x ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 x
5 pnfge ⊢ B ∈ ℝ * → B ≤ +∞
6 3 5 syl ⊢ φ → B ≤ +∞
7 6 adantr ⊢ φ ∧ +∞ ∈ A → B ≤ +∞
8 2 adantr ⊢ φ ∧ +∞ ∈ A → A ⊆ ℝ *
9 simpr ⊢ φ ∧ +∞ ∈ A → +∞ ∈ A
10 supxrpnf ⊢ A ⊆ ℝ * ∧ +∞ ∈ A → sup A ℝ * < = +∞
11 8 9 10 syl2anc ⊢ φ ∧ +∞ ∈ A → sup A ℝ * < = +∞
12 11 eqcomd ⊢ φ ∧ +∞ ∈ A → +∞ = sup A ℝ * <
13 7 12 breqtrd ⊢ φ ∧ +∞ ∈ A → B ≤ sup A ℝ * <
14 simpr ⊢ φ ∧ B = −∞ → B = −∞
15 supxrcl ⊢ A ⊆ ℝ * → sup A ℝ * < ∈ ℝ *
16 2 15 syl ⊢ φ → sup A ℝ * < ∈ ℝ *
17 mnfle ⊢ sup A ℝ * < ∈ ℝ * → −∞ ≤ sup A ℝ * <
18 16 17 syl ⊢ φ → −∞ ≤ sup A ℝ * <
19 18 adantr ⊢ φ ∧ B = −∞ → −∞ ≤ sup A ℝ * <
20 14 19 eqbrtrd ⊢ φ ∧ B = −∞ → B ≤ sup A ℝ * <
21 20 adantlr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B = −∞ → B ≤ sup A ℝ * <
22 simpl ⊢ φ ∧ ¬ +∞ ∈ A ∧ ¬ B = −∞ → φ ∧ ¬ +∞ ∈ A
23 neqne ⊢ ¬ B = −∞ → B ≠ −∞
24 23 adantl ⊢ φ ∧ ¬ +∞ ∈ A ∧ ¬ B = −∞ → B ≠ −∞
25 nfv ⊢ Ⅎ w φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞
26 2 adantr ⊢ φ ∧ ¬ +∞ ∈ A → A ⊆ ℝ *
27 26 adantr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ → A ⊆ ℝ *
28 3 adantr ⊢ φ ∧ ¬ +∞ ∈ A → B ∈ ℝ *
29 28 adantr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ → B ∈ ℝ *
30 simpl ⊢ φ ∧ w ∈ ℝ + → φ
31 rphalfcl ⊢ w ∈ ℝ + → w 2 ∈ ℝ +
32 31 adantl ⊢ φ ∧ w ∈ ℝ + → w 2 ∈ ℝ +
33 ovex ⊢ w 2 ∈ V
34 nfcv ⊢ Ⅎ _ x w 2
35 nfv ⊢ Ⅎ x w 2 ∈ ℝ +
36 1 35 nfan ⊢ Ⅎ x φ ∧ w 2 ∈ ℝ +
37 nfv ⊢ Ⅎ x ∃ y ∈ A B ≤ y + 𝑒 w 2
38 36 37 nfim ⊢ Ⅎ x φ ∧ w 2 ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
39 eleq1 ⊢ x = w 2 → x ∈ ℝ + ↔ w 2 ∈ ℝ +
40 39 anbi2d ⊢ x = w 2 → φ ∧ x ∈ ℝ + ↔ φ ∧ w 2 ∈ ℝ +
41 oveq2 ⊢ x = w 2 → y + 𝑒 x = y + 𝑒 w 2
42 41 breq2d ⊢ x = w 2 → B ≤ y + 𝑒 x ↔ B ≤ y + 𝑒 w 2
43 42 rexbidv ⊢ x = w 2 → ∃ y ∈ A B ≤ y + 𝑒 x ↔ ∃ y ∈ A B ≤ y + 𝑒 w 2
44 40 43 imbi12d ⊢ x = w 2 → φ ∧ x ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 x ↔ φ ∧ w 2 ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
45 34 38 44 4 vtoclgf ⊢ w 2 ∈ V → φ ∧ w 2 ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
46 33 45 ax-mp ⊢ φ ∧ w 2 ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
47 30 32 46 syl2anc ⊢ φ ∧ w ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
48 47 adantlr ⊢ φ ∧ ¬ +∞ ∈ A ∧ w ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
49 48 adantlr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2
50 nfv ⊢ Ⅎ y φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ +
51 neneq ⊢ B ≠ −∞ → ¬ B = −∞
52 51 adantl ⊢ φ ∧ B ≠ −∞ → ¬ B = −∞
53 3 adantr ⊢ φ ∧ B ≠ −∞ → B ∈ ℝ *
54 ngtmnft ⊢ B ∈ ℝ * → B = −∞ ↔ ¬ −∞ < B
55 53 54 syl ⊢ φ ∧ B ≠ −∞ → B = −∞ ↔ ¬ −∞ < B
56 52 55 mtbid ⊢ φ ∧ B ≠ −∞ → ¬ ¬ −∞ < B
57 56 notnotrd ⊢ φ ∧ B ≠ −∞ → −∞ < B
58 57 ad4ant13 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → −∞ < B
59 58 3ad2ant1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → −∞ < B
60 29 adantr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → B ∈ ℝ *
61 60 3ad2ant1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → B ∈ ℝ *
62 61 adantr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → B ∈ ℝ *
63 mnfxr ⊢ −∞ ∈ ℝ *
64 63 a1i ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → −∞ ∈ ℝ *
65 simpl3 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → B ≤ y + 𝑒 w 2
66 simpr ⊢ φ ∧ y ∈ A ∧ ¬ −∞ < y → ¬ −∞ < y
67 2 sselda ⊢ φ ∧ y ∈ A → y ∈ ℝ *
68 67 adantr ⊢ φ ∧ y ∈ A ∧ ¬ −∞ < y → y ∈ ℝ *
69 ngtmnft ⊢ y ∈ ℝ * → y = −∞ ↔ ¬ −∞ < y
70 68 69 syl ⊢ φ ∧ y ∈ A ∧ ¬ −∞ < y → y = −∞ ↔ ¬ −∞ < y
71 66 70 mpbird ⊢ φ ∧ y ∈ A ∧ ¬ −∞ < y → y = −∞
72 71 oveq1d ⊢ φ ∧ y ∈ A ∧ ¬ −∞ < y → y + 𝑒 w 2 = −∞ + 𝑒 w 2
73 72 adantllr ⊢ φ ∧ w ∈ ℝ + ∧ y ∈ A ∧ ¬ −∞ < y → y + 𝑒 w 2 = −∞ + 𝑒 w 2
74 31 rpxrd ⊢ w ∈ ℝ + → w 2 ∈ ℝ *
75 31 rpred ⊢ w ∈ ℝ + → w 2 ∈ ℝ
76 renepnf ⊢ w 2 ∈ ℝ → w 2 ≠ +∞
77 75 76 syl ⊢ w ∈ ℝ + → w 2 ≠ +∞
78 xaddmnf2 ⊢ w 2 ∈ ℝ * ∧ w 2 ≠ +∞ → −∞ + 𝑒 w 2 = −∞
79 74 77 78 syl2anc ⊢ w ∈ ℝ + → −∞ + 𝑒 w 2 = −∞
80 79 adantl ⊢ φ ∧ w ∈ ℝ + → −∞ + 𝑒 w 2 = −∞
81 80 ad2antrr ⊢ φ ∧ w ∈ ℝ + ∧ y ∈ A ∧ ¬ −∞ < y → −∞ + 𝑒 w 2 = −∞
82 73 81 eqtrd ⊢ φ ∧ w ∈ ℝ + ∧ y ∈ A ∧ ¬ −∞ < y → y + 𝑒 w 2 = −∞
83 82 adantl3r ⊢ φ ∧ ¬ +∞ ∈ A ∧ w ∈ ℝ + ∧ y ∈ A ∧ ¬ −∞ < y → y + 𝑒 w 2 = −∞
84 83 adantl3r ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ ¬ −∞ < y → y + 𝑒 w 2 = −∞
85 84 3adantl3 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → y + 𝑒 w 2 = −∞
86 65 85 breqtrd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → B ≤ −∞
87 mnfle ⊢ B ∈ ℝ * → −∞ ≤ B
88 3 87 syl ⊢ φ → −∞ ≤ B
89 88 adantr ⊢ φ ∧ ¬ +∞ ∈ A → −∞ ≤ B
90 89 ad3antrrr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ ¬ −∞ < y → −∞ ≤ B
91 90 3ad2antl1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → −∞ ≤ B
92 62 64 86 91 xrletrid ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → B = −∞
93 simpllr ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ ¬ −∞ < y → B ≠ −∞
94 93 3ad2antl1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → B ≠ −∞
95 94 neneqd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 ∧ ¬ −∞ < y → ¬ B = −∞
96 92 95 condan ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → −∞ < y
97 simpr ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → ¬ y < +∞
98 67 adantr ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → y ∈ ℝ *
99 nltpnft ⊢ y ∈ ℝ * → y = +∞ ↔ ¬ y < +∞
100 98 99 syl ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → y = +∞ ↔ ¬ y < +∞
101 97 100 mpbird ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → y = +∞
102 101 eqcomd ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → +∞ = y
103 simpr ⊢ φ ∧ y ∈ A → y ∈ A
104 103 adantr ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → y ∈ A
105 102 104 eqeltrd ⊢ φ ∧ y ∈ A ∧ ¬ y < +∞ → +∞ ∈ A
106 105 3adantl2 ⊢ φ ∧ ¬ +∞ ∈ A ∧ y ∈ A ∧ ¬ y < +∞ → +∞ ∈ A
107 simpl2 ⊢ φ ∧ ¬ +∞ ∈ A ∧ y ∈ A ∧ ¬ y < +∞ → ¬ +∞ ∈ A
108 106 107 condan ⊢ φ ∧ ¬ +∞ ∈ A ∧ y ∈ A → y < +∞
109 108 ad5ant125 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A → y < +∞
110 109 3adant3 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y < +∞
111 96 110 jca ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → −∞ < y ∧ y < +∞
112 67 ad5ant15 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A → y ∈ ℝ *
113 112 3adant3 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y ∈ ℝ *
114 xrrebnd ⊢ y ∈ ℝ * → y ∈ ℝ ↔ −∞ < y ∧ y < +∞
115 113 114 syl ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y ∈ ℝ ↔ −∞ < y ∧ y < +∞
116 111 115 mpbird ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y ∈ ℝ
117 75 adantl ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → w 2 ∈ ℝ
118 117 3ad2ant1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → w 2 ∈ ℝ
119 rexadd ⊢ y ∈ ℝ ∧ w 2 ∈ ℝ → y + 𝑒 w 2 = y + w 2
120 116 118 119 syl2anc ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w 2 = y + w 2
121 116 118 readdcld ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + w 2 ∈ ℝ
122 120 121 eqeltrd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w 2 ∈ ℝ
123 122 rexrd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w 2 ∈ ℝ *
124 pnfxr ⊢ +∞ ∈ ℝ *
125 124 a1i ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → +∞ ∈ ℝ *
126 simp3 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → B ≤ y + 𝑒 w 2
127 122 ltpnfd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w 2 < +∞
128 61 123 125 126 127 xrlelttrd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → B < +∞
129 59 128 jca ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → −∞ < B ∧ B < +∞
130 xrrebnd ⊢ B ∈ ℝ * → B ∈ ℝ ↔ −∞ < B ∧ B < +∞
131 61 130 syl ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → B ∈ ℝ ↔ −∞ < B ∧ B < +∞
132 129 131 mpbird ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → B ∈ ℝ
133 rpre ⊢ w ∈ ℝ + → w ∈ ℝ
134 133 adantl ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → w ∈ ℝ
135 134 3ad2ant1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → w ∈ ℝ
136 rexadd ⊢ y ∈ ℝ ∧ w ∈ ℝ → y + 𝑒 w = y + w
137 116 135 136 syl2anc ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w = y + w
138 116 135 readdcld ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + w ∈ ℝ
139 137 138 eqeltrd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w ∈ ℝ
140 rphalflt ⊢ w ∈ ℝ + → w 2 < w
141 140 adantl ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → w 2 < w
142 141 3ad2ant1 ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → w 2 < w
143 118 135 116 142 ltadd2dd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + w 2 < y + w
144 120 137 breq12d ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w 2 < y + 𝑒 w ↔ y + w 2 < y + w
145 143 144 mpbird ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → y + 𝑒 w 2 < y + 𝑒 w
146 132 122 139 126 145 lelttrd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + ∧ y ∈ A ∧ B ≤ y + 𝑒 w 2 → B < y + 𝑒 w
147 146 3exp ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → y ∈ A → B ≤ y + 𝑒 w 2 → B < y + 𝑒 w
148 50 147 reximdai ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → ∃ y ∈ A B ≤ y + 𝑒 w 2 → ∃ y ∈ A B < y + 𝑒 w
149 49 148 mpd ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ ∧ w ∈ ℝ + → ∃ y ∈ A B < y + 𝑒 w
150 25 27 29 149 supxrgelem ⊢ φ ∧ ¬ +∞ ∈ A ∧ B ≠ −∞ → B ≤ sup A ℝ * <
151 22 24 150 syl2anc ⊢ φ ∧ ¬ +∞ ∈ A ∧ ¬ B = −∞ → B ≤ sup A ℝ * <
152 21 151 pm2.61dan ⊢ φ ∧ ¬ +∞ ∈ A → B ≤ sup A ℝ * <
153 13 152 pm2.61dan ⊢ φ → B ≤ sup A ℝ * <