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

Theorem cardlim 10009
Description: An infinite cardinal is a limit ordinal. Equivalent to Exercise 4 of [TakeutiZaring] p. 91. (Contributed by Mario Carneiro, 13-Jan-2013.)
Assertion
Ref Expression
cardlim (ω ⊆ (card‘𝐴) ↔ Lim (card‘𝐴))

Proof of Theorem cardlim
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 sseq2 4021 . . . . . . . . . . 11 ((card‘𝐴) = suc 𝑥 → (ω ⊆ (card‘𝐴) ↔ ω ⊆ suc 𝑥))
21biimpd 229 . . . . . . . . . 10 ((card‘𝐴) = suc 𝑥 → (ω ⊆ (card‘𝐴) → ω ⊆ suc 𝑥))
3 limom 7902 . . . . . . . . . . . 12 Lim ω
4 limsssuc 7870 . . . . . . . . . . . 12 (Lim ω → (ω ⊆ 𝑥 ↔ ω ⊆ suc 𝑥))
53, 4ax-mp 5 . . . . . . . . . . 11 (ω ⊆ 𝑥 ↔ ω ⊆ suc 𝑥)
6 infensuc 9193 . . . . . . . . . . . 12 ((𝑥 ∈ On ∧ ω ⊆ 𝑥) → 𝑥 ≈ suc 𝑥)
76ex 412 . . . . . . . . . . 11 (𝑥 ∈ On → (ω ⊆ 𝑥𝑥 ≈ suc 𝑥))
85, 7biimtrrid 243 . . . . . . . . . 10 (𝑥 ∈ On → (ω ⊆ suc 𝑥𝑥 ≈ suc 𝑥))
92, 8sylan9r 508 . . . . . . . . 9 ((𝑥 ∈ On ∧ (card‘𝐴) = suc 𝑥) → (ω ⊆ (card‘𝐴) → 𝑥 ≈ suc 𝑥))
10 breq2 5151 . . . . . . . . . 10 ((card‘𝐴) = suc 𝑥 → (𝑥 ≈ (card‘𝐴) ↔ 𝑥 ≈ suc 𝑥))
1110adantl 481 . . . . . . . . 9 ((𝑥 ∈ On ∧ (card‘𝐴) = suc 𝑥) → (𝑥 ≈ (card‘𝐴) ↔ 𝑥 ≈ suc 𝑥))
129, 11sylibrd 259 . . . . . . . 8 ((𝑥 ∈ On ∧ (card‘𝐴) = suc 𝑥) → (ω ⊆ (card‘𝐴) → 𝑥 ≈ (card‘𝐴)))
1312ex 412 . . . . . . 7 (𝑥 ∈ On → ((card‘𝐴) = suc 𝑥 → (ω ⊆ (card‘𝐴) → 𝑥 ≈ (card‘𝐴))))
1413com3r 87 . . . . . 6 (ω ⊆ (card‘𝐴) → (𝑥 ∈ On → ((card‘𝐴) = suc 𝑥𝑥 ≈ (card‘𝐴))))
1514imp 406 . . . . 5 ((ω ⊆ (card‘𝐴) ∧ 𝑥 ∈ On) → ((card‘𝐴) = suc 𝑥𝑥 ≈ (card‘𝐴)))
16 vex 3481 . . . . . . . . . 10 𝑥 ∈ V
1716sucid 6467 . . . . . . . . 9 𝑥 ∈ suc 𝑥
18 eleq2 2827 . . . . . . . . 9 ((card‘𝐴) = suc 𝑥 → (𝑥 ∈ (card‘𝐴) ↔ 𝑥 ∈ suc 𝑥))
1917, 18mpbiri 258 . . . . . . . 8 ((card‘𝐴) = suc 𝑥𝑥 ∈ (card‘𝐴))
20 cardidm 9996 . . . . . . . 8 (card‘(card‘𝐴)) = (card‘𝐴)
2119, 20eleqtrrdi 2849 . . . . . . 7 ((card‘𝐴) = suc 𝑥𝑥 ∈ (card‘(card‘𝐴)))
22 cardne 10002 . . . . . . 7 (𝑥 ∈ (card‘(card‘𝐴)) → ¬ 𝑥 ≈ (card‘𝐴))
2321, 22syl 17 . . . . . 6 ((card‘𝐴) = suc 𝑥 → ¬ 𝑥 ≈ (card‘𝐴))
2423a1i 11 . . . . 5 ((ω ⊆ (card‘𝐴) ∧ 𝑥 ∈ On) → ((card‘𝐴) = suc 𝑥 → ¬ 𝑥 ≈ (card‘𝐴)))
2515, 24pm2.65d 196 . . . 4 ((ω ⊆ (card‘𝐴) ∧ 𝑥 ∈ On) → ¬ (card‘𝐴) = suc 𝑥)
2625nrexdv 3146 . . 3 (ω ⊆ (card‘𝐴) → ¬ ∃𝑥 ∈ On (card‘𝐴) = suc 𝑥)
27 peano1 7910 . . . . . 6 ∅ ∈ ω
28 ssel 3988 . . . . . 6 (ω ⊆ (card‘𝐴) → (∅ ∈ ω → ∅ ∈ (card‘𝐴)))
2927, 28mpi 20 . . . . 5 (ω ⊆ (card‘𝐴) → ∅ ∈ (card‘𝐴))
30 n0i 4345 . . . . 5 (∅ ∈ (card‘𝐴) → ¬ (card‘𝐴) = ∅)
31 cardon 9981 . . . . . . . . 9 (card‘𝐴) ∈ On
3231onordi 6496 . . . . . . . 8 Ord (card‘𝐴)
33 ordzsl 7865 . . . . . . . 8 (Ord (card‘𝐴) ↔ ((card‘𝐴) = ∅ ∨ ∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴)))
3432, 33mpbi 230 . . . . . . 7 ((card‘𝐴) = ∅ ∨ ∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴))
35 3orass 1089 . . . . . . 7 (((card‘𝐴) = ∅ ∨ ∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴)) ↔ ((card‘𝐴) = ∅ ∨ (∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴))))
3634, 35mpbi 230 . . . . . 6 ((card‘𝐴) = ∅ ∨ (∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴)))
3736ori 861 . . . . 5 (¬ (card‘𝐴) = ∅ → (∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴)))
3829, 30, 373syl 18 . . . 4 (ω ⊆ (card‘𝐴) → (∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 ∨ Lim (card‘𝐴)))
3938ord 864 . . 3 (ω ⊆ (card‘𝐴) → (¬ ∃𝑥 ∈ On (card‘𝐴) = suc 𝑥 → Lim (card‘𝐴)))
4026, 39mpd 15 . 2 (ω ⊆ (card‘𝐴) → Lim (card‘𝐴))
41 limomss 7891 . 2 (Lim (card‘𝐴) → ω ⊆ (card‘𝐴))
4240, 41impbii 209 1 (ω ⊆ (card‘𝐴) ↔ Lim (card‘𝐴))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847  w3o 1085   = wceq 1536  wcel 2105  wrex 3067  wss 3962  c0 4338   class class class wbr 5147  Ord word 6384  Oncon0 6385  Lim wlim 6386  suc csuc 6387  cfv 6562  ωcom 7886  cen 8980  cardccrd 9972
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1791  ax-4 1805  ax-5 1907  ax-6 1964  ax-7 2004  ax-8 2107  ax-9 2115  ax-10 2138  ax-11 2154  ax-12 2174  ax-ext 2705  ax-sep 5301  ax-nul 5311  ax-pow 5370  ax-pr 5437  ax-un 7753
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1539  df-fal 1549  df-ex 1776  df-nf 1780  df-sb 2062  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2726  df-clel 2813  df-nfc 2889  df-ne 2938  df-ral 3059  df-rex 3068  df-rab 3433  df-v 3479  df-sbc 3791  df-csb 3908  df-dif 3965  df-un 3967  df-in 3969  df-ss 3979  df-pss 3982  df-nul 4339  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4912  df-int 4951  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5582  df-eprel 5588  df-po 5596  df-so 5597  df-fr 5640  df-we 5642  df-xp 5694  df-rel 5695  df-cnv 5696  df-co 5697  df-dm 5698  df-rn 5699  df-res 5700  df-ima 5701  df-ord 6388  df-on 6389  df-lim 6390  df-suc 6391  df-iota 6515  df-fun 6564  df-fn 6565  df-f 6566  df-f1 6567  df-fo 6568  df-f1o 6569  df-fv 6570  df-om 7887  df-er 8743  df-en 8984  df-dom 8985  df-card 9976
This theorem is referenced by:  infxpenlem  10050  alephislim  10120  cflim2  10300  winalim  10732  gruina  10855
  Copyright terms: Public domain W3C validator