Theorem alephfp 10120

Description: The aleph function has a fixed point. Similar to Proposition 11.18 of [TakeutiZaring] p. 104, except that we construct an actual example of a fixed point rather than just showing its existence. See alephfp2 10121 for an abbreviated version just showing existence. (Contributed by NM, 6-Nov-2004.) (Proof shortened by Mario Carneiro, 15-May-2015.)

Hypothesis

Ref	Expression
alephfplem.1	⊢ 𝐻 = (rec(ℵ, ω) ↾ ω)

Assertion

Ref	Expression
alephfp	⊢ (ℵ‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω)

Proof of Theorem alephfp

Dummy variables 𝑧 𝑣 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		alephfplem.1	. . 3 ⊢ 𝐻 = (rec(ℵ, ω) ↾ ω)
2	1	alephfplem4 10119	. 2 ⊢ ∪ (𝐻 “ ω) ∈ ran ℵ
3		isinfcard 10104	. . 3 ⊢ ((ω ⊆ ∪ (𝐻 “ ω) ∧ (card‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω)) ↔ ∪ (𝐻 “ ω) ∈ ran ℵ)
4		cardalephex 10102	. . . 4 ⊢ (ω ⊆ ∪ (𝐻 “ ω) → ((card‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω) ↔ ∃𝑧 ∈ On ∪ (𝐻 “ ω) = (ℵ‘𝑧)))
5	4	biimpa 476	. . 3 ⊢ ((ω ⊆ ∪ (𝐻 “ ω) ∧ (card‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω)) → ∃𝑧 ∈ On ∪ (𝐻 “ ω) = (ℵ‘𝑧))
6	3, 5	sylbir 235	. 2 ⊢ (∪ (𝐻 “ ω) ∈ ran ℵ → ∃𝑧 ∈ On ∪ (𝐻 “ ω) = (ℵ‘𝑧))
7		alephle 10100	. . . . . . . . 9 ⊢ (𝑧 ∈ On → 𝑧 ⊆ (ℵ‘𝑧))
8		alephon 10081	. . . . . . . . . . 11 ⊢ (ℵ‘𝑧) ∈ On
9	8	onirri 6466	. . . . . . . . . 10 ⊢ ¬ (ℵ‘𝑧) ∈ (ℵ‘𝑧)
10		frfnom 8447	. . . . . . . . . . . . . 14 ⊢ (rec(ℵ, ω) ↾ ω) Fn ω
11	1	fneq1i 6634	. . . . . . . . . . . . . 14 ⊢ (𝐻 Fn ω ↔ (rec(ℵ, ω) ↾ ω) Fn ω)
12	10, 11	mpbir 231	. . . . . . . . . . . . 13 ⊢ 𝐻 Fn ω
13		fnfun 6637	. . . . . . . . . . . . 13 ⊢ (𝐻 Fn ω → Fun 𝐻)
14		eluniima 7241	. . . . . . . . . . . . 13 ⊢ (Fun 𝐻 → (𝑧 ∈ ∪ (𝐻 “ ω) ↔ ∃𝑣 ∈ ω 𝑧 ∈ (𝐻‘𝑣)))
15	12, 13, 14	mp2b 10	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ∪ (𝐻 “ ω) ↔ ∃𝑣 ∈ ω 𝑧 ∈ (𝐻‘𝑣))
16		alephsson 10112	. . . . . . . . . . . . . . . 16 ⊢ ran ℵ ⊆ On
17	1	alephfplem3 10118	. . . . . . . . . . . . . . . 16 ⊢ (𝑣 ∈ ω → (𝐻‘𝑣) ∈ ran ℵ)
18	16, 17	sselid 3956	. . . . . . . . . . . . . . 15 ⊢ (𝑣 ∈ ω → (𝐻‘𝑣) ∈ On)
19		alephord2i 10089	. . . . . . . . . . . . . . 15 ⊢ ((𝐻‘𝑣) ∈ On → (𝑧 ∈ (𝐻‘𝑣) → (ℵ‘𝑧) ∈ (ℵ‘(𝐻‘𝑣))))
20	18, 19	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝑣 ∈ ω → (𝑧 ∈ (𝐻‘𝑣) → (ℵ‘𝑧) ∈ (ℵ‘(𝐻‘𝑣))))
21	1	alephfplem2 10117	. . . . . . . . . . . . . . . . 17 ⊢ (𝑣 ∈ ω → (𝐻‘suc 𝑣) = (ℵ‘(𝐻‘𝑣)))
22		peano2 7884	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑣 ∈ ω → suc 𝑣 ∈ ω)
23		fnfvelrn 7069	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐻 Fn ω ∧ suc 𝑣 ∈ ω) → (𝐻‘suc 𝑣) ∈ ran 𝐻)
24	12, 23	mpan 690	. . . . . . . . . . . . . . . . . . 19 ⊢ (suc 𝑣 ∈ ω → (𝐻‘suc 𝑣) ∈ ran 𝐻)
25		fnima 6667	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝐻 Fn ω → (𝐻 “ ω) = ran 𝐻)
26	12, 25	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐻 “ ω) = ran 𝐻
27	24, 26	eleqtrrdi 2845	. . . . . . . . . . . . . . . . . 18 ⊢ (suc 𝑣 ∈ ω → (𝐻‘suc 𝑣) ∈ (𝐻 “ ω))
28	22, 27	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑣 ∈ ω → (𝐻‘suc 𝑣) ∈ (𝐻 “ ω))
29	21, 28	eqeltrrd 2835	. . . . . . . . . . . . . . . 16 ⊢ (𝑣 ∈ ω → (ℵ‘(𝐻‘𝑣)) ∈ (𝐻 “ ω))
30		elssuni 4913	. . . . . . . . . . . . . . . 16 ⊢ ((ℵ‘(𝐻‘𝑣)) ∈ (𝐻 “ ω) → (ℵ‘(𝐻‘𝑣)) ⊆ ∪ (𝐻 “ ω))
31	29, 30	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝑣 ∈ ω → (ℵ‘(𝐻‘𝑣)) ⊆ ∪ (𝐻 “ ω))
32	31	sseld 3957	. . . . . . . . . . . . . 14 ⊢ (𝑣 ∈ ω → ((ℵ‘𝑧) ∈ (ℵ‘(𝐻‘𝑣)) → (ℵ‘𝑧) ∈ ∪ (𝐻 “ ω)))
33	20, 32	syld 47	. . . . . . . . . . . . 13 ⊢ (𝑣 ∈ ω → (𝑧 ∈ (𝐻‘𝑣) → (ℵ‘𝑧) ∈ ∪ (𝐻 “ ω)))
34	33	rexlimiv 3134	. . . . . . . . . . . 12 ⊢ (∃𝑣 ∈ ω 𝑧 ∈ (𝐻‘𝑣) → (ℵ‘𝑧) ∈ ∪ (𝐻 “ ω))
35	15, 34	sylbi 217	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ∪ (𝐻 “ ω) → (ℵ‘𝑧) ∈ ∪ (𝐻 “ ω))
36		eleq2 2823	. . . . . . . . . . . 12 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → (𝑧 ∈ ∪ (𝐻 “ ω) ↔ 𝑧 ∈ (ℵ‘𝑧)))
37		eleq2 2823	. . . . . . . . . . . 12 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → ((ℵ‘𝑧) ∈ ∪ (𝐻 “ ω) ↔ (ℵ‘𝑧) ∈ (ℵ‘𝑧)))
38	36, 37	imbi12d 344	. . . . . . . . . . 11 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → ((𝑧 ∈ ∪ (𝐻 “ ω) → (ℵ‘𝑧) ∈ ∪ (𝐻 “ ω)) ↔ (𝑧 ∈ (ℵ‘𝑧) → (ℵ‘𝑧) ∈ (ℵ‘𝑧))))
39	35, 38	mpbii 233	. . . . . . . . . 10 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → (𝑧 ∈ (ℵ‘𝑧) → (ℵ‘𝑧) ∈ (ℵ‘𝑧)))
40	9, 39	mtoi 199	. . . . . . . . 9 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → ¬ 𝑧 ∈ (ℵ‘𝑧))
41	7, 40	anim12i 613	. . . . . . . 8 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → (𝑧 ⊆ (ℵ‘𝑧) ∧ ¬ 𝑧 ∈ (ℵ‘𝑧)))
42		eloni 6362	. . . . . . . . . 10 ⊢ (𝑧 ∈ On → Ord 𝑧)
43	8	onordi 6464	. . . . . . . . . 10 ⊢ Ord (ℵ‘𝑧)
44		ordtri4 6389	. . . . . . . . . 10 ⊢ ((Ord 𝑧 ∧ Ord (ℵ‘𝑧)) → (𝑧 = (ℵ‘𝑧) ↔ (𝑧 ⊆ (ℵ‘𝑧) ∧ ¬ 𝑧 ∈ (ℵ‘𝑧))))
45	42, 43, 44	sylancl 586	. . . . . . . . 9 ⊢ (𝑧 ∈ On → (𝑧 = (ℵ‘𝑧) ↔ (𝑧 ⊆ (ℵ‘𝑧) ∧ ¬ 𝑧 ∈ (ℵ‘𝑧))))
46	45	adantr 480	. . . . . . . 8 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → (𝑧 = (ℵ‘𝑧) ↔ (𝑧 ⊆ (ℵ‘𝑧) ∧ ¬ 𝑧 ∈ (ℵ‘𝑧))))
47	41, 46	mpbird 257	. . . . . . 7 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → 𝑧 = (ℵ‘𝑧))
48		eqeq2 2747	. . . . . . . 8 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → (𝑧 = ∪ (𝐻 “ ω) ↔ 𝑧 = (ℵ‘𝑧)))
49	48	adantl 481	. . . . . . 7 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → (𝑧 = ∪ (𝐻 “ ω) ↔ 𝑧 = (ℵ‘𝑧)))
50	47, 49	mpbird 257	. . . . . 6 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → 𝑧 = ∪ (𝐻 “ ω))
51	50	eqcomd 2741	. . . . 5 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → ∪ (𝐻 “ ω) = 𝑧)
52	51	fveq2d 6879	. . . 4 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → (ℵ‘∪ (𝐻 “ ω)) = (ℵ‘𝑧))
53		eqeq2 2747	. . . . 5 ⊢ (∪ (𝐻 “ ω) = (ℵ‘𝑧) → ((ℵ‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω) ↔ (ℵ‘∪ (𝐻 “ ω)) = (ℵ‘𝑧)))
54	53	adantl 481	. . . 4 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → ((ℵ‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω) ↔ (ℵ‘∪ (𝐻 “ ω)) = (ℵ‘𝑧)))
55	52, 54	mpbird 257	. . 3 ⊢ ((𝑧 ∈ On ∧ ∪ (𝐻 “ ω) = (ℵ‘𝑧)) → (ℵ‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω))
56	55	rexlimiva 3133	. 2 ⊢ (∃𝑧 ∈ On ∪ (𝐻 “ ω) = (ℵ‘𝑧) → (ℵ‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω))
57	2, 6, 56	mp2b 10	1 ⊢ (ℵ‘∪ (𝐻 “ ω)) = ∪ (𝐻 “ ω)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   = wceq 1540   ∈ wcel 2108  ∃wrex 3060   ⊆ wss 3926  ∪ cuni 4883  ran crn 5655   ↾ cres 5656   “ cima 5657  Ord word 6351  Oncon0 6352  suc csuc 6354  Fun wfun 6524   Fn wfn 6525  ‘cfv 6530  ωcom 7859  reccrdg 8421  cardccrd 9947  ℵcale 9948

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7727  ax-inf2 9653

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-se 5607  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6483  df-fun 6532  df-fn 6533  df-f 6534  df-f1 6535  df-fo 6536  df-f1o 6537  df-fv 6538  df-isom 6539  df-riota 7360  df-ov 7406  df-om 7860  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8383  df-rdg 8422  df-1o 8478  df-er 8717  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-oi 9522  df-har 9569  df-card 9951  df-aleph 9952

This theorem is referenced by:  alephfp2  10121