Theorem supxrge 42884

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 12875	. . . . 5 ⊢ (𝐵 ∈ ℝ* → 𝐵 ≤ +∞)
3	1, 2	syl 17	. . . 4 ⊢ (𝜑 → 𝐵 ≤ +∞)
4	3	adantr 481	. . 3 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐵 ≤ +∞)
5		supxrge.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ⊆ ℝ*)
6	5	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐴 ⊆ ℝ*)
7		simpr 485	. . . . 5 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → +∞ ∈ 𝐴)
8		supxrpnf 13061	. . . . 5 ⊢ ((𝐴 ⊆ ℝ* ∧ +∞ ∈ 𝐴) → sup(𝐴, ℝ*, < ) = +∞)
9	6, 7, 8	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → sup(𝐴, ℝ*, < ) = +∞)
10	9	eqcomd 2745	. . 3 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → +∞ = sup(𝐴, ℝ*, < ))
11	4, 10	breqtrd 5101	. 2 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
12		simpr 485	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = -∞) → 𝐵 = -∞)
13		supxrcl 13058	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ* → sup(𝐴, ℝ*, < ) ∈ ℝ*)
14	5, 13	syl 17	. . . . . . 7 ⊢ (𝜑 → sup(𝐴, ℝ*, < ) ∈ ℝ*)
15		mnfle 12879	. . . . . . 7 ⊢ (sup(𝐴, ℝ*, < ) ∈ ℝ* → -∞ ≤ sup(𝐴, ℝ*, < ))
16	14, 15	syl 17	. . . . . 6 ⊢ (𝜑 → -∞ ≤ sup(𝐴, ℝ*, < ))
17	16	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = -∞) → -∞ ≤ sup(𝐴, ℝ*, < ))
18	12, 17	eqbrtrd 5097	. . . 4 ⊢ ((𝜑 ∧ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
19	18	adantlr 712	. . 3 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
20		simpl 483	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → (𝜑 ∧ ¬ +∞ ∈ 𝐴))
21		neqne 2952	. . . . 5 ⊢ (¬ 𝐵 = -∞ → 𝐵 ≠ -∞)
22	21	adantl 482	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → 𝐵 ≠ -∞)
23		nfv 1918	. . . . 5 ⊢ Ⅎ𝑤((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞)
24	5	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐴 ⊆ ℝ*)
25	24	adantr 481	. . . . 5 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐴 ⊆ ℝ*)
26	1	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐵 ∈ ℝ*)
27	26	adantr 481	. . . . 5 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐵 ∈ ℝ*)
28		simpl 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → 𝜑)
29		rphalfcl 12766	. . . . . . . . . 10 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ+)
30	29	adantl 482	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) ∈ ℝ+)
31		ovex 7317	. . . . . . . . . 10 ⊢ (𝑤 / 2) ∈ V
32		nfcv 2908	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑤 / 2)
33		supxrge.xph	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥𝜑
34		nfv 1918	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥(𝑤 / 2) ∈ ℝ+
35	33, 34	nfan 1903	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑤 / 2) ∈ ℝ+)
36		nfv 1918	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))
37	35, 36	nfim 1900	. . . . . . . . . . 11 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
38		eleq1 2827	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑤 / 2) → (𝑥 ∈ ℝ+ ↔ (𝑤 / 2) ∈ ℝ+))
39	38	anbi2d 629	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑤 / 2) → ((𝜑 ∧ 𝑥 ∈ ℝ+) ↔ (𝜑 ∧ (𝑤 / 2) ∈ ℝ+)))
40		oveq2 7292	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑤 / 2) → (𝑦 +𝑒 𝑥) = (𝑦 +𝑒 (𝑤 / 2)))
41	40	breq2d 5087	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑤 / 2) → (𝐵 ≤ (𝑦 +𝑒 𝑥) ↔ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))))
42	41	rexbidv 3227	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑤 / 2) → (∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥) ↔ ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))))
43	39, 42	imbi12d 345	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑤 / 2) → (((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥)) ↔ ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))))
44		supxrge.y	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 𝑥))
45	32, 37, 43, 44	vtoclgf 3504	. . . . . . . . . 10 ⊢ ((𝑤 / 2) ∈ V → ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))))
46	31, 45	ax-mp 5	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
47	28, 30, 46	syl2anc 584	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
48	47	adantlr 712	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
49	48	adantlr 712	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
50		nfv 1918	. . . . . . 7 ⊢ Ⅎ𝑦(((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+)
51		neneq 2950	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ≠ -∞ → ¬ 𝐵 = -∞)
52	51	adantl 482	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → ¬ 𝐵 = -∞)
53	1	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → 𝐵 ∈ ℝ*)
54		ngtmnft 12909	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ ℝ* → (𝐵 = -∞ ↔ ¬ -∞ < 𝐵))
55	53, 54	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → (𝐵 = -∞ ↔ ¬ -∞ < 𝐵))
56	52, 55	mtbid 324	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → ¬ ¬ -∞ < 𝐵)
57	56	notnotrd 133	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → -∞ < 𝐵)
58	57	ad4ant13 748	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → -∞ < 𝐵)
59	58	3ad2ant1 1132	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → -∞ < 𝐵)
60	27	adantr 481	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → 𝐵 ∈ ℝ*)
61	60	3ad2ant1 1132	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 ∈ ℝ*)
62	61	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ∈ ℝ*)
63		mnfxr 11041	. . . . . . . . . . . . . . . . . . . 20 ⊢ -∞ ∈ ℝ*
64	63	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → -∞ ∈ ℝ*)
65		simpl3 1192	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
66		simpr 485	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → ¬ -∞ < 𝑦)
67	5	sselda 3922	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*)
68	67	adantr 481	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 ∈ ℝ*)
69		ngtmnft 12909	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑦 ∈ ℝ* → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦))
70	68, 69	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦))
71	66, 70	mpbird 256	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 = -∞)
72	71	oveq1d 7299	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = (-∞ +𝑒 (𝑤 / 2)))
73	72	adantllr 716	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = (-∞ +𝑒 (𝑤 / 2)))
74	29	rpxrd 12782	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ*)
75	29	rpred 12781	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ)
76		renepnf 11032	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑤 / 2) ∈ ℝ → (𝑤 / 2) ≠ +∞)
77	75, 76	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ≠ +∞)
78		xaddmnf2 12972	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑤 / 2) ∈ ℝ* ∧ (𝑤 / 2) ≠ +∞) → (-∞ +𝑒 (𝑤 / 2)) = -∞)
79	74, 77, 78	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑤 ∈ ℝ+ → (-∞ +𝑒 (𝑤 / 2)) = -∞)
80	79	adantl 482	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (-∞ +𝑒 (𝑤 / 2)) = -∞)
81	80	ad2antrr 723	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (-∞ +𝑒 (𝑤 / 2)) = -∞)
82	73, 81	eqtrd 2779	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
83	82	adantl3r 747	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
84	83	adantl3r 747	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
85	84	3adantl3 1167	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → (𝑦 +𝑒 (𝑤 / 2)) = -∞)
86	65, 85	breqtrd 5101	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≤ -∞)
87		mnfle 12879	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐵 ∈ ℝ* → -∞ ≤ 𝐵)
88	1, 87	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → -∞ ≤ 𝐵)
89	88	adantr 481	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → -∞ ≤ 𝐵)
90	89	ad3antrrr 727	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ ¬ -∞ < 𝑦) → -∞ ≤ 𝐵)
91	90	3ad2antl1 1184	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → -∞ ≤ 𝐵)
92	62, 64, 86, 91	xrletrid 12898	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 = -∞)
93		simpllr 773	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ ¬ -∞ < 𝑦) → 𝐵 ≠ -∞)
94	93	3ad2antl1 1184	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≠ -∞)
95	94	neneqd 2949	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → ¬ 𝐵 = -∞)
96	92, 95	condan 815	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → -∞ < 𝑦)
97		simpr 485	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → ¬ 𝑦 < +∞)
98	67	adantr 481	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 ∈ ℝ*)
99		nltpnft 12907	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑦 ∈ ℝ* → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞))
100	98, 99	syl 17	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞))
101	97, 100	mpbird 256	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 = +∞)
102	101	eqcomd 2745	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ = 𝑦)
103		simpr 485	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ 𝐴)
104	103	adantr 481	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 ∈ 𝐴)
105	102, 104	eqeltrd 2840	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ ∈ 𝐴)
106	105	3adantl2 1166	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ ∈ 𝐴)
107		simpl2 1191	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → ¬ +∞ ∈ 𝐴)
108	106, 107	condan 815	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → 𝑦 < +∞)
109	108	ad5ant125 1365	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) → 𝑦 < +∞)
110	109	3adant3 1131	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑦 < +∞)
111	96, 110	jca 512	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (-∞ < 𝑦 ∧ 𝑦 < +∞))
112	67	ad5ant15 756	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*)
113	112	3adant3 1131	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑦 ∈ ℝ*)
114		xrrebnd 12911	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ* → (𝑦 ∈ ℝ ↔ (-∞ < 𝑦 ∧ 𝑦 < +∞)))
115	113, 114	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 ∈ ℝ ↔ (-∞ < 𝑦 ∧ 𝑦 < +∞)))
116	111, 115	mpbird 256	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑦 ∈ ℝ)
117	75	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) ∈ ℝ)
118	117	3ad2ant1 1132	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑤 / 2) ∈ ℝ)
119		rexadd 12975	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ ∧ (𝑤 / 2) ∈ ℝ) → (𝑦 +𝑒 (𝑤 / 2)) = (𝑦 + (𝑤 / 2)))
120	116, 118, 119	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) = (𝑦 + (𝑤 / 2)))
121	116, 118	readdcld 11013	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 + (𝑤 / 2)) ∈ ℝ)
122	120, 121	eqeltrd 2840	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) ∈ ℝ)
123	122	rexrd 11034	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) ∈ ℝ*)
124		pnfxr 11038	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ*
125	124	a1i 11	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → +∞ ∈ ℝ*)
126		simp3 1137	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)))
127	122	ltpnfd 12866	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) < +∞)
128	61, 123, 125, 126, 127	xrlelttrd 12903	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 < +∞)
129	59, 128	jca 512	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (-∞ < 𝐵 ∧ 𝐵 < +∞))
130		xrrebnd 12911	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ* → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞)))
131	61, 130	syl 17	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞)))
132	129, 131	mpbird 256	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 ∈ ℝ)
133		rpre 12747	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → 𝑤 ∈ ℝ)
134	133	adantl 482	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → 𝑤 ∈ ℝ)
135	134	3ad2ant1 1132	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝑤 ∈ ℝ)
136		rexadd 12975	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (𝑦 +𝑒 𝑤) = (𝑦 + 𝑤))
137	116, 135, 136	syl2anc 584	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 𝑤) = (𝑦 + 𝑤))
138	116, 135	readdcld 11013	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 + 𝑤) ∈ ℝ)
139	137, 138	eqeltrd 2840	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 𝑤) ∈ ℝ)
140		rphalflt 12768	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) < 𝑤)
141	140	adantl 482	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) < 𝑤)
142	141	3ad2ant1 1132	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑤 / 2) < 𝑤)
143	118, 135, 116, 142	ltadd2dd 11143	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 + (𝑤 / 2)) < (𝑦 + 𝑤))
144	120, 137	breq12d 5088	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → ((𝑦 +𝑒 (𝑤 / 2)) < (𝑦 +𝑒 𝑤) ↔ (𝑦 + (𝑤 / 2)) < (𝑦 + 𝑤)))
145	143, 144	mpbird 256	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → (𝑦 +𝑒 (𝑤 / 2)) < (𝑦 +𝑒 𝑤))
146	132, 122, 139, 126, 145	lelttrd 11142	. . . . . . . 8 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2))) → 𝐵 < (𝑦 +𝑒 𝑤))
147	146	3exp 1118	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑦 ∈ 𝐴 → (𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)) → 𝐵 < (𝑦 +𝑒 𝑤))))
148	50, 147	reximdai 3245	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +𝑒 (𝑤 / 2)) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑤)))
149	49, 148	mpd 15	. . . . 5 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +𝑒 𝑤))
150	23, 25, 27, 149	supxrgelem 42883	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
151	20, 22, 150	syl2anc 584	. . 3 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
152	19, 151	pm2.61dan 810	. 2 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
153	11, 152	pm2.61dan 810	1 ⊢ (𝜑 → 𝐵 ≤ sup(𝐴, ℝ*, < ))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1086   = wceq 1539  Ⅎwnf 1786   ∈ wcel 2107   ≠ wne 2944  ∃wrex 3066  Vcvv 3433   ⊆ wss 3888   class class class wbr 5075  (class class class)co 7284  supcsup 9208  ℝcr 10879   + caddc 10883  +∞cpnf 11015  -∞cmnf 11016  ℝ^*cxr 11017   < clt 11018   ≤ cle 11019   / cdiv 11641  2c2 12037  ℝ⁺crp 12739   +_𝑒 cxad 12855

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2710  ax-sep 5224  ax-nul 5231  ax-pow 5289  ax-pr 5353  ax-un 7597  ax-cnex 10936  ax-resscn 10937  ax-1cn 10938  ax-icn 10939  ax-addcl 10940  ax-addrcl 10941  ax-mulcl 10942  ax-mulrcl 10943  ax-mulcom 10944  ax-addass 10945  ax-mulass 10946  ax-distr 10947  ax-i2m1 10948  ax-1ne0 10949  ax-1rid 10950  ax-rnegex 10951  ax-rrecex 10952  ax-cnre 10953  ax-pre-lttri 10954  ax-pre-lttrn 10955  ax-pre-ltadd 10956  ax-pre-mulgt0 10957  ax-pre-sup 10958

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2541  df-eu 2570  df-clab 2717  df-cleq 2731  df-clel 2817  df-nfc 2890  df-ne 2945  df-nel 3051  df-ral 3070  df-rex 3071  df-rmo 3072  df-reu 3073  df-rab 3074  df-v 3435  df-sbc 3718  df-csb 3834  df-dif 3891  df-un 3893  df-in 3895  df-ss 3905  df-nul 4258  df-if 4461  df-pw 4536  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4841  df-iun 4927  df-br 5076  df-opab 5138  df-mpt 5159  df-id 5490  df-po 5504  df-so 5505  df-xp 5596  df-rel 5597  df-cnv 5598  df-co 5599  df-dm 5600  df-rn 5601  df-res 5602  df-ima 5603  df-iota 6395  df-fun 6439  df-fn 6440  df-f 6441  df-f1 6442  df-fo 6443  df-f1o 6444  df-fv 6445  df-riota 7241  df-ov 7287  df-oprab 7288  df-mpo 7289  df-1st 7840  df-2nd 7841  df-er 8507  df-en 8743  df-dom 8744  df-sdom 8745  df-sup 9210  df-pnf 11020  df-mnf 11021  df-xr 11022  df-ltxr 11023  df-le 11024  df-sub 11216  df-neg 11217  df-div 11642  df-2 12045  df-rp 12740  df-xadd 12858

This theorem is referenced by:  sge0gerp  43940