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

Theorem winalim2 9723
Description: A nontrivial weakly inaccessible cardinal is a limit aleph. (Contributed by Mario Carneiro, 29-May-2014.)
Assertion
Ref Expression
winalim2 ((𝐴 ∈ Inaccw𝐴 ≠ ω) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥))
Distinct variable group:   𝑥,𝐴

Proof of Theorem winalim2
Dummy variables 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 winacard 9719 . . . 4 (𝐴 ∈ Inaccw → (card‘𝐴) = 𝐴)
2 winainf 9721 . . . . 5 (𝐴 ∈ Inaccw → ω ⊆ 𝐴)
3 cardalephex 9116 . . . . 5 (ω ⊆ 𝐴 → ((card‘𝐴) = 𝐴 ↔ ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥)))
42, 3syl 17 . . . 4 (𝐴 ∈ Inaccw → ((card‘𝐴) = 𝐴 ↔ ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥)))
51, 4mpbid 222 . . 3 (𝐴 ∈ Inaccw → ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥))
65adantr 466 . 2 ((𝐴 ∈ Inaccw𝐴 ≠ ω) → ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥))
7 df-rex 3067 . . 3 (∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥) ↔ ∃𝑥(𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥)))
8 simprr 756 . . . . . . 7 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → 𝐴 = (ℵ‘𝑥))
98eqcomd 2777 . . . . . 6 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (ℵ‘𝑥) = 𝐴)
10 simprl 754 . . . . . . . 8 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → 𝑥 ∈ On)
11 onzsl 7196 . . . . . . . 8 (𝑥 ∈ On ↔ (𝑥 = ∅ ∨ ∃𝑦 ∈ On 𝑥 = suc 𝑦 ∨ (𝑥 ∈ V ∧ Lim 𝑥)))
1210, 11sylib 208 . . . . . . 7 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (𝑥 = ∅ ∨ ∃𝑦 ∈ On 𝑥 = suc 𝑦 ∨ (𝑥 ∈ V ∧ Lim 𝑥)))
13 simplr 752 . . . . . . . . . 10 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → 𝐴 ≠ ω)
14 fveq2 6333 . . . . . . . . . . . . . 14 (𝑥 = ∅ → (ℵ‘𝑥) = (ℵ‘∅))
15 aleph0 9092 . . . . . . . . . . . . . 14 (ℵ‘∅) = ω
1614, 15syl6eq 2821 . . . . . . . . . . . . 13 (𝑥 = ∅ → (ℵ‘𝑥) = ω)
17 eqtr 2790 . . . . . . . . . . . . 13 ((𝐴 = (ℵ‘𝑥) ∧ (ℵ‘𝑥) = ω) → 𝐴 = ω)
1816, 17sylan2 580 . . . . . . . . . . . 12 ((𝐴 = (ℵ‘𝑥) ∧ 𝑥 = ∅) → 𝐴 = ω)
1918ex 397 . . . . . . . . . . 11 (𝐴 = (ℵ‘𝑥) → (𝑥 = ∅ → 𝐴 = ω))
2019necon3ad 2956 . . . . . . . . . 10 (𝐴 = (ℵ‘𝑥) → (𝐴 ≠ ω → ¬ 𝑥 = ∅))
218, 13, 20sylc 65 . . . . . . . . 9 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ¬ 𝑥 = ∅)
2221pm2.21d 119 . . . . . . . 8 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (𝑥 = ∅ → Lim 𝑥))
23 breq1 4790 . . . . . . . . . . . . . 14 (𝑧 = (ℵ‘𝑦) → (𝑧𝑤 ↔ (ℵ‘𝑦) ≺ 𝑤))
2423rexbidv 3200 . . . . . . . . . . . . 13 (𝑧 = (ℵ‘𝑦) → (∃𝑤𝐴 𝑧𝑤 ↔ ∃𝑤𝐴 (ℵ‘𝑦) ≺ 𝑤))
25 elwina 9713 . . . . . . . . . . . . . . 15 (𝐴 ∈ Inaccw ↔ (𝐴 ≠ ∅ ∧ (cf‘𝐴) = 𝐴 ∧ ∀𝑧𝐴𝑤𝐴 𝑧𝑤))
2625simp3bi 1141 . . . . . . . . . . . . . 14 (𝐴 ∈ Inaccw → ∀𝑧𝐴𝑤𝐴 𝑧𝑤)
2726ad3antrrr 709 . . . . . . . . . . . . 13 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → ∀𝑧𝐴𝑤𝐴 𝑧𝑤)
28 suceloni 7163 . . . . . . . . . . . . . . . 16 (𝑦 ∈ On → suc 𝑦 ∈ On)
29 vex 3354 . . . . . . . . . . . . . . . . 17 𝑦 ∈ V
3029sucid 5946 . . . . . . . . . . . . . . . 16 𝑦 ∈ suc 𝑦
31 alephord2i 9103 . . . . . . . . . . . . . . . 16 (suc 𝑦 ∈ On → (𝑦 ∈ suc 𝑦 → (ℵ‘𝑦) ∈ (ℵ‘suc 𝑦)))
3228, 30, 31mpisyl 21 . . . . . . . . . . . . . . 15 (𝑦 ∈ On → (ℵ‘𝑦) ∈ (ℵ‘suc 𝑦))
3332ad2antrl 707 . . . . . . . . . . . . . 14 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (ℵ‘𝑦) ∈ (ℵ‘suc 𝑦))
34 simplrr 763 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → 𝐴 = (ℵ‘𝑥))
35 fveq2 6333 . . . . . . . . . . . . . . . 16 (𝑥 = suc 𝑦 → (ℵ‘𝑥) = (ℵ‘suc 𝑦))
3635ad2antll 708 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (ℵ‘𝑥) = (ℵ‘suc 𝑦))
3734, 36eqtrd 2805 . . . . . . . . . . . . . 14 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → 𝐴 = (ℵ‘suc 𝑦))
3833, 37eleqtrrd 2853 . . . . . . . . . . . . 13 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (ℵ‘𝑦) ∈ 𝐴)
3924, 27, 38rspcdva 3466 . . . . . . . . . . . 12 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → ∃𝑤𝐴 (ℵ‘𝑦) ≺ 𝑤)
4039expr 444 . . . . . . . . . . 11 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ 𝑦 ∈ On) → (𝑥 = suc 𝑦 → ∃𝑤𝐴 (ℵ‘𝑦) ≺ 𝑤))
41 iscard 9004 . . . . . . . . . . . . . . . . . . 19 ((card‘𝐴) = 𝐴 ↔ (𝐴 ∈ On ∧ ∀𝑤𝐴 𝑤𝐴))
4241simprbi 484 . . . . . . . . . . . . . . . . . 18 ((card‘𝐴) = 𝐴 → ∀𝑤𝐴 𝑤𝐴)
43 rsp 3078 . . . . . . . . . . . . . . . . . 18 (∀𝑤𝐴 𝑤𝐴 → (𝑤𝐴𝑤𝐴))
441, 42, 433syl 18 . . . . . . . . . . . . . . . . 17 (𝐴 ∈ Inaccw → (𝑤𝐴𝑤𝐴))
4544ad3antrrr 709 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤𝐴𝑤𝐴))
4637breq2d 4799 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤𝐴𝑤 ≺ (ℵ‘suc 𝑦)))
4745, 46sylibd 229 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤𝐴𝑤 ≺ (ℵ‘suc 𝑦)))
48 alephnbtwn2 9098 . . . . . . . . . . . . . . . 16 ¬ ((ℵ‘𝑦) ≺ 𝑤𝑤 ≺ (ℵ‘suc 𝑦))
49 pm3.21 457 . . . . . . . . . . . . . . . 16 (𝑤 ≺ (ℵ‘suc 𝑦) → ((ℵ‘𝑦) ≺ 𝑤 → ((ℵ‘𝑦) ≺ 𝑤𝑤 ≺ (ℵ‘suc 𝑦))))
5048, 49mtoi 190 . . . . . . . . . . . . . . 15 (𝑤 ≺ (ℵ‘suc 𝑦) → ¬ (ℵ‘𝑦) ≺ 𝑤)
5147, 50syl6 35 . . . . . . . . . . . . . 14 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤𝐴 → ¬ (ℵ‘𝑦) ≺ 𝑤))
5251imp 393 . . . . . . . . . . . . 13 (((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) ∧ 𝑤𝐴) → ¬ (ℵ‘𝑦) ≺ 𝑤)
5352nrexdv 3149 . . . . . . . . . . . 12 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → ¬ ∃𝑤𝐴 (ℵ‘𝑦) ≺ 𝑤)
5453expr 444 . . . . . . . . . . 11 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ 𝑦 ∈ On) → (𝑥 = suc 𝑦 → ¬ ∃𝑤𝐴 (ℵ‘𝑦) ≺ 𝑤))
5540, 54pm2.65d 187 . . . . . . . . . 10 ((((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ 𝑦 ∈ On) → ¬ 𝑥 = suc 𝑦)
5655nrexdv 3149 . . . . . . . . 9 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ¬ ∃𝑦 ∈ On 𝑥 = suc 𝑦)
5756pm2.21d 119 . . . . . . . 8 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (∃𝑦 ∈ On 𝑥 = suc 𝑦 → Lim 𝑥))
58 simpr 471 . . . . . . . . 9 ((𝑥 ∈ V ∧ Lim 𝑥) → Lim 𝑥)
5958a1i 11 . . . . . . . 8 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ((𝑥 ∈ V ∧ Lim 𝑥) → Lim 𝑥))
6022, 57, 593jaod 1540 . . . . . . 7 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ((𝑥 = ∅ ∨ ∃𝑦 ∈ On 𝑥 = suc 𝑦 ∨ (𝑥 ∈ V ∧ Lim 𝑥)) → Lim 𝑥))
6112, 60mpd 15 . . . . . 6 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → Lim 𝑥)
629, 61jca 501 . . . . 5 (((𝐴 ∈ Inaccw𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥))
6362ex 397 . . . 4 ((𝐴 ∈ Inaccw𝐴 ≠ ω) → ((𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥)) → ((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥)))
6463eximdv 1998 . . 3 ((𝐴 ∈ Inaccw𝐴 ≠ ω) → (∃𝑥(𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥)) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥)))
657, 64syl5bi 232 . 2 ((𝐴 ∈ Inaccw𝐴 ≠ ω) → (∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥)))
666, 65mpd 15 1 ((𝐴 ∈ Inaccw𝐴 ≠ ω) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 382  w3o 1070   = wceq 1631  wex 1852  wcel 2145  wne 2943  wral 3061  wrex 3062  Vcvv 3351  wss 3723  c0 4063   class class class wbr 4787  Oncon0 5865  Lim wlim 5866  suc csuc 5867  cfv 6030  ωcom 7215  csdm 8111  cardccrd 8964  cale 8965  cfccf 8966  Inaccwcwina 9709
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4905  ax-sep 4916  ax-nul 4924  ax-pow 4975  ax-pr 5035  ax-un 7099  ax-inf2 8705
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-pss 3739  df-nul 4064  df-if 4227  df-pw 4300  df-sn 4318  df-pr 4320  df-tp 4322  df-op 4324  df-uni 4576  df-int 4613  df-iun 4657  df-br 4788  df-opab 4848  df-mpt 4865  df-tr 4888  df-id 5158  df-eprel 5163  df-po 5171  df-so 5172  df-fr 5209  df-se 5210  df-we 5211  df-xp 5256  df-rel 5257  df-cnv 5258  df-co 5259  df-dm 5260  df-rn 5261  df-res 5262  df-ima 5263  df-pred 5822  df-ord 5868  df-on 5869  df-lim 5870  df-suc 5871  df-iota 5993  df-fun 6032  df-fn 6033  df-f 6034  df-f1 6035  df-fo 6036  df-f1o 6037  df-fv 6038  df-isom 6039  df-riota 6756  df-om 7216  df-wrecs 7562  df-recs 7624  df-rdg 7662  df-er 7899  df-en 8113  df-dom 8114  df-sdom 8115  df-fin 8116  df-oi 8574  df-har 8622  df-card 8968  df-aleph 8969  df-cf 8970  df-wina 9711
This theorem is referenced by:  winafp  9724
  Copyright terms: Public domain W3C validator