Theorem supxrge 46565

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	⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e 𝑥))

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 13289	. . . . 5 ⊢ (𝐵 ∈ ℝ* → 𝐵 ≤ +∞)
3	1, 2	syl 18	. . . 4 ⊢ (𝜑 → 𝐵 ≤ +∞)
4	3	adantr 486	. . 3 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐵 ≤ +∞)
5		supxrge.a	. . . . . 6 ⊢ (𝜑 → 𝐴 ⊆ ℝ*)
6	5	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐴 ⊆ ℝ*)
7		simpr 490	. . . . 5 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → +∞ ∈ 𝐴)
8		supxrpnf 13478	. . . . 5 ⊢ ((𝐴 ⊆ ℝ* ∧ +∞ ∈ 𝐴) → sup(𝐴, ℝ*, < ) = +∞)
9	6, 7, 8	syl2anc 596	. . . 4 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → sup(𝐴, ℝ*, < ) = +∞)
10	9	eqcomd 2769	. . 3 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → +∞ = sup(𝐴, ℝ*, < ))
11	4, 10	breqtrd 5135	. 2 ⊢ ((𝜑 ∧ +∞ ∈ 𝐴) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
12		simpr 490	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = -∞) → 𝐵 = -∞)
13		supxrcl 13475	. . . . . . . 8 ⊢ (𝐴 ⊆ ℝ* → sup(𝐴, ℝ*, < ) ∈ ℝ*)
14	5, 13	syl 18	. . . . . . 7 ⊢ (𝜑 → sup(𝐴, ℝ*, < ) ∈ ℝ*)
15		mnfle 13294	. . . . . . 7 ⊢ (sup(𝐴, ℝ*, < ) ∈ ℝ* → -∞ ≤ sup(𝐴, ℝ*, < ))
16	14, 15	syl 18	. . . . . 6 ⊢ (𝜑 → -∞ ≤ sup(𝐴, ℝ*, < ))
17	16	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = -∞) → -∞ ≤ sup(𝐴, ℝ*, < ))
18	12, 17	eqbrtrd 5131	. . . 4 ⊢ ((𝜑 ∧ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
19	18	adantlr 728	. . 3 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
20		simpl 488	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → (𝜑 ∧ ¬ +∞ ∈ 𝐴))
21		neqne 2967	. . . . 5 ⊢ (¬ 𝐵 = -∞ → 𝐵 ≠ -∞)
22	21	adantl 487	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → 𝐵 ≠ -∞)
23		nfv 1949	. . . . 5 ⊢ Ⅎ𝑤((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞)
24	5	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐴 ⊆ ℝ*)
25	24	adantr 486	. . . . 5 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐴 ⊆ ℝ*)
26	1	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐵 ∈ ℝ*)
27	26	adantr 486	. . . . 5 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐵 ∈ ℝ*)
28		simpl 488	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → 𝜑)
29		rphalfcl 13179	. . . . . . . . . 10 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ+)
30	29	adantl 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) ∈ ℝ+)
31		ovex 7479	. . . . . . . . . 10 ⊢ (𝑤 / 2) ∈ V
32		nfcv 2926	. . . . . . . . . . 11 ⊢ Ⅎ𝑥(𝑤 / 2)
33		supxrge.xph	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥𝜑
34		nfv 1949	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥(𝑤 / 2) ∈ ℝ+
35	33, 34	nfan 1934	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑤 / 2) ∈ ℝ+)
36		nfv 1949	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2))
37	35, 36	nfim 1931	. . . . . . . . . . 11 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
38		eleq1 2852	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑤 / 2) → (𝑥 ∈ ℝ+ ↔ (𝑤 / 2) ∈ ℝ+))
39	38	anbi2d 642	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑤 / 2) → ((𝜑 ∧ 𝑥 ∈ ℝ+) ↔ (𝜑 ∧ (𝑤 / 2) ∈ ℝ+)))
40		oveq2 7454	. . . . . . . . . . . . . 14 ⊢ (𝑥 = (𝑤 / 2) → (𝑦 +e 𝑥) = (𝑦 +e (𝑤 / 2)))
41	40	breq2d 5118	. . . . . . . . . . . . 13 ⊢ (𝑥 = (𝑤 / 2) → (𝐵 ≤ (𝑦 +e 𝑥) ↔ 𝐵 ≤ (𝑦 +e (𝑤 / 2))))
42	41	rexbidv 3190	. . . . . . . . . . . 12 ⊢ (𝑥 = (𝑤 / 2) → (∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e 𝑥) ↔ ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2))))
43	39, 42	imbi12d 347	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑤 / 2) → (((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e 𝑥)) ↔ ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)))))
44		supxrge.y	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e 𝑥))
45	32, 37, 43, 44	vtoclgf 3533	. . . . . . . . . 10 ⊢ ((𝑤 / 2) ∈ V → ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2))))
46	31, 45	ax-mp 5	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑤 / 2) ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
47	28, 30, 46	syl2anc 596	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
48	47	adantlr 728	. . . . . . 7 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
49	48	adantlr 728	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
50		nfv 1949	. . . . . . 7 ⊢ Ⅎ𝑦(((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+)
51		neneq 2965	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ≠ -∞ → ¬ 𝐵 = -∞)
52	51	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → ¬ 𝐵 = -∞)
53	1	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → 𝐵 ∈ ℝ*)
54		ngtmnft 13326	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ ℝ* → (𝐵 = -∞ ↔ ¬ -∞ < 𝐵))
55	53, 54	syl 18	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → (𝐵 = -∞ ↔ ¬ -∞ < 𝐵))
56	52, 55	mtbid 327	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → ¬ ¬ -∞ < 𝐵)
57	56	notnotrd 134	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝐵 ≠ -∞) → -∞ < 𝐵)
58	57	ad4ant13 764	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → -∞ < 𝐵)
59	58	3ad2ant1 1151	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → -∞ < 𝐵)
60	27	adantr 486	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → 𝐵 ∈ ℝ*)
61	60	3ad2ant1 1151	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝐵 ∈ ℝ*)
62	61	adantr 486	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ∈ ℝ*)
63		mnfxr 11396	. . . . . . . . . . . . . . . . . . . 20 ⊢ -∞ ∈ ℝ*
64	63	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → -∞ ∈ ℝ*)
65		simpl3 1212	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
66		simpr 490	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → ¬ -∞ < 𝑦)
67	5	sselda 3913	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*)
68	67	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 ∈ ℝ*)
69		ngtmnft 13326	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑦 ∈ ℝ* → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦))
70	68, 69	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 = -∞ ↔ ¬ -∞ < 𝑦))
71	66, 70	mpbird 260	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → 𝑦 = -∞)
72	71	oveq1d 7461	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +e (𝑤 / 2)) = (-∞ +e (𝑤 / 2)))
73	72	adantllr 732	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +e (𝑤 / 2)) = (-∞ +e (𝑤 / 2)))
74	29	rpxrd 13195	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ*)
75	29	rpred 13194	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ∈ ℝ)
76		renepnf 11387	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑤 / 2) ∈ ℝ → (𝑤 / 2) ≠ +∞)
77	75, 76	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) ≠ +∞)
78		xaddmnf2 13389	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑤 / 2) ∈ ℝ* ∧ (𝑤 / 2) ≠ +∞) → (-∞ +e (𝑤 / 2)) = -∞)
79	74, 77, 78	syl2anc 596	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑤 ∈ ℝ+ → (-∞ +e (𝑤 / 2)) = -∞)
80	79	adantl 487	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑤 ∈ ℝ+) → (-∞ +e (𝑤 / 2)) = -∞)
81	80	ad2antrr 739	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (-∞ +e (𝑤 / 2)) = -∞)
82	73, 81	eqtrd 2798	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +e (𝑤 / 2)) = -∞)
83	82	adantl3r 763	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +e (𝑤 / 2)) = -∞)
84	83	adantl3r 763	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) ∧ ¬ -∞ < 𝑦) → (𝑦 +e (𝑤 / 2)) = -∞)
85	84	3adantl3 1187	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → (𝑦 +e (𝑤 / 2)) = -∞)
86	65, 85	breqtrd 5135	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≤ -∞)
87		mnfle 13294	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐵 ∈ ℝ* → -∞ ≤ 𝐵)
88	1, 87	syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → -∞ ≤ 𝐵)
89	88	adantr 486	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → -∞ ≤ 𝐵)
90	89	ad3antrrr 743	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ ¬ -∞ < 𝑦) → -∞ ≤ 𝐵)
91	90	3ad2antl1 1204	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → -∞ ≤ 𝐵)
92	62, 64, 86, 91	xrletrid 13314	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 = -∞)
93		simpllr 788	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ ¬ -∞ < 𝑦) → 𝐵 ≠ -∞)
94	93	3ad2antl1 1204	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → 𝐵 ≠ -∞)
95	94	neneqd 2964	. . . . . . . . . . . . . . . . . 18 ⊢ ((((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) ∧ ¬ -∞ < 𝑦) → ¬ 𝐵 = -∞)
96	92, 95	condan 830	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → -∞ < 𝑦)
97		simpr 490	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → ¬ 𝑦 < +∞)
98	67	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 ∈ ℝ*)
99		nltpnft 13324	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑦 ∈ ℝ* → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞))
100	98, 99	syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → (𝑦 = +∞ ↔ ¬ 𝑦 < +∞))
101	97, 100	mpbird 260	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 = +∞)
102	101	eqcomd 2769	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ = 𝑦)
103		simpr 490	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ 𝐴)
104	103	adantr 486	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → 𝑦 ∈ 𝐴)
105	102, 104	eqeltrd 2864	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ ∈ 𝐴)
106	105	3adantl2 1186	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → +∞ ∈ 𝐴)
107		simpl2 1211	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) ∧ ¬ 𝑦 < +∞) → ¬ +∞ ∈ 𝐴)
108	106, 107	condan 830	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴 ∧ 𝑦 ∈ 𝐴) → 𝑦 < +∞)
109	108	ad5ant125 1391	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) → 𝑦 < +∞)
110	109	3adant3 1150	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝑦 < +∞)
111	96, 110	jca 521	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (-∞ < 𝑦 ∧ 𝑦 < +∞))
112	67	ad5ant15 771	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴) → 𝑦 ∈ ℝ*)
113	112	3adant3 1150	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝑦 ∈ ℝ*)
114		xrrebnd 13328	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ* → (𝑦 ∈ ℝ ↔ (-∞ < 𝑦 ∧ 𝑦 < +∞)))
115	113, 114	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 ∈ ℝ ↔ (-∞ < 𝑦 ∧ 𝑦 < +∞)))
116	111, 115	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝑦 ∈ ℝ)
117	75	adantl 487	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) ∈ ℝ)
118	117	3ad2ant1 1151	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑤 / 2) ∈ ℝ)
119		rexadd 13392	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℝ ∧ (𝑤 / 2) ∈ ℝ) → (𝑦 +e (𝑤 / 2)) = (𝑦 + (𝑤 / 2)))
120	116, 118, 119	syl2anc 596	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e (𝑤 / 2)) = (𝑦 + (𝑤 / 2)))
121	116, 118	readdcld 11368	. . . . . . . . . . . . . 14 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 + (𝑤 / 2)) ∈ ℝ)
122	120, 121	eqeltrd 2864	. . . . . . . . . . . . 13 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e (𝑤 / 2)) ∈ ℝ)
123	122	rexrd 11389	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e (𝑤 / 2)) ∈ ℝ*)
124		pnfxr 11393	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ*
125	124	a1i 11	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → +∞ ∈ ℝ*)
126		simp3 1156	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝐵 ≤ (𝑦 +e (𝑤 / 2)))
127	122	ltpnfd 13280	. . . . . . . . . . . 12 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e (𝑤 / 2)) < +∞)
128	61, 123, 125, 126, 127	xrlelttrd 13319	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝐵 < +∞)
129	59, 128	jca 521	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (-∞ < 𝐵 ∧ 𝐵 < +∞))
130		xrrebnd 13328	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ* → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞)))
131	61, 130	syl 18	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝐵 ∈ ℝ ↔ (-∞ < 𝐵 ∧ 𝐵 < +∞)))
132	129, 131	mpbird 260	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝐵 ∈ ℝ)
133		rpre 13159	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → 𝑤 ∈ ℝ)
134	133	adantl 487	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → 𝑤 ∈ ℝ)
135	134	3ad2ant1 1151	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝑤 ∈ ℝ)
136		rexadd 13392	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (𝑦 +e 𝑤) = (𝑦 + 𝑤))
137	116, 135, 136	syl2anc 596	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e 𝑤) = (𝑦 + 𝑤))
138	116, 135	readdcld 11368	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 + 𝑤) ∈ ℝ)
139	137, 138	eqeltrd 2864	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e 𝑤) ∈ ℝ)
140		rphalflt 13181	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℝ+ → (𝑤 / 2) < 𝑤)
141	140	adantl 487	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑤 / 2) < 𝑤)
142	141	3ad2ant1 1151	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑤 / 2) < 𝑤)
143	118, 135, 116, 142	ltadd2dd 11499	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 + (𝑤 / 2)) < (𝑦 + 𝑤))
144	120, 137	breq12d 5119	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → ((𝑦 +e (𝑤 / 2)) < (𝑦 +e 𝑤) ↔ (𝑦 + (𝑤 / 2)) < (𝑦 + 𝑤)))
145	143, 144	mpbird 260	. . . . . . . . 9 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → (𝑦 +e (𝑤 / 2)) < (𝑦 +e 𝑤))
146	132, 122, 139, 126, 145	lelttrd 11498	. . . . . . . 8 ⊢ (((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) ∧ 𝑦 ∈ 𝐴 ∧ 𝐵 ≤ (𝑦 +e (𝑤 / 2))) → 𝐵 < (𝑦 +e 𝑤))
147	146	3exp 1137	. . . . . . 7 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (𝑦 ∈ 𝐴 → (𝐵 ≤ (𝑦 +e (𝑤 / 2)) → 𝐵 < (𝑦 +e 𝑤))))
148	50, 147	reximdai 3268	. . . . . 6 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → (∃𝑦 ∈ 𝐴 𝐵 ≤ (𝑦 +e (𝑤 / 2)) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +e 𝑤)))
149	49, 148	mpd 16	. . . . 5 ⊢ ((((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) ∧ 𝑤 ∈ ℝ+) → ∃𝑦 ∈ 𝐴 𝐵 < (𝑦 +e 𝑤))
150	23, 25, 27, 149	supxrgelem 46564	. . . 4 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ 𝐵 ≠ -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
151	20, 22, 150	syl2anc 596	. . 3 ⊢ (((𝜑 ∧ ¬ +∞ ∈ 𝐴) ∧ ¬ 𝐵 = -∞) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
152	19, 151	pm2.61dan 825	. 2 ⊢ ((𝜑 ∧ ¬ +∞ ∈ 𝐴) → 𝐵 ≤ sup(𝐴, ℝ*, < ))
153	11, 152	pm2.61dan 825	1 ⊢ (𝜑 → 𝐵 ≤ sup(𝐴, ℝ*, < ))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570  Ⅎwnf 1816   ∈ wcel 2147   ≠ wne 2959  ∃wrex 3090  Vcvv 3454   ⊆ wss 3900   class class class wbr 5106  (class class class)co 7446  supcsup 9462  ℝcr 11229   + caddc 11233  +∞cpnf 11370  -∞cmnf 11371  ℝ^*cxr 11372   < clt 11373   ≤ cle 11374   / cdiv 12003  2c2 12427  ℝ⁺crp 13150   +_e cxad 13269

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-sep 5253  ax-nul 5264  ax-pow 5332  ax-pr 5396  ax-un 7778  ax-cnex 11286  ax-resscn 11287  ax-1cn 11288  ax-icn 11289  ax-addcl 11290  ax-addrcl 11291  ax-mulcl 11292  ax-mulrcl 11293  ax-mulcom 11294  ax-addass 11295  ax-mulass 11296  ax-distr 11297  ax-i2m1 11298  ax-1ne0 11299  ax-1rid 11300  ax-rnegex 11301  ax-rrecex 11302  ax-cnre 11303  ax-pre-lttri 11304  ax-pre-lttrn 11305  ax-pre-ltadd 11306  ax-pre-mulgt0 11307  ax-pre-sup 11308

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4839  df-uni 4871  df-iun 4956  df-br 5107  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5551  df-eprel 5556  df-po 5564  df-so 5565  df-fr 5609  df-we 5611  df-xp 5662  df-rel 5663  df-cnv 5664  df-co 5665  df-dm 5666  df-rn 5667  df-res 5668  df-ima 5669  df-pred 6325  df-ord 6386  df-on 6387  df-lim 6388  df-suc 6389  df-iota 6515  df-fun 6563  df-fn 6564  df-f 6565  df-f1 6566  df-fo 6567  df-f1o 6568  df-fv 6569  df-riota 7403  df-ov 7449  df-oprab 7450  df-mpo 7451  df-om 7905  df-1st 8028  df-2nd 8029  df-frecs 8330  df-wrecs 8361  df-recs 8410  df-rdg 8449  df-er 8748  df-en 9005  df-dom 9006  df-sdom 9007  df-sup 9464  df-pnf 11375  df-mnf 11376  df-xr 11377  df-ltxr 11378  df-le 11379  df-sub 11573  df-neg 11574  df-div 12004  df-nn 12366  df-2 12435  df-rp 13151  df-xadd 13272

This theorem is used by:  sge0gerp  47620