Theorem supxrge 41613

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.)

Hypotheses

Ref	Expression
supxrge.xph	⊢ Ⅎ𝑥𝜑
supxrge.a	⊢ (𝜑 → 𝐴 ⊆ ℝ*)
supxrge.b	⊢ (𝜑 → 𝐵 ∈ ℝ*)
supxrge.y	⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥))

Assertion

Ref	Expression
supxrge	⊢ (𝜑 → 𝐵 ≤ sup(𝐴, ℝ*, < ))

Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦   𝜑,𝑦

Allowed substitution hint:   𝜑(𝑥)

Proof of Theorem supxrge

Dummy variable 𝑤 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		supxrge.b	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ ℝ*)
2		pnfge 12528	. . . . 5 ⊢ (𝐵 ∈ ℝ* → 𝐵 ≤ +∞)
3	1, 2	syl 17	. . . 4 ⊢ (𝜑 → 𝐵 ≤ +∞)
4	3	adantr 483	. . 3 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐵 ≤ +∞)
5		supxrge.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ⊆ ℝ*)
6	5	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐴 ⊆ ℝ*)
7		simpr 487	. . . . 5 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → +∞ ∈ 𝐴)
8		supxrpnf 12714	. . . . 5 ⊢ ((𝐴 ⊆ ℝ* ∧ +∞ ∈ 𝐴) → sup(𝐴, ℝ*, < ) = +∞)
9	6, 7, 8	syl2anc 586	. . . 4 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → sup(𝐴, ℝ*, < ) = +∞)
10	9	eqcomd 2829	. . 3 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → +∞ = sup(𝐴, ℝ*, < ))
11	4, 10	breqtrd 5094	. 2 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
12		simpr 487	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = -∞) → 𝐵 = -∞)
13		supxrcl 12711	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ* → sup(𝐴, ℝ*, < ) ∈ ℝ*)
14	5, 13	syl 17	. . . . . . 7 ⊢ (𝜑 → sup(𝐴, ℝ*, < ) ∈ ℝ*)
15		mnfle 12532	. . . . . . 7 ⊢ (sup(𝐴, ℝ*, < ) ∈ ℝ* → -∞ ≤ sup(𝐴, ℝ*, < ))
16	14, 15	syl 17	. . . . . 6 ⊢ (𝜑 → -∞ ≤ sup(𝐴, ℝ*, < ))
17	16	adantr 483	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = -∞) → -∞ ≤ sup(𝐴, ℝ*, < ))
18	12, 17	eqbrtrd 5090	. . . 4 ⊢ ((𝜑 ∧ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
19	18	adantlr 713	. . 3 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
20		simpl 485	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → (𝜑 ∧ ¬ +∞ ∈ 𝐴))
21		neqne 3026	. . . . 5 ⊢ (¬ 𝐵 = -∞ → 𝐵 ≠ -∞)
22	21	adantl 484	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → 𝐵 ≠ -∞)
23		nfv 1915	. . . . 5 ⊢ Ⅎ𝑤((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞)
24	5	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐴 ⊆ ℝ*)
25	24	adantr 483	. . . . 5 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐴 ⊆ ℝ*)
26	1	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐵 ∈ ℝ*)
27	26	adantr 483	. . . . 5 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐵 ∈ ℝ*)
28		simpl 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → 𝜑)
29		rphalfcl 12419	. . . . . . . . . 10 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ+)
30	29	adantl 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) ∈ ℝ+)
31		ovex 7191	. . . . . . . . . 10 ⊢ (𝑤 / 2) ∈ V
32		nfcv 2979	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑤 / 2)
33		supxrge.xph	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥𝜑
34		nfv 1915	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥(𝑤 / 2) ∈ ℝ+
35	33, 34	nfan 1900	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑤 / 2) ∈ ℝ+)
36		nfv 1915	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))
37	35, 36	nfim 1897	. . . . . . . . . . 11 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
38		eleq1 2902	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑤 / 2) → (𝑥 ∈ ℝ+ ↔ (𝑤 / 2) ∈ ℝ+))
39	38	anbi2d 630	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑤 / 2) → ((𝜑 ∧ 𝑥 ∈ ℝ+) ↔ (𝜑 ∧ (𝑤 / 2) ∈ ℝ+)))
40		oveq2 7166	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑤 / 2) → (𝑦 +𝑒 𝑥) = (𝑦 +𝑒 (𝑤 / 2)))
41	40	breq2d 5080	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑤 / 2) → (𝐵 ≤ (𝑦 +𝑒 𝑥) ↔ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))))
42	41	rexbidv 3299	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑤 / 2) → (∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥) ↔ ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))))
43	39, 42	imbi12d 347	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑤 / 2) → (((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥)) ↔ ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))))
44		supxrge.y	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥))
45	32, 37, 43, 44	vtoclgf 3567	. . . . . . . . . 10 ⊢ ((𝑤 / 2) ∈ V → ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))))
46	31, 45	ax-mp 5	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
47	28, 30, 46	syl2anc 586	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
48	47	adantlr 713	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
49	48	adantlr 713	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
50		nfv 1915	. . . . . . 7 ⊢ Ⅎ𝑦(((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+)
51		neneq 3024	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ≠ -∞ → ¬ 𝐵 = -∞)
52	51	adantl 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → ¬ 𝐵 = -∞)
53	1	adantr 483	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → 𝐵 ∈ ℝ*)
54		ngtmnft 12562	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ ℝ* → (𝐵 = -∞ ↔ ¬ -∞ < 𝐵))
55	53, 54	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → (𝐵 = -∞ ↔ ¬ -∞ < 𝐵))
56	52, 55	mtbid 326	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → ¬ ¬ -∞ < 𝐵)
57	56	notnotrd 135	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → -∞ < 𝐵)
58	57	ad4ant13 749	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → -∞ < 𝐵)
59	58	3ad2ant1 1129	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → -∞ < 𝐵)
60	27	adantr 483	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → 𝐵 ∈ ℝ*)
61	60	3ad2ant1 1129	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 ∈ ℝ*)
62	61	adantr 483	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ∈ ℝ*)
63		mnfxr 10700	. . . . . . . . . . . . . . . . . . . 20 ⊢ -∞ ∈ ℝ*
64	63	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → -∞ ∈ ℝ*)
65		simpl3 1189	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
66		simpr 487	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → ¬ -∞ < 𝑦)
67	5	sselda 3969	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*)
68	67	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 ∈ ℝ*)
69		ngtmnft 12562	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑦 ∈ ℝ* → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦))
70	68, 69	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦))
71	66, 70	mpbird 259	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 = -∞)
72	71	oveq1d 7173	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = (-∞ +𝑒 (𝑤 / 2)))
73	72	adantllr 717	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = (-∞ +𝑒 (𝑤 / 2)))
74	29	rpxrd 12435	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ*)
75	29	rpred 12434	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ)
76		renepnf 10691	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑤 / 2) ∈ ℝ → (𝑤 / 2) ≠ +∞)
77	75, 76	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ≠ +∞)
78		xaddmnf2 12625	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑤 / 2) ∈ ℝ* ∧ (𝑤 / 2) ≠ +∞) → (-∞ +𝑒 (𝑤 / 2)) = -∞)
79	74, 77, 78	syl2anc 586	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑤 ∈ ℝ+ → (-∞ +𝑒 (𝑤 / 2)) = -∞)
80	79	adantl 484	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (-∞ +𝑒 (𝑤 / 2)) = -∞)
81	80	ad2antrr 724	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (-∞ +𝑒 (𝑤 / 2)) = -∞)
82	73, 81	eqtrd 2858	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
83	82	adantl3r 748	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
84	83	adantl3r 748	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
85	84	3adantl3 1164	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
86	65, 85	breqtrd 5094	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≤ -∞)
87		mnfle 12532	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐵 ∈ ℝ* → -∞ ≤ 𝐵)
88	1, 87	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → -∞ ≤ 𝐵)
89	88	adantr 483	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → -∞ ≤ 𝐵)
90	89	ad3antrrr 728	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ ¬ -∞ < 𝑦) → -∞ ≤ 𝐵)
91	90	3ad2antl1 1181	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → -∞ ≤ 𝐵)
92	62, 64, 86, 91	xrletrid 12551	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 = -∞)
93		simpllr 774	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ ¬ -∞ < 𝑦) → 𝐵 ≠ -∞)
94	93	3ad2antl1 1181	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≠ -∞)
95	94	neneqd 3023	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → ¬ 𝐵 = -∞)
96	92, 95	condan 816	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → -∞ < 𝑦)
97		simpr 487	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → ¬ 𝑦 < +∞)
98	67	adantr 483	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 ∈ ℝ*)
99		nltpnft 12560	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑦 ∈ ℝ* → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞))
100	98, 99	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞))
101	97, 100	mpbird 259	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 = +∞)
102	101	eqcomd 2829	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ = 𝑦)
103		simpr 487	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ 𝐴)
104	103	adantr 483	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 ∈ 𝐴)
105	102, 104	eqeltrd 2915	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ ∈ 𝐴)
106	105	3adantl2 1163	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ ∈ 𝐴)
107		simpl2 1188	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → ¬ +∞ ∈ 𝐴)
108	106, 107	condan 816	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → 𝑦 < +∞)
109	108	ad5ant125 1362	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) → 𝑦 < +∞)
110	109	3adant3 1128	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑦 < +∞)
111	96, 110	jca 514	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (-∞ < 𝑦 ∧ 𝑦 < +∞))
112	67	ad5ant15 757	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*)
113	112	3adant3 1128	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑦 ∈ ℝ*)
114		xrrebnd 12564	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ* → (𝑦 ∈ ℝ ↔ (-∞ < 𝑦 ∧ 𝑦 < +∞)))
115	113, 114	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 ∈ ℝ ↔ (-∞ < 𝑦 ∧ 𝑦 < +∞)))
116	111, 115	mpbird 259	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑦 ∈ ℝ)
117	75	adantl 484	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) ∈ ℝ)
118	117	3ad2ant1 1129	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑤 / 2) ∈ ℝ)
119		rexadd 12628	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ ∧ (𝑤 / 2) ∈ ℝ) → (𝑦 +𝑒 (𝑤 / 2)) = (𝑦 + (𝑤 / 2)))
120	116, 118, 119	syl2anc 586	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) = (𝑦 + (𝑤 / 2)))
121	116, 118	readdcld 10672	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 + (𝑤 / 2)) ∈ ℝ)
122	120, 121	eqeltrd 2915	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) ∈ ℝ)
123	122	rexrd 10693	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) ∈ ℝ*)
124		pnfxr 10697	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ*
125	124	a1i 11	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → +∞ ∈ ℝ*)
126		simp3 1134	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
127	122	ltpnfd 12519	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) < +∞)
128	61, 123, 125, 126, 127	xrlelttrd 12556	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 < +∞)
129	59, 128	jca 514	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (-∞ < 𝐵 ∧ 𝐵 < +∞))
130		xrrebnd 12564	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ* → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞)))
131	61, 130	syl 17	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞)))
132	129, 131	mpbird 259	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 ∈ ℝ)
133		rpre 12400	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → 𝑤 ∈ ℝ)
134	133	adantl 484	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → 𝑤 ∈ ℝ)
135	134	3ad2ant1 1129	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑤 ∈ ℝ)
136		rexadd 12628	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (𝑦 +𝑒 𝑤) = (𝑦 + 𝑤))
137	116, 135, 136	syl2anc 586	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 𝑤) = (𝑦 + 𝑤))
138	116, 135	readdcld 10672	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 + 𝑤) ∈ ℝ)
139	137, 138	eqeltrd 2915	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 𝑤) ∈ ℝ)
140		rphalflt 12421	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) < 𝑤)
141	140	adantl 484	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) < 𝑤)
142	141	3ad2ant1 1129	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑤 / 2) < 𝑤)
143	118, 135, 116, 142	ltadd2dd 10801	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 + (𝑤 / 2)) < (𝑦 + 𝑤))
144	120, 137	breq12d 5081	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → ((𝑦 +𝑒 (𝑤 / 2)) < (𝑦 +𝑒 𝑤) ↔ (𝑦 + (𝑤 / 2)) < (𝑦 + 𝑤)))
145	143, 144	mpbird 259	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) < (𝑦 +𝑒 𝑤))
146	132, 122, 139, 126, 145	lelttrd 10800	. . . . . . . 8 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 < (𝑦 +𝑒 𝑤))
147	146	3exp 1115	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑦 ∈ 𝐴 → (𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)) → 𝐵 < (𝑦 +𝑒 𝑤))))
148	50, 147	reximdai 3313	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑤)))
149	49, 148	mpd 15	. . . . 5 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑤))
150	23, 25, 27, 149	supxrgelem 41612	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
151	20, 22, 150	syl2anc 586	. . 3 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
152	19, 151	pm2.61dan 811	. 2 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
153	11, 152	pm2.61dan 811	1 ⊢ (𝜑 → 𝐵 ≤ sup(𝐴, ℝ*, < ))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537  Ⅎwnf 1784   ∈ wcel 2114   ≠ wne 3018  ∃wrex 3141  Vcvv 3496   ⊆ wss 3938   class class class wbr 5068  (class class class)co 7158  supcsup 8906  ℝcr 10538   + caddc 10542  +∞cpnf 10674  -∞cmnf 10675  ℝ^*cxr 10676   < clt 10677   ≤ cle 10678   / cdiv 11299  2c2 11695  ℝ⁺crp 12392   +_𝑒 cxad 12508

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615  ax-pre-mulgt0 10616  ax-pre-sup 10617

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rmo 3148  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-po 5476  df-so 5477  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-1st 7691  df-2nd 7692  df-er 8291  df-en 8512  df-dom 8513  df-sdom 8514  df-sup 8908  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682  df-le 10683  df-sub 10874  df-neg 10875  df-div 11300  df-2 11703  df-rp 12393  df-xadd 12511

This theorem is referenced by:  sge0gerp  42684