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

Theorem supsr 11204
Description: A nonempty, bounded set of signed reals has a supremum. (Contributed by NM, 21-May-1996.) (Revised by Mario Carneiro, 15-Jun-2013.) (New usage is discouraged.)
Assertion
Ref Expression
supsr ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
Distinct variable group:   𝑥,𝑦,𝑧,𝐴

Proof of Theorem supsr
Dummy variables 𝑤 𝑣 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 n0 4299 . . 3 (𝐴 ≠ ∅ ↔ ∃𝑢 𝑢 ∈ 𝐴)
2 ltrelsr 11160 . . . . . . . . . . . . 13 <R ⊆ (R × R)
32brel 5716 . . . . . . . . . . . 12 (𝑦 <R 𝑥 → (𝑦 ∈ R ∧ 𝑥 ∈ R))
43simpld 500 . . . . . . . . . . 11 (𝑦 <R 𝑥 → 𝑦 ∈ R)
54ralimi 3099 . . . . . . . . . 10 (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ∀𝑦 ∈ 𝐴 𝑦 ∈ R)
6 dfss3 3898 . . . . . . . . . 10 (𝐴 ⊆ R ↔ ∀𝑦 ∈ 𝐴 𝑦 ∈ R)
75, 6sylibr 237 . . . . . . . . 9 (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → 𝐴 ⊆ R)
87sseld 3908 . . . . . . . 8 (∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝑢 ∈ 𝐴 → 𝑢 ∈ R))
98rexlimivw 3159 . . . . . . 7 (∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → (𝑢 ∈ 𝐴 → 𝑢 ∈ R))
109impcom 413 . . . . . 6 ((𝑢 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → 𝑢 ∈ R)
11 eleq1 2848 . . . . . . . . 9 (𝑢 = if(𝑢 ∈ R, 𝑢, 1R) → (𝑢 ∈ 𝐴 ↔ if(𝑢 ∈ R, 𝑢, 1R) ∈ 𝐴))
1211anbi1d 643 . . . . . . . 8 (𝑢 = if(𝑢 ∈ R, 𝑢, 1R) → ((𝑢 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) ↔ (if(𝑢 ∈ R, 𝑢, 1R) ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥)))
1312imbi1d 344 . . . . . . 7 (𝑢 = if(𝑢 ∈ R, 𝑢, 1R) → (((𝑢 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))) ↔ ((if(𝑢 ∈ R, 𝑢, 1R) ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))))
14 opeq1 4839 . . . . . . . . . . . 12 (𝑣 = 𝑤 → ⟨𝑣, 1P⟩ = ⟨𝑤, 1P⟩)
1514eceq1d 8765 . . . . . . . . . . 11 (𝑣 = 𝑤 → [⟨𝑣, 1P⟩] ~R = [⟨𝑤, 1P⟩] ~R )
1615oveq2d 7440 . . . . . . . . . 10 (𝑣 = 𝑤 → (if(𝑢 ∈ R, 𝑢, 1R) +R [⟨𝑣, 1P⟩] ~R ) = (if(𝑢 ∈ R, 𝑢, 1R) +R [⟨𝑤, 1P⟩] ~R ))
1716eleq1d 2845 . . . . . . . . 9 (𝑣 = 𝑤 → ((if(𝑢 ∈ R, 𝑢, 1R) +R [⟨𝑣, 1P⟩] ~R ) ∈ 𝐴 ↔ (if(𝑢 ∈ R, 𝑢, 1R) +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴))
1817cbvabv 2830 . . . . . . . 8 {𝑣 ∣ (if(𝑢 ∈ R, 𝑢, 1R) +R [⟨𝑣, 1P⟩] ~R ) ∈ 𝐴} = {𝑤 ∣ (if(𝑢 ∈ R, 𝑢, 1R) +R [⟨𝑤, 1P⟩] ~R ) ∈ 𝐴}
19 1sr 11173 . . . . . . . . 9 1R ∈ R
2019elimel 4551 . . . . . . . 8 if(𝑢 ∈ R, 𝑢, 1R) ∈ R
2118, 20supsrlem 11203 . . . . . . 7 ((if(𝑢 ∈ R, 𝑢, 1R) ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
2213, 21dedth 4540 . . . . . 6 (𝑢 ∈ R → ((𝑢 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
2310, 22mpcom 39 . . . . 5 ((𝑢 ∈ 𝐴 ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
2423ex 418 . . . 4 (𝑢 ∈ 𝐴 → (∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
2524exlimiv 1962 . . 3 (∃𝑢 𝑢 ∈ 𝐴 → (∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
261, 25sylbi 220 . 2 (𝐴 ≠ ∅ → (∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥 → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧))))
2726imp 412 1 ((𝐴 ≠ ∅ ∧ ∃𝑥 ∈ R ∀𝑦 ∈ 𝐴 𝑦 <R 𝑥) → ∃𝑥 ∈ R (∀𝑦 ∈ 𝐴 ¬ 𝑥 <R 𝑦 ∧ ∀𝑦 ∈ R (𝑦 <R 𝑥 → ∃𝑧 ∈ 𝐴 𝑦 <R 𝑧)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   = wceq 1569  ∃wex 1811   ∈ wcel 2144  {cab 2738   ≠ wne 2955  ∀wral 3076  ∃wrex 3086   ⊆ wss 3896  ∅c0 4277  ifcif 4481  ⟨cop 4834   class class class wbr 5102  (class class class)co 7424  [cec 8722  1Pc1p 10952   ~R cer 10956  Rcnr 10957  1Rc1r 10959   +R cplr 10961   <R cltr 10963
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-inf2 9649
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-ov 7427  df-oprab 7428  df-mpo 7429  df-om 7882  df-1st 8005  df-2nd 8006  df-frecs 8306  df-wrecs 8337  df-recs 8386  df-rdg 8425  df-1o 8483  df-oadd 8487  df-omul 8488  df-er 8724  df-ec 8726  df-qs 8730  df-ni 10964  df-pli 10965  df-mi 10966  df-lti 10967  df-plpq 11000  df-mpq 11001  df-ltpq 11002  df-enq 11003  df-nq 11004  df-erq 11005  df-plq 11006  df-mq 11007  df-1nq 11008  df-rq 11009  df-ltnq 11010  df-np 11073  df-1p 11074  df-plp 11075  df-mp 11076  df-ltp 11077  df-enr 11147  df-nr 11148  df-plr 11149  df-mr 11150  df-ltr 11151  df-0r 11152  df-1r 11153  df-m1r 11154
This theorem is used by:  axpre-sup  11261
  Copyright terms: Public domain W3C validator