Theorem alephreg 10007

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 9502	. . . 4 ⊢ (𝐴 ∈ On → (ℵ‘𝐴) ≺ (ℵ‘suc 𝐴))
2		alephon 9498	. . . . . . . . 9 ⊢ (ℵ‘suc 𝐴) ∈ On
3		cff1 9683	. . . . . . . . 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 6686	. . . . . . . . . . . . 13 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ V
6		fvex 6686	. . . . . . . . . . . . . 14 ⊢ (𝑓‘𝑦) ∈ V
7	6	sucex 7529	. . . . . . . . . . . . 13 ⊢ suc (𝑓‘𝑦) ∈ V
8	5, 7	iunex 7672	. . . . . . . . . . . 12 ⊢ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∈ V
9		f1f 6578	. . . . . . . . . . . . . 14 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
10	9	ad2antrr 724	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴))
11		simplr 767	. . . . . . . . . . . . 13 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦))
12	2	oneli 6301	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ (ℵ‘suc 𝐴) → 𝑥 ∈ On)
13		ffvelrn 6852	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴))
14		onelon 6219	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((ℵ‘suc 𝐴) ∈ On ∧ (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴)) → (𝑓‘𝑦) ∈ On)
15	2, 13, 14	sylancr 589	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑓‘𝑦) ∈ On)
16		onsssuc 6281	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑥 ∈ On ∧ (𝑓‘𝑦) ∈ On) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
17	15, 16	sylan2 594	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ On ∧ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴)))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
18	17	anassrs 470	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) ∧ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))) → (𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ suc (𝑓‘𝑦)))
19	18	rexbidva 3299	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦)))
20		eliun 4926	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ∈ suc (𝑓‘𝑦))
21	19, 20	syl6bbr 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 594	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) ∧ 𝑥 ∈ (ℵ‘suc 𝐴)) → (∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ 𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
24	23	ralbidva 3199	. . . . . . . . . . . . . . 15 ⊢ (𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴) → (∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦)))
25		dfss3 3959	. . . . . . . . . . . . . . 15 ⊢ ((ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ↔ ∀𝑥 ∈ (ℵ‘suc 𝐴)𝑥 ∈ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
26	24, 25	syl6bbr 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 586	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → (ℵ‘suc 𝐴) ⊆ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦))
29		ssdomg 8558	. . . . . . . . . . . 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 769	. . . . . . . . . . . 12 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → 𝐴 ∈ On)
32		suceloni 7531	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → suc 𝐴 ∈ On)
33		alephislim 9512	. . . . . . . . . . . . . . . . . . 19 ⊢ (suc 𝐴 ∈ On ↔ Lim (ℵ‘suc 𝐴))
34		limsuc 7567	. . . . . . . . . . . . . . . . . . 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 5072	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = suc (𝑓‘𝑦) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
38		alephcard 9499	. . . . . . . . . . . . . . . . . . . 20 ⊢ (card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)
39		iscard 9407	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) ↔ ((ℵ‘suc 𝐴) ∈ On ∧ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)))
40	39	simprbi 499	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((card‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴) → ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴))
41	38, 40	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ ∀𝑧 ∈ (ℵ‘suc 𝐴)𝑧 ≺ (ℵ‘suc 𝐴)
42	37, 41	vtoclri 3588	. . . . . . . . . . . . . . . . . 18 ⊢ (suc (𝑓‘𝑦) ∈ (ℵ‘suc 𝐴) → suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴))
43		alephsucdom 9508	. . . . . . . . . . . . . . . . . 18 ⊢ (𝐴 ∈ On → (suc (𝑓‘𝑦) ≼ (ℵ‘𝐴) ↔ suc (𝑓‘𝑦) ≺ (ℵ‘suc 𝐴)))
44	42, 43	syl5ibr 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 3184	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴))
49		iundom 9967	. . . . . . . . . . . . 13 ⊢ (((cf‘(ℵ‘suc 𝐴)) ∈ V ∧ ∀𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ (ℵ‘𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
50	5, 48, 49	sylancr 589	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ On ∧ 𝑓:(cf‘(ℵ‘suc 𝐴))⟶(ℵ‘suc 𝐴)) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
51	31, 10, 50	syl2anc 586	. . . . . . . . . . 11 ⊢ (((𝑓:(cf‘(ℵ‘suc 𝐴))–1-1→(ℵ‘suc 𝐴) ∧ ∀𝑥 ∈ (ℵ‘suc 𝐴)∃𝑦 ∈ (cf‘(ℵ‘suc 𝐴))𝑥 ⊆ (𝑓‘𝑦)) ∧ (𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))) → ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
52		domtr 8565	. . . . . . . . . . 11 ⊢ (((ℵ‘suc 𝐴) ≼ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ∧ ∪ 𝑦 ∈ (cf‘(ℵ‘suc 𝐴))suc (𝑓‘𝑦) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴))) → (ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)))
53	30, 51, 52	syl2anc 586	. . . . . . . . . 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 1933	. . . . . . . 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 9511	. . . . . . . . . 10 ⊢ (𝐴 ∈ On ↔ ω ⊆ (ℵ‘𝐴))
58		alephon 9498	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ On
59		infxpen 9443	. . . . . . . . . . 11 ⊢ (((ℵ‘𝐴) ∈ On ∧ ω ⊆ (ℵ‘𝐴)) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
60	58, 59	mpan 688	. . . . . . . . . 10 ⊢ (ω ⊆ (ℵ‘𝐴) → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
61	57, 60	sylbi 219	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((ℵ‘𝐴) × (ℵ‘𝐴)) ≈ (ℵ‘𝐴))
62		breq1 5072	. . . . . . . . . . . 12 ⊢ (𝑧 = (cf‘(ℵ‘suc 𝐴)) → (𝑧 ≺ (ℵ‘suc 𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
63	62, 41	vtoclri 3588	. . . . . . . . . . 11 ⊢ ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴))
64		alephsucdom 9508	. . . . . . . . . . 11 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) ↔ (cf‘(ℵ‘suc 𝐴)) ≺ (ℵ‘suc 𝐴)))
65	63, 64	syl5ibr 248	. . . . . . . . . 10 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → (cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴)))
66		fvex 6686	. . . . . . . . . . 11 ⊢ (ℵ‘𝐴) ∈ V
67	66	xpdom1 8619	. . . . . . . . . 10 ⊢ ((cf‘(ℵ‘suc 𝐴)) ≼ (ℵ‘𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴)))
68	65, 67	syl6 35	. . . . . . . . 9 ⊢ (𝐴 ∈ On → ((cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴) → ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ ((ℵ‘𝐴) × (ℵ‘𝐴))))
69		domentr 8571	. . . . . . . . . 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 8565	. . . . . . 7 ⊢ (((ℵ‘suc 𝐴) ≼ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ∧ ((cf‘(ℵ‘suc 𝐴)) × (ℵ‘𝐴)) ≼ (ℵ‘𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
74	56, 72, 73	syl2anc 586	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴)) → (ℵ‘suc 𝐴) ≼ (ℵ‘𝐴))
75		domnsym 8646	. . . . . 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 138	. . 3 ⊢ (𝐴 ∈ On → ¬ (cf‘(ℵ‘suc 𝐴)) ∈ (ℵ‘suc 𝐴))
79		cfon 9680	. . . . 5 ⊢ (cf‘(ℵ‘suc 𝐴)) ∈ On
80		cfle 9679	. . . . . 6 ⊢ (cf‘(ℵ‘suc 𝐴)) ⊆ (ℵ‘suc 𝐴)
81		onsseleq 6235	. . . . . 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 690	. . . 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 9676	. . 3 ⊢ (cf‘∅) = ∅
87		alephfnon 9494	. . . . . . . 8 ⊢ ℵ Fn On
88		fndm 6458	. . . . . . . 8 ⊢ (ℵ Fn On → dom ℵ = On)
89	87, 88	ax-mp 5	. . . . . . 7 ⊢ dom ℵ = On
90	89	eleq2i 2907	. . . . . 6 ⊢ (suc 𝐴 ∈ dom ℵ ↔ suc 𝐴 ∈ On)
91		sucelon 7535	. . . . . 6 ⊢ (𝐴 ∈ On ↔ suc 𝐴 ∈ On)
92	90, 91	bitr4i 280	. . . . 5 ⊢ (suc 𝐴 ∈ dom ℵ ↔ 𝐴 ∈ On)
93		ndmfv 6703	. . . . 5 ⊢ (¬ suc 𝐴 ∈ dom ℵ → (ℵ‘suc 𝐴) = ∅)
94	92, 93	sylnbir 333	. . . 4 ⊢ (¬ 𝐴 ∈ On → (ℵ‘suc 𝐴) = ∅)
95	94	fveq2d 6677	. . 3 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (cf‘∅))
96	86, 95, 94	3eqtr4a 2885	. 2 ⊢ (¬ 𝐴 ∈ On → (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴))
97	85, 96	pm2.61i 184	1 ⊢ (cf‘(ℵ‘suc 𝐴)) = (ℵ‘suc 𝐴)

Syntax hints:  ¬ wn 3   ↔ wb 208   ∧ wa 398   ∨ wo 843   = wceq 1536  ∃wex 1779   ∈ wcel 2113  ∀wral 3141  ∃wrex 3142  Vcvv 3497   ⊆ wss 3939  ∅c0 4294  ∪ ciun 4922   class class class wbr 5069   × cxp 5556  dom cdm 5558  Oncon0 6194  Lim wlim 6195  suc csuc 6196   Fn wfn 6353  ⟶wf 6354  –1-1→wf1 6355  ‘cfv 6358  ωcom 7583   ≈ cen 8509   ≼ cdom 8510   ≺ csdm 8511  cardccrd 9367  ℵcale 9368  cfccf 9369

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 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2796  ax-rep 5193  ax-sep 5206  ax-nul 5213  ax-pow 5269  ax-pr 5333  ax-un 7464  ax-inf2 9107  ax-ac2 9888

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2803  df-cleq 2817  df-clel 2896  df-nfc 2966  df-ne 3020  df-ral 3146  df-rex 3147  df-reu 3148  df-rmo 3149  df-rab 3150  df-v 3499  df-sbc 3776  df-csb 3887  df-dif 3942  df-un 3944  df-in 3946  df-ss 3955  df-pss 3957  df-nul 4295  df-if 4471  df-pw 4544  df-sn 4571  df-pr 4573  df-tp 4575  df-op 4577  df-uni 4842  df-int 4880  df-iun 4924  df-br 5070  df-opab 5132  df-mpt 5150  df-tr 5176  df-id 5463  df-eprel 5468  df-po 5477  df-so 5478  df-fr 5517  df-se 5518  df-we 5519  df-xp 5564  df-rel 5565  df-cnv 5566  df-co 5567  df-dm 5568  df-rn 5569  df-res 5570  df-ima 5571  df-pred 6151  df-ord 6197  df-on 6198  df-lim 6199  df-suc 6200  df-iota 6317  df-fun 6360  df-fn 6361  df-f 6362  df-f1 6363  df-fo 6364  df-f1o 6365  df-fv 6366  df-isom 6367  df-riota 7117  df-ov 7162  df-oprab 7163  df-mpo 7164  df-om 7584  df-1st 7692  df-2nd 7693  df-wrecs 7950  df-recs 8011  df-rdg 8049  df-1o 8105  df-oadd 8109  df-er 8292  df-map 8411  df-en 8513  df-dom 8514  df-sdom 8515  df-fin 8516  df-oi 8977  df-har 9025  df-card 9371  df-aleph 9372  df-cf 9373  df-acn 9374  df-ac 9545

This theorem is referenced by:  pwcfsdom  10008