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

Theorem alephinit 9374
Description: An infinite initial ordinal is characterized by the property of being initial - that is, it is a subset of any dominating ordinal. (Contributed by Jeff Hankins, 29-Oct-2009.) (Proof shortened by Mario Carneiro, 20-Sep-2014.)
Assertion
Ref Expression
alephinit ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 ∈ ran ℵ ↔ ∀𝑥 ∈ On (𝐴𝑥𝐴𝑥)))
Distinct variable group:   𝑥,𝐴

Proof of Theorem alephinit
StepHypRef Expression
1 isinfcard 9371 . . . . 5 ((ω ⊆ 𝐴 ∧ (card‘𝐴) = 𝐴) ↔ 𝐴 ∈ ran ℵ)
21bicomi 225 . . . 4 (𝐴 ∈ ran ℵ ↔ (ω ⊆ 𝐴 ∧ (card‘𝐴) = 𝐴))
32baib 536 . . 3 (ω ⊆ 𝐴 → (𝐴 ∈ ran ℵ ↔ (card‘𝐴) = 𝐴))
43adantl 482 . 2 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 ∈ ran ℵ ↔ (card‘𝐴) = 𝐴))
5 onenon 9231 . . . . . . . 8 (𝐴 ∈ On → 𝐴 ∈ dom card)
65adantr 481 . . . . . . 7 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → 𝐴 ∈ dom card)
7 onenon 9231 . . . . . . 7 (𝑥 ∈ On → 𝑥 ∈ dom card)
8 carddom2 9259 . . . . . . 7 ((𝐴 ∈ dom card ∧ 𝑥 ∈ dom card) → ((card‘𝐴) ⊆ (card‘𝑥) ↔ 𝐴𝑥))
96, 7, 8syl2an 595 . . . . . 6 (((𝐴 ∈ On ∧ ω ⊆ 𝐴) ∧ 𝑥 ∈ On) → ((card‘𝐴) ⊆ (card‘𝑥) ↔ 𝐴𝑥))
10 cardonle 9239 . . . . . . . 8 (𝑥 ∈ On → (card‘𝑥) ⊆ 𝑥)
1110adantl 482 . . . . . . 7 (((𝐴 ∈ On ∧ ω ⊆ 𝐴) ∧ 𝑥 ∈ On) → (card‘𝑥) ⊆ 𝑥)
12 sstr 3903 . . . . . . . 8 (((card‘𝐴) ⊆ (card‘𝑥) ∧ (card‘𝑥) ⊆ 𝑥) → (card‘𝐴) ⊆ 𝑥)
1312expcom 414 . . . . . . 7 ((card‘𝑥) ⊆ 𝑥 → ((card‘𝐴) ⊆ (card‘𝑥) → (card‘𝐴) ⊆ 𝑥))
1411, 13syl 17 . . . . . 6 (((𝐴 ∈ On ∧ ω ⊆ 𝐴) ∧ 𝑥 ∈ On) → ((card‘𝐴) ⊆ (card‘𝑥) → (card‘𝐴) ⊆ 𝑥))
159, 14sylbird 261 . . . . 5 (((𝐴 ∈ On ∧ ω ⊆ 𝐴) ∧ 𝑥 ∈ On) → (𝐴𝑥 → (card‘𝐴) ⊆ 𝑥))
16 sseq1 3919 . . . . . 6 ((card‘𝐴) = 𝐴 → ((card‘𝐴) ⊆ 𝑥𝐴𝑥))
1716imbi2d 342 . . . . 5 ((card‘𝐴) = 𝐴 → ((𝐴𝑥 → (card‘𝐴) ⊆ 𝑥) ↔ (𝐴𝑥𝐴𝑥)))
1815, 17syl5ibcom 246 . . . 4 (((𝐴 ∈ On ∧ ω ⊆ 𝐴) ∧ 𝑥 ∈ On) → ((card‘𝐴) = 𝐴 → (𝐴𝑥𝐴𝑥)))
1918ralrimdva 3158 . . 3 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → ((card‘𝐴) = 𝐴 → ∀𝑥 ∈ On (𝐴𝑥𝐴𝑥)))
20 oncardid 9238 . . . . . . 7 (𝐴 ∈ On → (card‘𝐴) ≈ 𝐴)
21 ensym 8413 . . . . . . 7 ((card‘𝐴) ≈ 𝐴𝐴 ≈ (card‘𝐴))
22 endom 8391 . . . . . . 7 (𝐴 ≈ (card‘𝐴) → 𝐴 ≼ (card‘𝐴))
2320, 21, 223syl 18 . . . . . 6 (𝐴 ∈ On → 𝐴 ≼ (card‘𝐴))
2423adantr 481 . . . . 5 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → 𝐴 ≼ (card‘𝐴))
25 cardon 9226 . . . . . 6 (card‘𝐴) ∈ On
26 breq2 4972 . . . . . . . 8 (𝑥 = (card‘𝐴) → (𝐴𝑥𝐴 ≼ (card‘𝐴)))
27 sseq2 3920 . . . . . . . 8 (𝑥 = (card‘𝐴) → (𝐴𝑥𝐴 ⊆ (card‘𝐴)))
2826, 27imbi12d 346 . . . . . . 7 (𝑥 = (card‘𝐴) → ((𝐴𝑥𝐴𝑥) ↔ (𝐴 ≼ (card‘𝐴) → 𝐴 ⊆ (card‘𝐴))))
2928rspcv 3557 . . . . . 6 ((card‘𝐴) ∈ On → (∀𝑥 ∈ On (𝐴𝑥𝐴𝑥) → (𝐴 ≼ (card‘𝐴) → 𝐴 ⊆ (card‘𝐴))))
3025, 29ax-mp 5 . . . . 5 (∀𝑥 ∈ On (𝐴𝑥𝐴𝑥) → (𝐴 ≼ (card‘𝐴) → 𝐴 ⊆ (card‘𝐴)))
3124, 30syl5com 31 . . . 4 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (∀𝑥 ∈ On (𝐴𝑥𝐴𝑥) → 𝐴 ⊆ (card‘𝐴)))
32 cardonle 9239 . . . . . . 7 (𝐴 ∈ On → (card‘𝐴) ⊆ 𝐴)
3332adantr 481 . . . . . 6 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (card‘𝐴) ⊆ 𝐴)
3433biantrurd 533 . . . . 5 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 ⊆ (card‘𝐴) ↔ ((card‘𝐴) ⊆ 𝐴𝐴 ⊆ (card‘𝐴))))
35 eqss 3910 . . . . 5 ((card‘𝐴) = 𝐴 ↔ ((card‘𝐴) ⊆ 𝐴𝐴 ⊆ (card‘𝐴)))
3634, 35syl6bbr 290 . . . 4 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 ⊆ (card‘𝐴) ↔ (card‘𝐴) = 𝐴))
3731, 36sylibd 240 . . 3 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (∀𝑥 ∈ On (𝐴𝑥𝐴𝑥) → (card‘𝐴) = 𝐴))
3819, 37impbid 213 . 2 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → ((card‘𝐴) = 𝐴 ↔ ∀𝑥 ∈ On (𝐴𝑥𝐴𝑥)))
394, 38bitrd 280 1 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 ∈ ran ℵ ↔ ∀𝑥 ∈ On (𝐴𝑥𝐴𝑥)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396   = wceq 1525  wcel 2083  wral 3107  wss 3865   class class class wbr 4968  dom cdm 5450  ran crn 5451  Oncon0 6073  cfv 6232  ωcom 7443  cen 8361  cdom 8362  cardccrd 9217  cale 9218
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1781  ax-4 1795  ax-5 1892  ax-6 1951  ax-7 1996  ax-8 2085  ax-9 2093  ax-10 2114  ax-11 2128  ax-12 2143  ax-13 2346  ax-ext 2771  ax-rep 5088  ax-sep 5101  ax-nul 5108  ax-pow 5164  ax-pr 5228  ax-un 7326  ax-inf2 8957
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1528  df-ex 1766  df-nf 1770  df-sb 2045  df-mo 2578  df-eu 2614  df-clab 2778  df-cleq 2790  df-clel 2865  df-nfc 2937  df-ne 2987  df-ral 3112  df-rex 3113  df-reu 3114  df-rmo 3115  df-rab 3116  df-v 3442  df-sbc 3712  df-csb 3818  df-dif 3868  df-un 3870  df-in 3872  df-ss 3880  df-pss 3882  df-nul 4218  df-if 4388  df-pw 4461  df-sn 4479  df-pr 4481  df-tp 4483  df-op 4485  df-uni 4752  df-int 4789  df-iun 4833  df-br 4969  df-opab 5031  df-mpt 5048  df-tr 5071  df-id 5355  df-eprel 5360  df-po 5369  df-so 5370  df-fr 5409  df-se 5410  df-we 5411  df-xp 5456  df-rel 5457  df-cnv 5458  df-co 5459  df-dm 5460  df-rn 5461  df-res 5462  df-ima 5463  df-pred 6030  df-ord 6076  df-on 6077  df-lim 6078  df-suc 6079  df-iota 6196  df-fun 6234  df-fn 6235  df-f 6236  df-f1 6237  df-fo 6238  df-f1o 6239  df-fv 6240  df-isom 6241  df-riota 6984  df-om 7444  df-wrecs 7805  df-recs 7867  df-rdg 7905  df-er 8146  df-en 8365  df-dom 8366  df-sdom 8367  df-fin 8368  df-oi 8827  df-har 8875  df-card 9221  df-aleph 9222
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator