MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  supxrre Structured version   Visualization version   GIF version

Theorem supxrre 12364
Description: The real and extended real suprema match when the real supremum exists. (Contributed by NM, 18-Oct-2005.) (Proof shortened by Mario Carneiro, 7-Sep-2014.)
Assertion
Ref Expression
supxrre ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ*, < ) = sup(𝐴, ℝ, < ))
Distinct variable group:   𝑥,𝑦,𝐴

Proof of Theorem supxrre
Dummy variable 𝑧 is distinct from all other variables.
StepHypRef Expression
1 suprcl 11241 . . . 4 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ, < ) ∈ ℝ)
21leidd 10852 . . 3 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ, < ))
3 suprleub 11247 . . . . 5 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ sup(𝐴, ℝ, < ) ∈ ℝ) → (sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ, < ) ↔ ∀𝑧𝐴 𝑧 ≤ sup(𝐴, ℝ, < )))
41, 3mpdan 678 . . . 4 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ, < ) ↔ ∀𝑧𝐴 𝑧 ≤ sup(𝐴, ℝ, < )))
5 simp1 1166 . . . . . 6 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → 𝐴 ⊆ ℝ)
6 ressxr 10341 . . . . . 6 ℝ ⊆ ℝ*
75, 6syl6ss 3775 . . . . 5 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → 𝐴 ⊆ ℝ*)
81rexrd 10347 . . . . 5 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ, < ) ∈ ℝ*)
9 supxrleub 12363 . . . . 5 ((𝐴 ⊆ ℝ* ∧ sup(𝐴, ℝ, < ) ∈ ℝ*) → (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < ) ↔ ∀𝑧𝐴 𝑧 ≤ sup(𝐴, ℝ, < )))
107, 8, 9syl2anc 579 . . . 4 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < ) ↔ ∀𝑧𝐴 𝑧 ≤ sup(𝐴, ℝ, < )))
114, 10bitr4d 273 . . 3 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ, < ) ↔ sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < )))
122, 11mpbid 223 . 2 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < ))
13 supxrcl 12352 . . . . 5 (𝐴 ⊆ ℝ* → sup(𝐴, ℝ*, < ) ∈ ℝ*)
147, 13syl 17 . . . 4 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ*, < ) ∈ ℝ*)
1514xrleidd 12190 . . 3 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ*, < ))
16 supxrleub 12363 . . . . 5 ((𝐴 ⊆ ℝ* ∧ sup(𝐴, ℝ*, < ) ∈ ℝ*) → (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ*, < ) ↔ ∀𝑥𝐴 𝑥 ≤ sup(𝐴, ℝ*, < )))
177, 14, 16syl2anc 579 . . . 4 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ*, < ) ↔ ∀𝑥𝐴 𝑥 ≤ sup(𝐴, ℝ*, < )))
18 simp2 1167 . . . . . . . 8 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → 𝐴 ≠ ∅)
19 n0 4097 . . . . . . . 8 (𝐴 ≠ ∅ ↔ ∃𝑧 𝑧𝐴)
2018, 19sylib 209 . . . . . . 7 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → ∃𝑧 𝑧𝐴)
21 mnfxr 10354 . . . . . . . . 9 -∞ ∈ ℝ*
2221a1i 11 . . . . . . . 8 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → -∞ ∈ ℝ*)
235sselda 3763 . . . . . . . . 9 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → 𝑧 ∈ ℝ)
2423rexrd 10347 . . . . . . . 8 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → 𝑧 ∈ ℝ*)
2514adantr 472 . . . . . . . 8 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → sup(𝐴, ℝ*, < ) ∈ ℝ*)
26 mnflt 12162 . . . . . . . . 9 (𝑧 ∈ ℝ → -∞ < 𝑧)
2723, 26syl 17 . . . . . . . 8 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → -∞ < 𝑧)
28 supxrub 12361 . . . . . . . . 9 ((𝐴 ⊆ ℝ*𝑧𝐴) → 𝑧 ≤ sup(𝐴, ℝ*, < ))
297, 28sylan 575 . . . . . . . 8 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → 𝑧 ≤ sup(𝐴, ℝ*, < ))
3022, 24, 25, 27, 29xrltletrd 12199 . . . . . . 7 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ 𝑧𝐴) → -∞ < sup(𝐴, ℝ*, < ))
3120, 30exlimddv 2030 . . . . . 6 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → -∞ < sup(𝐴, ℝ*, < ))
32 xrre 12207 . . . . . 6 (((sup(𝐴, ℝ*, < ) ∈ ℝ* ∧ sup(𝐴, ℝ, < ) ∈ ℝ) ∧ (-∞ < sup(𝐴, ℝ*, < ) ∧ sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < ))) → sup(𝐴, ℝ*, < ) ∈ ℝ)
3314, 1, 31, 12, 32syl22anc 867 . . . . 5 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ*, < ) ∈ ℝ)
34 suprleub 11247 . . . . 5 (((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) ∧ sup(𝐴, ℝ*, < ) ∈ ℝ) → (sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ*, < ) ↔ ∀𝑥𝐴 𝑥 ≤ sup(𝐴, ℝ*, < )))
3533, 34mpdan 678 . . . 4 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ*, < ) ↔ ∀𝑥𝐴 𝑥 ≤ sup(𝐴, ℝ*, < )))
3617, 35bitr4d 273 . . 3 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ*, < ) ↔ sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ*, < )))
3715, 36mpbid 223 . 2 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ*, < ))
38 xrletri3 12192 . . 3 ((sup(𝐴, ℝ*, < ) ∈ ℝ* ∧ sup(𝐴, ℝ, < ) ∈ ℝ*) → (sup(𝐴, ℝ*, < ) = sup(𝐴, ℝ, < ) ↔ (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < ) ∧ sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ*, < ))))
3914, 8, 38syl2anc 579 . 2 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → (sup(𝐴, ℝ*, < ) = sup(𝐴, ℝ, < ) ↔ (sup(𝐴, ℝ*, < ) ≤ sup(𝐴, ℝ, < ) ∧ sup(𝐴, ℝ, < ) ≤ sup(𝐴, ℝ*, < ))))
4012, 37, 39mpbir2and 704 1 ((𝐴 ⊆ ℝ ∧ 𝐴 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦𝐴 𝑦𝑥) → sup(𝐴, ℝ*, < ) = sup(𝐴, ℝ, < ))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 197  wa 384  w3a 1107   = wceq 1652  wex 1874  wcel 2155  wne 2937  wral 3055  wrex 3056  wss 3734  c0 4081   class class class wbr 4811  supcsup 8557  cr 10192  -∞cmnf 10330  *cxr 10331   < clt 10332  cle 10333
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1890  ax-4 1904  ax-5 2005  ax-6 2070  ax-7 2105  ax-8 2157  ax-9 2164  ax-10 2183  ax-11 2198  ax-12 2211  ax-13 2352  ax-ext 2743  ax-sep 4943  ax-nul 4951  ax-pow 5003  ax-pr 5064  ax-un 7151  ax-cnex 10249  ax-resscn 10250  ax-1cn 10251  ax-icn 10252  ax-addcl 10253  ax-addrcl 10254  ax-mulcl 10255  ax-mulrcl 10256  ax-mulcom 10257  ax-addass 10258  ax-mulass 10259  ax-distr 10260  ax-i2m1 10261  ax-1ne0 10262  ax-1rid 10263  ax-rnegex 10264  ax-rrecex 10265  ax-cnre 10266  ax-pre-lttri 10267  ax-pre-lttrn 10268  ax-pre-ltadd 10269  ax-pre-mulgt0 10270  ax-pre-sup 10271
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 874  df-3or 1108  df-3an 1109  df-tru 1656  df-ex 1875  df-nf 1879  df-sb 2063  df-mo 2565  df-eu 2582  df-clab 2752  df-cleq 2758  df-clel 2761  df-nfc 2896  df-ne 2938  df-nel 3041  df-ral 3060  df-rex 3061  df-reu 3062  df-rmo 3063  df-rab 3064  df-v 3352  df-sbc 3599  df-csb 3694  df-dif 3737  df-un 3739  df-in 3741  df-ss 3748  df-nul 4082  df-if 4246  df-pw 4319  df-sn 4337  df-pr 4339  df-op 4343  df-uni 4597  df-br 4812  df-opab 4874  df-mpt 4891  df-id 5187  df-po 5200  df-so 5201  df-xp 5285  df-rel 5286  df-cnv 5287  df-co 5288  df-dm 5289  df-rn 5290  df-res 5291  df-ima 5292  df-iota 6033  df-fun 6072  df-fn 6073  df-f 6074  df-f1 6075  df-fo 6076  df-f1o 6077  df-fv 6078  df-riota 6807  df-ov 6849  df-oprab 6850  df-mpt2 6851  df-er 7951  df-en 8165  df-dom 8166  df-sdom 8167  df-sup 8559  df-pnf 10334  df-mnf 10335  df-xr 10336  df-ltxr 10337  df-le 10338  df-sub 10526  df-neg 10527
This theorem is referenced by:  supxrbnd  12365  ovoliunlem1  23574  ovoliun2  23578  ioombl1lem4  23633  uniioombllem2  23655  uniioombllem6  23660  itg1climres  23786  itg2monolem1  23822  itg2i1fseq2  23828  nmcexi  29362  itg2addnc  33908  supxrrernmpt  40309  supminfxr  40355  sge0supre  41267  sge0reuzb  41326
  Copyright terms: Public domain W3C validator