Theorem ressioosup 42192

Description: If the supremum does not belong to a set of reals, the set is a subset of the unbounded below, right-open interval, with upper bound equal to the supremum. (Contributed by Glauco Siliprandi, 26-Jun-2021.)

Hypotheses

Ref	Expression
ressioosup.a	⊢ (𝜑 → 𝐴 ⊆ ℝ)
ressioosup.s	⊢ 𝑆 = sup(𝐴, ℝ*, < )
ressioosup.n	⊢ (𝜑 → ¬ 𝑆 ∈ 𝐴)
ressioosup.i	⊢ 𝐼 = (-∞(,)𝑆)

Assertion

Ref	Expression
ressioosup	⊢ (𝜑 → 𝐴 ⊆ 𝐼)

Proof of Theorem ressioosup

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		mnfxr 10687	. . . . . 6 ⊢ -∞ ∈ ℝ*
2	1	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -∞ ∈ ℝ*)
3		ressioosup.s	. . . . . 6 ⊢ 𝑆 = sup(𝐴, ℝ*, < )
4		ressioosup.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ⊆ ℝ)
5		ressxr 10674	. . . . . . . . . 10 ⊢ ℝ ⊆ ℝ*
6	5	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → ℝ ⊆ ℝ*)
7	4, 6	sstrd 3925	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ⊆ ℝ*)
8	7	adantr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐴 ⊆ ℝ*)
9	8	supxrcld 41743	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → sup(𝐴, ℝ*, < ) ∈ ℝ*)
10	3, 9	eqeltrid 2894	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑆 ∈ ℝ*)
11	4	adantr 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐴 ⊆ ℝ)
12		simpr 488	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
13	11, 12	sseldd 3916	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ)
14	13	mnfltd 12507	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -∞ < 𝑥)
15	7	sselda 3915	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ ℝ*)
16		supxrub 12705	. . . . . . . 8 ⊢ ((𝐴 ⊆ ℝ* ∧ 𝑥 ∈ 𝐴) → 𝑥 ≤ sup(𝐴, ℝ*, < ))
17	8, 12, 16	syl2anc 587	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ≤ sup(𝐴, ℝ*, < ))
18	3	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑆 = sup(𝐴, ℝ*, < ))
19	18	eqcomd 2804	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → sup(𝐴, ℝ*, < ) = 𝑆)
20	17, 19	breqtrd 5056	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ≤ 𝑆)
21		id 22	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑆 → 𝑥 = 𝑆)
22	21	eqcomd 2804	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑆 → 𝑆 = 𝑥)
23	22	adantl 485	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 = 𝑆) → 𝑆 = 𝑥)
24		simpl 486	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 = 𝑆) → 𝑥 ∈ 𝐴)
25	23, 24	eqeltrd 2890	. . . . . . . . 9 ⊢ ((𝑥 ∈ 𝐴 ∧ 𝑥 = 𝑆) → 𝑆 ∈ 𝐴)
26	25	adantll 713	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑥 = 𝑆) → 𝑆 ∈ 𝐴)
27		ressioosup.n	. . . . . . . . 9 ⊢ (𝜑 → ¬ 𝑆 ∈ 𝐴)
28	27	ad2antrr 725	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐴) ∧ 𝑥 = 𝑆) → ¬ 𝑆 ∈ 𝐴)
29	26, 28	pm2.65da 816	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ¬ 𝑥 = 𝑆)
30	29	neqned 2994	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ≠ 𝑆)
31	15, 10, 20, 30	xrleneltd 41955	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 < 𝑆)
32	2, 10, 13, 14, 31	eliood 42135	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ (-∞(,)𝑆))
33		ressioosup.i	. . . 4 ⊢ 𝐼 = (-∞(,)𝑆)
34	32, 33	eleqtrrdi 2901	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐼)
35	34	ralrimiva 3149	. 2 ⊢ (𝜑 → ∀𝑥 ∈ 𝐴 𝑥 ∈ 𝐼)
36		dfss3 3903	. 2 ⊢ (𝐴 ⊆ 𝐼 ↔ ∀𝑥 ∈ 𝐴 𝑥 ∈ 𝐼)
37	35, 36	sylibr 237	1 ⊢ (𝜑 → 𝐴 ⊆ 𝐼)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 399   = wceq 1538   ∈ wcel 2111  ∀wral 3106   ⊆ wss 3881   class class class wbr 5030  (class class class)co 7135  supcsup 8888  ℝcr 10525  -∞cmnf 10662  ℝ^*cxr 10663   < clt 10664   ≤ cle 10665  (,)cioo 12726

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7441  ax-cnex 10582  ax-resscn 10583  ax-1cn 10584  ax-icn 10585  ax-addcl 10586  ax-addrcl 10587  ax-mulcl 10588  ax-mulrcl 10589  ax-mulcom 10590  ax-addass 10591  ax-mulass 10592  ax-distr 10593  ax-i2m1 10594  ax-1ne0 10595  ax-1rid 10596  ax-rnegex 10597  ax-rrecex 10598  ax-cnre 10599  ax-pre-lttri 10600  ax-pre-lttrn 10601  ax-pre-ltadd 10602  ax-pre-mulgt0 10603  ax-pre-sup 10604

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-nel 3092  df-ral 3111  df-rex 3112  df-reu 3113  df-rmo 3114  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-op 4532  df-uni 4801  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-id 5425  df-po 5438  df-so 5439  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-riota 7093  df-ov 7138  df-oprab 7139  df-mpo 7140  df-1st 7671  df-2nd 7672  df-er 8272  df-en 8493  df-dom 8494  df-sdom 8495  df-sup 8890  df-pnf 10666  df-mnf 10667  df-xr 10668  df-ltxr 10669  df-le 10670  df-sub 10861  df-neg 10862  df-ioo 12730

This theorem is referenced by:  pimdecfgtioo  43352  pimincfltioo  43353