Theorem winalim2 10784

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.

Step	Hyp	Ref	Expression
1		winacard 10780	. . . 4 ⊢ (𝐴 ∈ Inaccw → (card‘𝐴) = 𝐴)
2		winainf 10782	. . . . 5 ⊢ (𝐴 ∈ Inaccw → ω ⊆ 𝐴)
3		cardalephex 10172	. . . . 5 ⊢ (ω ⊆ 𝐴 → ((card‘𝐴) = 𝐴 ↔ ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥)))
4	2, 3	syl 18	. . . 4 ⊢ (𝐴 ∈ Inaccw → ((card‘𝐴) = 𝐴 ↔ ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥)))
5	1, 4	mpbid 235	. . 3 ⊢ (𝐴 ∈ Inaccw → ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥))
6	5	adantr 486	. 2 ⊢ ((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) → ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥))
7		df-rex 3087	. . 3 ⊢ (∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥) ↔ ∃𝑥(𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥)))
8		simprr 785	. . . . . . 7 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → 𝐴 = (ℵ‘𝑥))
9	8	eqcomd 2766	. . . . . 6 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (ℵ‘𝑥) = 𝐴)
10		simprl 783	. . . . . . . 8 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → 𝑥 ∈ On)
11		onzsl 7857	. . . . . . . 8 ⊢ (𝑥 ∈ On ↔ (𝑥 = ∅ ∨ ∃𝑦 ∈ On 𝑥 = suc 𝑦 ∨ (𝑥 ∈ V ∧ Lim 𝑥)))
12	10, 11	sylib 221	. . . . . . 7 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (𝑥 = ∅ ∨ ∃𝑦 ∈ On 𝑥 = suc 𝑦 ∨ (𝑥 ∈ V ∧ Lim 𝑥)))
13		simplr 781	. . . . . . . . . 10 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → 𝐴 ≠ ω)
14		fveq2 6885	. . . . . . . . . . . . . 14 ⊢ (𝑥 = ∅ → (ℵ‘𝑥) = (ℵ‘∅))
15		aleph0 10148	. . . . . . . . . . . . . 14 ⊢ (ℵ‘∅) = ω
16	14, 15	eqtrdi 2811	. . . . . . . . . . . . 13 ⊢ (𝑥 = ∅ → (ℵ‘𝑥) = ω)
17		eqtr 2780	. . . . . . . . . . . . 13 ⊢ ((𝐴 = (ℵ‘𝑥) ∧ (ℵ‘𝑥) = ω) → 𝐴 = ω)
18	16, 17	sylan2 605	. . . . . . . . . . . 12 ⊢ ((𝐴 = (ℵ‘𝑥) ∧ 𝑥 = ∅) → 𝐴 = ω)
19	18	ex 418	. . . . . . . . . . 11 ⊢ (𝐴 = (ℵ‘𝑥) → (𝑥 = ∅ → 𝐴 = ω))
20	19	necon3ad 2968	. . . . . . . . . 10 ⊢ (𝐴 = (ℵ‘𝑥) → (𝐴 ≠ ω → ¬ 𝑥 = ∅))
21	8, 13, 20	sylc 66	. . . . . . . . 9 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ¬ 𝑥 = ∅)
22	21	pm2.21d 122	. . . . . . . 8 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (𝑥 = ∅ → Lim 𝑥))
23		breq1 5105	. . . . . . . . . . . . . 14 ⊢ (𝑧 = (ℵ‘𝑦) → (𝑧 ≺ 𝑤 ↔ (ℵ‘𝑦) ≺ 𝑤))
24	23	rexbidv 3186	. . . . . . . . . . . . 13 ⊢ (𝑧 = (ℵ‘𝑦) → (∃𝑤 ∈ 𝐴 𝑧 ≺ 𝑤 ↔ ∃𝑤 ∈ 𝐴 (ℵ‘𝑦) ≺ 𝑤))
25		elwina 10774	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ Inaccw ↔ (𝐴 ≠ ∅ ∧ (cf‘𝐴) = 𝐴 ∧ ∀𝑧 ∈ 𝐴 ∃𝑤 ∈ 𝐴 𝑧 ≺ 𝑤))
26	25	simp3bi 1165	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ Inaccw → ∀𝑧 ∈ 𝐴 ∃𝑤 ∈ 𝐴 𝑧 ≺ 𝑤)
27	26	ad3antrrr 743	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → ∀𝑧 ∈ 𝐴 ∃𝑤 ∈ 𝐴 𝑧 ≺ 𝑤)
28		onsuc 7824	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ On → suc 𝑦 ∈ On)
29		vex 3454	. . . . . . . . . . . . . . . . 17 ⊢ 𝑦 ∈ V
30	29	sucid 6447	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ suc 𝑦
31		alephord2i 10159	. . . . . . . . . . . . . . . 16 ⊢ (suc 𝑦 ∈ On → (𝑦 ∈ suc 𝑦 → (ℵ‘𝑦) ∈ (ℵ‘suc 𝑦)))
32	28, 30, 31	mpisyl 22	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ On → (ℵ‘𝑦) ∈ (ℵ‘suc 𝑦))
33	32	ad2antrl 741	. . . . . . . . . . . . . 14 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (ℵ‘𝑦) ∈ (ℵ‘suc 𝑦))
34		simplrr 790	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → 𝐴 = (ℵ‘𝑥))
35		fveq2 6885	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = suc 𝑦 → (ℵ‘𝑥) = (ℵ‘suc 𝑦))
36	35	ad2antll 742	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (ℵ‘𝑥) = (ℵ‘suc 𝑦))
37	34, 36	eqtrd 2795	. . . . . . . . . . . . . 14 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → 𝐴 = (ℵ‘suc 𝑦))
38	33, 37	eleqtrrd 2863	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (ℵ‘𝑦) ∈ 𝐴)
39	24, 27, 38	rspcdva 3577	. . . . . . . . . . . 12 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → ∃𝑤 ∈ 𝐴 (ℵ‘𝑦) ≺ 𝑤)
40	39	expr 462	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ 𝑦 ∈ On) → (𝑥 = suc 𝑦 → ∃𝑤 ∈ 𝐴 (ℵ‘𝑦) ≺ 𝑤))
41		iscard 10059	. . . . . . . . . . . . . . . . . . 19 ⊢ ((card‘𝐴) = 𝐴 ↔ (𝐴 ∈ On ∧ ∀𝑤 ∈ 𝐴 𝑤 ≺ 𝐴))
42	41	simprbi 503	. . . . . . . . . . . . . . . . . 18 ⊢ ((card‘𝐴) = 𝐴 → ∀𝑤 ∈ 𝐴 𝑤 ≺ 𝐴)
43		rsp 3250	. . . . . . . . . . . . . . . . . 18 ⊢ (∀𝑤 ∈ 𝐴 𝑤 ≺ 𝐴 → (𝑤 ∈ 𝐴 → 𝑤 ≺ 𝐴))
44	1, 42, 43	3syl 19	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ Inaccw → (𝑤 ∈ 𝐴 → 𝑤 ≺ 𝐴))
45	44	ad3antrrr 743	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤 ∈ 𝐴 → 𝑤 ≺ 𝐴))
46	37	breq2d 5114	. . . . . . . . . . . . . . . 16 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤 ≺ 𝐴 ↔ 𝑤 ≺ (ℵ‘suc 𝑦)))
47	45, 46	sylibd 242	. . . . . . . . . . . . . . 15 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤 ∈ 𝐴 → 𝑤 ≺ (ℵ‘suc 𝑦)))
48		alephnbtwn2 10154	. . . . . . . . . . . . . . . 16 ⊢ ¬ ((ℵ‘𝑦) ≺ 𝑤 ∧ 𝑤 ≺ (ℵ‘suc 𝑦))
49		pm3.21 477	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ≺ (ℵ‘suc 𝑦) → ((ℵ‘𝑦) ≺ 𝑤 → ((ℵ‘𝑦) ≺ 𝑤 ∧ 𝑤 ≺ (ℵ‘suc 𝑦))))
50	48, 49	mtoi 202	. . . . . . . . . . . . . . 15 ⊢ (𝑤 ≺ (ℵ‘suc 𝑦) → ¬ (ℵ‘𝑦) ≺ 𝑤)
51	47, 50	syl6 36	. . . . . . . . . . . . . 14 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → (𝑤 ∈ 𝐴 → ¬ (ℵ‘𝑦) ≺ 𝑤))
52	51	imp 412	. . . . . . . . . . . . 13 ⊢ (((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) ∧ 𝑤 ∈ 𝐴) → ¬ (ℵ‘𝑦) ≺ 𝑤)
53	52	nrexdv 3157	. . . . . . . . . . . 12 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ (𝑦 ∈ On ∧ 𝑥 = suc 𝑦)) → ¬ ∃𝑤 ∈ 𝐴 (ℵ‘𝑦) ≺ 𝑤)
54	53	expr 462	. . . . . . . . . . 11 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ 𝑦 ∈ On) → (𝑥 = suc 𝑦 → ¬ ∃𝑤 ∈ 𝐴 (ℵ‘𝑦) ≺ 𝑤))
55	40, 54	pm2.65d 199	. . . . . . . . . 10 ⊢ ((((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) ∧ 𝑦 ∈ On) → ¬ 𝑥 = suc 𝑦)
56	55	nrexdv 3157	. . . . . . . . 9 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ¬ ∃𝑦 ∈ On 𝑥 = suc 𝑦)
57	56	pm2.21d 122	. . . . . . . 8 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → (∃𝑦 ∈ On 𝑥 = suc 𝑦 → Lim 𝑥))
58		simpr 490	. . . . . . . . 9 ⊢ ((𝑥 ∈ V ∧ Lim 𝑥) → Lim 𝑥)
59	58	a1i 11	. . . . . . . 8 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ((𝑥 ∈ V ∧ Lim 𝑥) → Lim 𝑥))
60	22, 57, 59	3jaod 1456	. . . . . . 7 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ((𝑥 = ∅ ∨ ∃𝑦 ∈ On 𝑥 = suc 𝑦 ∨ (𝑥 ∈ V ∧ Lim 𝑥)) → Lim 𝑥))
61	12, 60	mpd 16	. . . . . 6 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → Lim 𝑥)
62	9, 61	jca 521	. . . . 5 ⊢ (((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) ∧ (𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥))) → ((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥))
63	62	ex 418	. . . 4 ⊢ ((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) → ((𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥)) → ((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥)))
64	63	eximdv 1949	. . 3 ⊢ ((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) → (∃𝑥(𝑥 ∈ On ∧ 𝐴 = (ℵ‘𝑥)) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥)))
65	7, 64	biimtrid 245	. 2 ⊢ ((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) → (∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥)))
66	6, 65	mpd 16	1 ⊢ ((𝐴 ∈ Inaccw ∧ 𝐴 ≠ ω) → ∃𝑥((ℵ‘𝑥) = 𝐴 ∧ Lim 𝑥))

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ w3o 1102   = wceq 1569  ∃wex 1811   ∈ wcel 2144   ≠ wne 2955  ∀wral 3076  ∃wrex 3086  Vcvv 3450   ⊆ wss 3895  ∅c0 4278   class class class wbr 5102  Oncon0 6362  Lim wlim 6363  suc csuc 6364  ‘cfv 6538  ωcom 7877   ≺ csdm 8975  cardccrd 10019  ℵcale 10020  cfccf 10021  Inacc_wcwina 10770

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-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7751  ax-inf2 9645

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 3847  df-ss 3896  df-pss 4014  df-dif 4047  df-in 4091  df-un 4151  df-nul 4279  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 5545  df-eprel 5550  df-po 5558  df-so 5559  df-fr 5603  df-se 5604  df-we 5605  df-xp 5656  df-rel 5657  df-cnv 5658  df-co 5659  df-dm 5660  df-rn 5661  df-res 5662  df-ima 5663  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-isom 6547  df-riota 7377  df-ov 7423  df-om 7878  df-2nd 8002  df-frecs 8302  df-wrecs 8333  df-recs 8382  df-rdg 8421  df-1o 8479  df-er 8720  df-en 8977  df-dom 8978  df-sdom 8979  df-fin 8980  df-oi 9507  df-har 9554  df-card 10023  df-aleph 10024  df-cf 10025  df-wina 10772

This theorem is used by:  winafp  10785