Theorem alephreg 10566

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 10056	. . . 4 ⊢ (𝐴 ∈ On → (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
2		alephon 10052	. . . . . . . . 9 ⊢ (ℵ‘suc 𝐴) ∈ On
3		cff1 10241	. . . . . . . . 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 6894	. . . . . . . . . . . . 13 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ V
6		fvex 6894	. . . . . . . . . . . . . 14 ⊢ (𝑓‘𝑦) ∈ V
7	6	sucex 7804	. . . . . . . . . . . . 13 ⊢ suc (𝑓‘𝑦) ∈ V
8	5, 7	iunex 7964	. . . . . . . . . . . 12 ⊢ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∈ V
9		f1f 6774	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
10	9	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
11		simplr 780	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦))
12	2	oneli 6476	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (ℵ‘suc 𝐴) → 𝑥 ∈ On)
13		ffvelcdm 7076	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴))
14		onelon 6385	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((ℵ‘suc 𝐴) ∈ On ∧ (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)) → (𝑓‘𝑦) ∈ On)
15	2, 13, 14	sylancr 598	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ On)
16		onsssuc 6453	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑥 ∈ On ∧ (𝑓‘𝑦) ∈ On) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
17	15, 16	sylan2 604	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴)))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
18	17	anassrs 472	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
19	18	rexbidva 3185	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦)))
20		eliun 4959	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦))
21	19, 20	bitr4di 292	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
22	21	ancoms 463	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ On) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
23	12, 22	sylan2 604	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ (ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
24	23	ralbidva 3184	. . . . . . . . . . . . . . 15 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
25		dfss3 3925	. . . . . . . . . . . . . . 15 ⊢ ((ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
26	24, 25	bitr4di 292	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
27	26	biimpa 481	. . . . . . . . . . . . 13 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
28	10, 11, 27	syl2anc 595	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
29		ssdomg 8996	. . . . . . . . . . . 12 ⊢ (∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∈ V → ((ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) → (ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
30	8, 28, 29	mpsyl 69	. . . . . . . . . . 11 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
31		simprl 782	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝐴 ∈ On)
32		onsuc 7808	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → suc 𝐴 ∈ On)
33		alephislim 10066	. . . . . . . . . . . . . . . . . . 19 ⊢ (suc 𝐴 ∈ On ↔ Lim (ℵ‘suc 𝐴))
34		limsuc 7844	. . . . . . . . . . . . . . . . . . 19 ⊢ (Lim (ℵ‘suc 𝐴) → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
35	33, 34	sylbi 220	. . . . . . . . . . . . . . . . . 18 ⊢ (suc 𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
36	32, 35	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
37		breq1 5111	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = suc (𝑓‘𝑦) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
38		alephcard 10053	. . . . . . . . . . . . . . . . . . . 20 ⊢ (card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)
39		iscard 9960	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) ↔ ((ℵ‘suc 𝐴) ∈ On ∧ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)))
40	39	simprbi 502	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) → ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴))
41	38, 40	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)
42	37, 41	vtoclri 3548	. . . . . . . . . . . . . . . . . 18 ⊢ (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴))
43		alephsucdom 10062	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ≼ (ℵ‘𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
44	42, 43	imbitrrid 249	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
45	36, 44	sylbid 243	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
46	13, 45	syl5 35	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ On → ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
47	46	expdimp 457	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (𝑦 ∈ (cf‘(ℵ‘suc 𝐴)) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
48	47	ralrimiv 3154	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴))
49		iundom 10525	. . . . . . . . . . . . 13 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ V ∧ ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
50	5, 48, 49	sylancr 598	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
51	31, 10, 50	syl2anc 595	. . . . . . . . . . 11 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
52		domtr 9003	. . . . . . . . . . 11 ⊢ (((ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∧ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
53	30, 51, 52	syl2anc 595	. . . . . . . . . 10 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
54	53	expcom 418	. . . . . . . . 9 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))))
55	54	exlimdv 1961	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (∃𝑓(𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))))
56	4, 55	mpi 21	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
57		alephgeom 10065	. . . . . . . . . 10 ⊢ (𝐴 ∈ On ↔ ω ⊆ (ℵ‘𝐴))
58		alephon 10052	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ On
59		infxpen 9997	. . . . . . . . . . 11 ⊢ (((ℵ‘𝐴) ∈ On ∧ ω ⊆ (ℵ‘𝐴)) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
60	58, 59	mpan 702	. . . . . . . . . 10 ⊢ (ω ⊆ (ℵ‘𝐴) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
61	57, 60	sylbi 220	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
62		breq1 5111	. . . . . . . . . . . 12 ⊢ (𝑧 = (cf‘(ℵ‘suc 𝐴)) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
63	62, 41	vtoclri 3548	. . . . . . . . . . 11 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴))
64		alephsucdom 10062	. . . . . . . . . . 11 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
65	63, 64	imbitrrid 249	. . . . . . . . . 10 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴)))
66		fvex 6894	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ V
67	66	xpdom1 9063	. . . . . . . . . 10 ⊢ ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)))
68	65, 67	syl6 36	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴))))
69		domentr 9009	. . . . . . . . . 10 ⊢ ((((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)) ∧ ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴))
70	69	expcom 418	. . . . . . . . 9 ⊢ (((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴) → (((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)))
71	61, 68, 70	sylsyld 62	. . . . . . . 8 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)))
72	71	imp 411	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴))
73		domtr 9003	. . . . . . 7 ⊢ (((ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ∧ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
74	56, 72, 73	syl2anc 595	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
75		domnsym 9090	. . . . . 6 ⊢ ((ℵ‘suc 𝐴) ≼ (ℵ‘𝐴) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
76	74, 75	syl 18	. . . . 5 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
77	76	ex 417	. . . 4 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴)))
78	1, 77	mt2d 137	. . 3 ⊢ (𝐴 ∈ On → ¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))
79		cfon 10237	. . . . 5 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ On
80		cfle 10236	. . . . . 6 ⊢ (cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴)
81		onsseleq 6402	. . . . . 6 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ On ∧ (ℵ‘suc 𝐴) ∈ On) → ((cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴) ↔ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))))
82	80, 81	mpbii 236	. . . . 5 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ On ∧ (ℵ‘suc 𝐴) ∈ On) → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)))
83	79, 2, 82	mp2an 704	. . . 4 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
84	83	ori 874	. . 3 ⊢ (¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
85	78, 84	syl 18	. 2 ⊢ (𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
86		cf0 10233	. . 3 ⊢ (cf‘∅) = ∅
87		alephfnon 10048	. . . . . . . 8 ⊢ ℵ Fn On
88	87	fndmi 6639	. . . . . . 7 ⊢ dom ℵ = On
89	88	eleq2i 2853	. . . . . 6 ⊢ (suc 𝐴 ∈ dom ℵ ↔ suc 𝐴 ∈ On)
90		onsucb 7812	. . . . . 6 ⊢ (𝐴 ∈ On ↔ suc 𝐴 ∈ On)
91	89, 90	bitr4i 281	. . . . 5 ⊢ (suc 𝐴 ∈ dom ℵ ↔ 𝐴 ∈ On)
92		ndmfv 6913	. . . . 5 ⊢ (¬ suc 𝐴 ∈ dom ℵ → (ℵ‘suc 𝐴) = ∅)
93	91, 92	sylnbir 334	. . . 4 ⊢ (¬ 𝐴 ∈ On → (ℵ‘suc 𝐴) = ∅)
94	93	fveq2d 6885	. . 3 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (cf‘∅))
95	86, 94, 93	3eqtr4a 2822	. 2 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
96	85, 95	pm2.61i 184	1 ⊢ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)

Syntax hints:  ¬ wn 3   ↔ wb 209   ∧ wa 400   ∨ wo 860   = wceq 1568  ∃wex 1807   ∈ wcel 2141  ∀wral 3077  ∃wrex 3087  Vcvv 3453   ⊆ wss 3904  ∅c0 4285  ∪ ciun 4955   class class class wbr 5108   × cxp 5659  dom cdm 5661  Oncon0 6360  Lim wlim 6361  suc csuc 6362  ⟶wf 6532  –1-1→wf1 6533  ‘cfv 6536  ωcom 7861   ≈ cen 8939   ≼ cdom 8940   ≺ csdm 8941  cardccrd 9920  ℵcale 9921  cfccf 9922

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1823  ax-4 1837  ax-5 1938  ax-6 1995  ax-7 2036  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-inf2 9609  ax-ac2 10446

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1571  df-fal 1581  df-ex 1808  df-nf 1812  df-sb 2095  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-pss 3924  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-int 4912  df-iun 4957  df-br 5109  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-se 5615  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-isom 6545  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7862  df-1st 7985  df-2nd 7986  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-rdg 8396  df-1o 8452  df-er 8693  df-map 8825  df-en 8943  df-dom 8944  df-sdom 8945  df-fin 8946  df-oi 9471  df-har 9518  df-card 9924  df-aleph 9925  df-cf 9926  df-acn 9927  df-ac 10099

This theorem is referenced by:  pwcfsdom  10567  minregex  44230