Theorem alephreg 10530

Description: A successor aleph is regular. Theorem 11.15 of [TakeutiZaring] p. 103. (Contributed by Mario Carneiro, 9-Mar-2013.)

Assertion

Ref	Expression
alephreg	⊢ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)

Proof of Theorem alephreg

Dummy variables 𝑓 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		alephordilem1 10019	. . . 4 ⊢ (𝐴 ∈ On → (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
2		alephon 10015	. . . . . . . . 9 ⊢ (ℵ‘suc 𝐴) ∈ On
3		cff1 10205	. . . . . . . . 9 ⊢ ((ℵ‘suc 𝐴) ∈ On → ∃𝑓(𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)))
4	2, 3	ax-mp 5	. . . . . . . 8 ⊢ ∃𝑓(𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦))
5		fvex 6869	. . . . . . . . . . . . 13 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ V
6		fvex 6869	. . . . . . . . . . . . . 14 ⊢ (𝑓‘𝑦) ∈ V
7	6	sucex 7778	. . . . . . . . . . . . 13 ⊢ suc (𝑓‘𝑦) ∈ V
8	5, 7	iunex 7938	. . . . . . . . . . . 12 ⊢ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∈ V
9		f1f 6749	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
10	9	ad2antrr 734	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
11		simplr 776	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦))
12	2	oneli 6450	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (ℵ‘suc 𝐴) → 𝑥 ∈ On)
13		ffvelcdm 7051	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴))
14		onelon 6360	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((ℵ‘suc 𝐴) ∈ On ∧ (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)) → (𝑓‘𝑦) ∈ On)
15	2, 13, 14	sylancr 595	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ On)
16		onsssuc 6427	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑥 ∈ On ∧ (𝑓‘𝑦) ∈ On) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
17	15, 16	sylan2 601	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴)))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
18	17	anassrs 470	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
19	18	rexbidva 3178	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦)))
20		eliun 4947	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦))
21	19, 20	bitr4di 291	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
22	21	ancoms 461	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ On) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
23	12, 22	sylan2 601	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ (ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
24	23	ralbidva 3177	. . . . . . . . . . . . . . 15 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
25		dfss3 3920	. . . . . . . . . . . . . . 15 ⊢ ((ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
26	24, 25	bitr4di 291	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
27	26	biimpa 479	. . . . . . . . . . . . 13 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
28	10, 11, 27	syl2anc 592	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
29		ssdomg 8970	. . . . . . . . . . . 12 ⊢ (∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∈ V → ((ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) → (ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
30	8, 28, 29	mpsyl 68	. . . . . . . . . . 11 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
31		simprl 778	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝐴 ∈ On)
32		onsuc 7782	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → suc 𝐴 ∈ On)
33		alephislim 10029	. . . . . . . . . . . . . . . . . . 19 ⊢ (suc 𝐴 ∈ On ↔ Lim (ℵ‘suc 𝐴))
34		limsuc 7818	. . . . . . . . . . . . . . . . . . 19 ⊢ (Lim (ℵ‘suc 𝐴) → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
35	33, 34	sylbi 219	. . . . . . . . . . . . . . . . . 18 ⊢ (suc 𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
36	32, 35	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
37		breq1 5097	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = suc (𝑓‘𝑦) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
38		alephcard 10016	. . . . . . . . . . . . . . . . . . . 20 ⊢ (card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)
39		iscard 9923	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) ↔ ((ℵ‘suc 𝐴) ∈ On ∧ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)))
40	39	simprbi 500	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) → ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴))
41	38, 40	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)
42	37, 41	vtoclri 3544	. . . . . . . . . . . . . . . . . 18 ⊢ (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴))
43		alephsucdom 10025	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ≼ (ℵ‘𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
44	42, 43	imbitrrid 248	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
45	36, 44	sylbid 242	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
46	13, 45	syl5 34	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ On → ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
47	46	expdimp 455	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (𝑦 ∈ (cf‘(ℵ‘suc 𝐴)) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
48	47	ralrimiv 3147	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴))
49		iundom 10489	. . . . . . . . . . . . 13 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ V ∧ ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
50	5, 48, 49	sylancr 595	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
51	31, 10, 50	syl2anc 592	. . . . . . . . . . 11 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
52		domtr 8977	. . . . . . . . . . 11 ⊢ (((ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∧ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
53	30, 51, 52	syl2anc 592	. . . . . . . . . 10 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
54	53	expcom 416	. . . . . . . . 9 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))))
55	54	exlimdv 1947	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (∃𝑓(𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))))
56	4, 55	mpi 20	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
57		alephgeom 10028	. . . . . . . . . 10 ⊢ (𝐴 ∈ On ↔ ω ⊆ (ℵ‘𝐴))
58		alephon 10015	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ On
59		infxpen 9960	. . . . . . . . . . 11 ⊢ (((ℵ‘𝐴) ∈ On ∧ ω ⊆ (ℵ‘𝐴)) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
60	58, 59	mpan 698	. . . . . . . . . 10 ⊢ (ω ⊆ (ℵ‘𝐴) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
61	57, 60	sylbi 219	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
62		breq1 5097	. . . . . . . . . . . 12 ⊢ (𝑧 = (cf‘(ℵ‘suc 𝐴)) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
63	62, 41	vtoclri 3544	. . . . . . . . . . 11 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴))
64		alephsucdom 10025	. . . . . . . . . . 11 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
65	63, 64	imbitrrid 248	. . . . . . . . . 10 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴)))
66		fvex 6869	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ V
67	66	xpdom1 9037	. . . . . . . . . 10 ⊢ ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)))
68	65, 67	syl6 35	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴))))
69		domentr 8983	. . . . . . . . . 10 ⊢ ((((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)) ∧ ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴))
70	69	expcom 416	. . . . . . . . 9 ⊢ (((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴) → (((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)))
71	61, 68, 70	sylsyld 61	. . . . . . . 8 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)))
72	71	imp 409	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴))
73		domtr 8977	. . . . . . 7 ⊢ (((ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ∧ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
74	56, 72, 73	syl2anc 592	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
75		domnsym 9064	. . . . . 6 ⊢ ((ℵ‘suc 𝐴) ≼ (ℵ‘𝐴) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
76	74, 75	syl 17	. . . . 5 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
77	76	ex 415	. . . 4 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴)))
78	1, 77	mt2d 136	. . 3 ⊢ (𝐴 ∈ On → ¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))
79		cfon 10201	. . . . 5 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ On
80		cfle 10200	. . . . . 6 ⊢ (cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴)
81		onsseleq 6376	. . . . . 6 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ On ∧ (ℵ‘suc 𝐴) ∈ On) → ((cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴) ↔ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))))
82	80, 81	mpbii 235	. . . . 5 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ On ∧ (ℵ‘suc 𝐴) ∈ On) → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)))
83	79, 2, 82	mp2an 700	. . . 4 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
84	83	ori 870	. . 3 ⊢ (¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
85	78, 84	syl 17	. 2 ⊢ (𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
86		cf0 10197	. . 3 ⊢ (cf‘∅) = ∅
87		alephfnon 10011	. . . . . . . 8 ⊢ ℵ Fn On
88	87	fndmi 6614	. . . . . . 7 ⊢ dom ℵ = On
89	88	eleq2i 2848	. . . . . 6 ⊢ (suc 𝐴 ∈ dom ℵ ↔ suc 𝐴 ∈ On)
90		onsucb 7786	. . . . . 6 ⊢ (𝐴 ∈ On ↔ suc 𝐴 ∈ On)
91	89, 90	bitr4i 280	. . . . 5 ⊢ (suc 𝐴 ∈ dom ℵ ↔ 𝐴 ∈ On)
92		ndmfv 6888	. . . . 5 ⊢ (¬ suc 𝐴 ∈ dom ℵ → (ℵ‘suc 𝐴) = ∅)
93	91, 92	sylnbir 333	. . . 4 ⊢ (¬ 𝐴 ∈ On → (ℵ‘suc 𝐴) = ∅)
94	93	fveq2d 6860	. . 3 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (cf‘∅))
95	86, 94, 93	3eqtr4a 2817	. 2 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
96	85, 95	pm2.61i 183	1 ⊢ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)

Syntax hints:  ¬ wn 3   ↔ wb 208   ∧ wa 398   ∨ wo 856   = wceq 1554  ∃wex 1793   ∈ wcel 2136  ∀wral 3070  ∃wrex 3080  Vcvv 3448   ⊆ wss 3899  ∅c0 4280  ∪ ciun 4943   class class class wbr 5094   × cxp 5638  dom cdm 5640  Oncon0 6335  Lim wlim 6336  suc csuc 6337  ⟶wf 6506  –1-1→wf1 6507  ‘cfv 6510  ωcom 7835   ≈ cen 8913   ≼ cdom 8914   ≺ csdm 8915  cardccrd 9883  ℵcale 9884  cfccf 9885

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1809  ax-4 1823  ax-5 1924  ax-6 1981  ax-7 2022  ax-8 2138  ax-9 2146  ax-10 2169  ax-11 2185  ax-12 2206  ax-ext 2728  ax-rep 5221  ax-sep 5240  ax-nul 5250  ax-pow 5316  ax-pr 5384  ax-un 7707  ax-inf2 9586  ax-ac2 10410

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 857  df-3or 1096  df-3an 1097  df-tru 1557  df-fal 1567  df-ex 1794  df-nf 1798  df-sb 2085  df-mo 2560  df-eu 2590  df-clab 2735  df-cleq 2748  df-clel 2831  df-nfc 2905  df-ne 2952  df-ral 3071  df-rex 3081  df-rmo 3361  df-reu 3362  df-rab 3409  df-v 3450  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4281  df-if 4475  df-pw 4551  df-sn 4577  df-pr 4579  df-op 4583  df-uni 4860  df-int 4900  df-iun 4945  df-br 5095  df-opab 5157  df-mpt 5176  df-tr 5202  df-id 5535  df-eprel 5540  df-po 5548  df-so 5549  df-fr 5593  df-se 5594  df-we 5595  df-xp 5646  df-rel 5647  df-cnv 5648  df-co 5649  df-dm 5650  df-rn 5651  df-res 5652  df-ima 5653  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6466  df-fun 6512  df-fn 6513  df-f 6514  df-f1 6515  df-fo 6516  df-f1o 6517  df-fv 6518  df-isom 6519  df-riota 7342  df-ov 7388  df-oprab 7389  df-mpo 7390  df-om 7836  df-1st 7959  df-2nd 7960  df-frecs 8250  df-wrecs 8281  df-recs 8330  df-rdg 8369  df-1o 8425  df-er 8666  df-map 8798  df-en 8917  df-dom 8918  df-sdom 8919  df-fin 8920  df-oi 9448  df-har 9495  df-card 9887  df-aleph 9888  df-cf 9889  df-acn 9890  df-ac 10062

This theorem is referenced by:  pwcfsdom  10531  minregex  44058