Theorem alephreg 10269

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 9760	. . . 4 ⊢ (𝐴 ∈ On → (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
2		alephon 9756	. . . . . . . . 9 ⊢ (ℵ‘suc 𝐴) ∈ On
3		cff1 9945	. . . . . . . . 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 6769	. . . . . . . . . . . . 13 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ V
6		fvex 6769	. . . . . . . . . . . . . 14 ⊢ (𝑓‘𝑦) ∈ V
7	6	sucex 7633	. . . . . . . . . . . . 13 ⊢ suc (𝑓‘𝑦) ∈ V
8	5, 7	iunex 7784	. . . . . . . . . . . 12 ⊢ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∈ V
9		f1f 6654	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
10	9	ad2antrr 722	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
11		simplr 765	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦))
12	2	oneli 6359	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (ℵ‘suc 𝐴) → 𝑥 ∈ On)
13		ffvelrn 6941	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴))
14		onelon 6276	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((ℵ‘suc 𝐴) ∈ On ∧ (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)) → (𝑓‘𝑦) ∈ On)
15	2, 13, 14	sylancr 586	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ On)
16		onsssuc 6338	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑥 ∈ On ∧ (𝑓‘𝑦) ∈ On) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
17	15, 16	sylan2 592	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴)))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
18	17	anassrs 467	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
19	18	rexbidva 3224	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦)))
20		eliun 4925	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦))
21	19, 20	bitr4di 288	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
22	21	ancoms 458	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ On) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
23	12, 22	sylan2 592	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ (ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
24	23	ralbidva 3119	. . . . . . . . . . . . . . 15 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
25		dfss3 3905	. . . . . . . . . . . . . . 15 ⊢ ((ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
26	24, 25	bitr4di 288	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
27	26	biimpa 476	. . . . . . . . . . . . 13 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
28	10, 11, 27	syl2anc 583	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
29		ssdomg 8741	. . . . . . . . . . . 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 767	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝐴 ∈ On)
32		suceloni 7635	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → suc 𝐴 ∈ On)
33		alephislim 9770	. . . . . . . . . . . . . . . . . . 19 ⊢ (suc 𝐴 ∈ On ↔ Lim (ℵ‘suc 𝐴))
34		limsuc 7671	. . . . . . . . . . . . . . . . . . 19 ⊢ (Lim (ℵ‘suc 𝐴) → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
35	33, 34	sylbi 216	. . . . . . . . . . . . . . . . . 18 ⊢ (suc 𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
36	32, 35	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)))
37		breq1 5073	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = suc (𝑓‘𝑦) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
38		alephcard 9757	. . . . . . . . . . . . . . . . . . . 20 ⊢ (card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)
39		iscard 9664	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) ↔ ((ℵ‘suc 𝐴) ∈ On ∧ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)))
40	39	simprbi 496	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) → ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴))
41	38, 40	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)
42	37, 41	vtoclri 3515	. . . . . . . . . . . . . . . . . 18 ⊢ (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴))
43		alephsucdom 9766	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ≼ (ℵ‘𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
44	42, 43	syl5ibr 245	. . . . . . . . . . . . . . . . 17 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
45	36, 44	sylbid 239	. . . . . . . . . . . . . . . 16 ⊢ (𝐴 ∈ On → ((𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
46	13, 45	syl5 34	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∈ On → ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
47	46	expdimp 452	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (𝑦 ∈ (cf‘(ℵ‘suc 𝐴)) → suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)))
48	47	ralrimiv 3106	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴))
49		iundom 10229	. . . . . . . . . . . . 13 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ V ∧ ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
50	5, 48, 49	sylancr 586	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
51	31, 10, 50	syl2anc 583	. . . . . . . . . . 11 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
52		domtr 8748	. . . . . . . . . . 11 ⊢ (((ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∧ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
53	30, 51, 52	syl2anc 583	. . . . . . . . . 10 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
54	53	expcom 413	. . . . . . . . 9 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))))
55	54	exlimdv 1937	. . . . . . . 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 9769	. . . . . . . . . 10 ⊢ (𝐴 ∈ On ↔ ω ⊆ (ℵ‘𝐴))
58		alephon 9756	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ On
59		infxpen 9701	. . . . . . . . . . 11 ⊢ (((ℵ‘𝐴) ∈ On ∧ ω ⊆ (ℵ‘𝐴)) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
60	58, 59	mpan 686	. . . . . . . . . 10 ⊢ (ω ⊆ (ℵ‘𝐴) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
61	57, 60	sylbi 216	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
62		breq1 5073	. . . . . . . . . . . 12 ⊢ (𝑧 = (cf‘(ℵ‘suc 𝐴)) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
63	62, 41	vtoclri 3515	. . . . . . . . . . 11 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴))
64		alephsucdom 9766	. . . . . . . . . . 11 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
65	63, 64	syl5ibr 245	. . . . . . . . . 10 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴)))
66		fvex 6769	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ V
67	66	xpdom1 8811	. . . . . . . . . 10 ⊢ ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)))
68	65, 67	syl6 35	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴))))
69		domentr 8754	. . . . . . . . . 10 ⊢ ((((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)) ∧ ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴))
70	69	expcom 413	. . . . . . . . 9 ⊢ (((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴) → (((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)))
71	61, 68, 70	sylsyld 61	. . . . . . . 8 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)))
72	71	imp 406	. . . . . . 7 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴))
73		domtr 8748	. . . . . . 7 ⊢ (((ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ∧ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
74	56, 72, 73	syl2anc 583	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
75		domnsym 8839	. . . . . 6 ⊢ ((ℵ‘suc 𝐴) ≼ (ℵ‘𝐴) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
76	74, 75	syl 17	. . . . 5 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
77	76	ex 412	. . . 4 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ¬ (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴)))
78	1, 77	mt2d 136	. . 3 ⊢ (𝐴 ∈ On → ¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))
79		cfon 9942	. . . . 5 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ On
80		cfle 9941	. . . . . 6 ⊢ (cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴)
81		onsseleq 6292	. . . . . 6 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ On ∧ (ℵ‘suc 𝐴) ∈ On) → ((cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴) ↔ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))))
82	80, 81	mpbii 232	. . . . 5 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ On ∧ (ℵ‘suc 𝐴) ∈ On) → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)))
83	79, 2, 82	mp2an 688	. . . 4 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) ∨ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
84	83	ori 857	. . 3 ⊢ (¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
85	78, 84	syl 17	. 2 ⊢ (𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
86		cf0 9938	. . 3 ⊢ (cf‘∅) = ∅
87		alephfnon 9752	. . . . . . . 8 ⊢ ℵ Fn On
88	87	fndmi 6521	. . . . . . 7 ⊢ dom ℵ = On
89	88	eleq2i 2830	. . . . . 6 ⊢ (suc 𝐴 ∈ dom ℵ ↔ suc 𝐴 ∈ On)
90		sucelon 7639	. . . . . 6 ⊢ (𝐴 ∈ On ↔ suc 𝐴 ∈ On)
91	89, 90	bitr4i 277	. . . . 5 ⊢ (suc 𝐴 ∈ dom ℵ ↔ 𝐴 ∈ On)
92		ndmfv 6786	. . . . 5 ⊢ (¬ suc 𝐴 ∈ dom ℵ → (ℵ‘suc 𝐴) = ∅)
93	91, 92	sylnbir 330	. . . 4 ⊢ (¬ 𝐴 ∈ On → (ℵ‘suc 𝐴) = ∅)
94	93	fveq2d 6760	. . 3 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (cf‘∅))
95	86, 94, 93	3eqtr4a 2805	. 2 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
96	85, 95	pm2.61i 182	1 ⊢ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)

Syntax hints:  ¬ wn 3   ↔ wb 205   ∧ wa 395   ∨ wo 843   = wceq 1539  ∃wex 1783   ∈ wcel 2108  ∀wral 3063  ∃wrex 3064  Vcvv 3422   ⊆ wss 3883  ∅c0 4253  ∪ ciun 4921   class class class wbr 5070   × cxp 5578  dom cdm 5580  Oncon0 6251  Lim wlim 6252  suc csuc 6253  ⟶wf 6414  –1-1→wf1 6415  ‘cfv 6418  ωcom 7687   ≈ cen 8688   ≼ cdom 8689   ≺ csdm 8690  cardccrd 9624  ℵcale 9625  cfccf 9626

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-rep 5205  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-inf2 9329  ax-ac2 10150

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rmo 3071  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-int 4877  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-se 5536  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-pred 6191  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-isom 6427  df-riota 7212  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-frecs 8068  df-wrecs 8099  df-recs 8173  df-rdg 8212  df-1o 8267  df-er 8456  df-map 8575  df-en 8692  df-dom 8693  df-sdom 8694  df-fin 8695  df-oi 9199  df-har 9246  df-card 9628  df-aleph 9629  df-cf 9630  df-acn 9631  df-ac 9803

This theorem is referenced by:  pwcfsdom  10270