Proof of Theorem minregex
Step | Hyp | Ref
| Expression |
1 | | eldif 3920 |
. . . . . . 7
⊢ (𝐴 ∈ (ran card ∖
ω) ↔ (𝐴 ∈
ran card ∧ ¬ 𝐴
∈ ω)) |
2 | | omelon 9581 |
. . . . . . . . . 10
⊢ ω
∈ On |
3 | | cardon 9879 |
. . . . . . . . . . 11
⊢
(card‘𝐴)
∈ On |
4 | | eleq1 2825 |
. . . . . . . . . . 11
⊢
((card‘𝐴) =
𝐴 → ((card‘𝐴) ∈ On ↔ 𝐴 ∈ On)) |
5 | 3, 4 | mpbii 232 |
. . . . . . . . . 10
⊢
((card‘𝐴) =
𝐴 → 𝐴 ∈ On) |
6 | | ontri1 6351 |
. . . . . . . . . 10
⊢ ((ω
∈ On ∧ 𝐴 ∈
On) → (ω ⊆ 𝐴 ↔ ¬ 𝐴 ∈ ω)) |
7 | 2, 5, 6 | sylancr 587 |
. . . . . . . . 9
⊢
((card‘𝐴) =
𝐴 → (ω ⊆
𝐴 ↔ ¬ 𝐴 ∈
ω)) |
8 | 7 | pm5.32i 575 |
. . . . . . . 8
⊢
(((card‘𝐴) =
𝐴 ∧ ω ⊆
𝐴) ↔
((card‘𝐴) = 𝐴 ∧ ¬ 𝐴 ∈ ω)) |
9 | | iscard4 41786 |
. . . . . . . . 9
⊢
((card‘𝐴) =
𝐴 ↔ 𝐴 ∈ ran card) |
10 | 9 | anbi1i 624 |
. . . . . . . 8
⊢
(((card‘𝐴) =
𝐴 ∧ ¬ 𝐴 ∈ ω) ↔ (𝐴 ∈ ran card ∧ ¬
𝐴 ∈
ω)) |
11 | 8, 10 | bitr2i 275 |
. . . . . . 7
⊢ ((𝐴 ∈ ran card ∧ ¬
𝐴 ∈ ω) ↔
((card‘𝐴) = 𝐴 ∧ ω ⊆ 𝐴)) |
12 | | ancom 461 |
. . . . . . 7
⊢
(((card‘𝐴) =
𝐴 ∧ ω ⊆
𝐴) ↔ (ω ⊆
𝐴 ∧ (card‘𝐴) = 𝐴)) |
13 | 1, 11, 12 | 3bitri 296 |
. . . . . 6
⊢ (𝐴 ∈ (ran card ∖
ω) ↔ (ω ⊆ 𝐴 ∧ (card‘𝐴) = 𝐴)) |
14 | 13 | biimpi 215 |
. . . . 5
⊢ (𝐴 ∈ (ran card ∖
ω) → (ω ⊆ 𝐴 ∧ (card‘𝐴) = 𝐴)) |
15 | | cardalephex 10025 |
. . . . . . . 8
⊢ (ω
⊆ 𝐴 →
((card‘𝐴) = 𝐴 ↔ ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥))) |
16 | 15 | biimpa 477 |
. . . . . . 7
⊢ ((ω
⊆ 𝐴 ∧
(card‘𝐴) = 𝐴) → ∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥)) |
17 | | eqimss 4000 |
. . . . . . . . 9
⊢ (𝐴 = (ℵ‘𝑥) → 𝐴 ⊆ (ℵ‘𝑥)) |
18 | 17 | a1i 11 |
. . . . . . . 8
⊢ ((ω
⊆ 𝐴 ∧
(card‘𝐴) = 𝐴) → (𝐴 = (ℵ‘𝑥) → 𝐴 ⊆ (ℵ‘𝑥))) |
19 | 18 | reximdv 3167 |
. . . . . . 7
⊢ ((ω
⊆ 𝐴 ∧
(card‘𝐴) = 𝐴) → (∃𝑥 ∈ On 𝐴 = (ℵ‘𝑥) → ∃𝑥 ∈ On 𝐴 ⊆ (ℵ‘𝑥))) |
20 | 16, 19 | mpd 15 |
. . . . . 6
⊢ ((ω
⊆ 𝐴 ∧
(card‘𝐴) = 𝐴) → ∃𝑥 ∈ On 𝐴 ⊆ (ℵ‘𝑥)) |
21 | | onintrab2 7731 |
. . . . . 6
⊢
(∃𝑥 ∈ On
𝐴 ⊆
(ℵ‘𝑥) ↔
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) |
22 | 20, 21 | sylib 217 |
. . . . 5
⊢ ((ω
⊆ 𝐴 ∧
(card‘𝐴) = 𝐴) → ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) |
23 | | simpr 485 |
. . . . . . 7
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) |
24 | | onsuc 7745 |
. . . . . . 7
⊢ (∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On → suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) |
25 | 23, 24 | syl 17 |
. . . . . 6
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) |
26 | | eloni 6327 |
. . . . . . . . 9
⊢ (∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On → Ord ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}) |
27 | 23, 26 | syl 17 |
. . . . . . . 8
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → Ord ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}) |
28 | | 0elsuc 7769 |
. . . . . . . 8
⊢ (Ord
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} → ∅ ∈ suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) |
29 | 27, 28 | syl 17 |
. . . . . . 7
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → ∅ ∈ suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}) |
30 | | cardaleph 10024 |
. . . . . . . . 9
⊢ ((ω
⊆ 𝐴 ∧
(card‘𝐴) = 𝐴) → 𝐴 = (ℵ‘∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) |
31 | 30 | adantr 481 |
. . . . . . . 8
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → 𝐴 =
(ℵ‘∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) |
32 | | sssucid 6397 |
. . . . . . . . 9
⊢ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ⊆
suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} |
33 | | alephord3 10013 |
. . . . . . . . . 10
⊢ ((∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On ∧ suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) → (∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ⊆
suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ↔ (ℵ‘∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ⊆
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}))) |
34 | 23, 24, 33 | syl2anc2 585 |
. . . . . . . . 9
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → (∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ⊆ suc ∩
{𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ↔ (ℵ‘∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ⊆
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}))) |
35 | 32, 34 | mpbii 232 |
. . . . . . . 8
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → (ℵ‘∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}) ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) |
36 | 31, 35 | eqsstrd 3982 |
. . . . . . 7
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → 𝐴 ⊆
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) |
37 | | alephreg 10517 |
. . . . . . . 8
⊢
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) |
38 | 37 | a1i 11 |
. . . . . . 7
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → (cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) |
39 | 29, 36, 38 | 3jca 1128 |
. . . . . 6
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → (∅ ∈ suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∧ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ∧
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))) |
40 | 25, 39 | jca 512 |
. . . . 5
⊢
(((ω ⊆ 𝐴
∧ (card‘𝐴) =
𝐴) ∧ ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) → (suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On ∧ (∅ ∈ suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∧
𝐴 ⊆
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}) ∧ (cf‘(ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) =
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})))) |
41 | 14, 22, 40 | syl2anc2 585 |
. . . 4
⊢ (𝐴 ∈ (ran card ∖
ω) → (suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On ∧ (∅ ∈ suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∧
𝐴 ⊆
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}) ∧ (cf‘(ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) =
(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})))) |
42 | 14, 16 | syl 17 |
. . . . . . . 8
⊢ (𝐴 ∈ (ran card ∖
ω) → ∃𝑥
∈ On 𝐴 =
(ℵ‘𝑥)) |
43 | 17 | a1i 11 |
. . . . . . . . 9
⊢ (𝐴 ∈ (ran card ∖
ω) → (𝐴 =
(ℵ‘𝑥) →
𝐴 ⊆
(ℵ‘𝑥))) |
44 | 43 | reximdv 3167 |
. . . . . . . 8
⊢ (𝐴 ∈ (ran card ∖
ω) → (∃𝑥
∈ On 𝐴 =
(ℵ‘𝑥) →
∃𝑥 ∈ On 𝐴 ⊆ (ℵ‘𝑥))) |
45 | 42, 44 | mpd 15 |
. . . . . . 7
⊢ (𝐴 ∈ (ran card ∖
ω) → ∃𝑥
∈ On 𝐴 ⊆
(ℵ‘𝑥)) |
46 | 45, 21 | sylib 217 |
. . . . . 6
⊢ (𝐴 ∈ (ran card ∖
ω) → ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) |
47 | 46, 24 | syl 17 |
. . . . 5
⊢ (𝐴 ∈ (ran card ∖
ω) → suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On) |
48 | | sbcan 3791 |
. . . . . 6
⊢
([suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦](𝑦 ∈ On ∧ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))) ↔ ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝑦 ∈ On ∧ [suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)))) |
49 | | sbcel1v 3810 |
. . . . . . . 8
⊢
([suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦]𝑦 ∈ On ↔ suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On) |
50 | 49 | a1i 11 |
. . . . . . 7
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝑦 ∈ On ↔ suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On)) |
51 | | sbc3an 3809 |
. . . . . . . 8
⊢
([suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦](∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)) ↔ ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]∅ ∈ 𝑦 ∧ [suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝐴 ⊆ (ℵ‘𝑦) ∧ [suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))) |
52 | | sbcel2gv 3811 |
. . . . . . . . 9
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]∅ ∈ 𝑦 ↔ ∅ ∈ suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) |
53 | | sbcssg 4481 |
. . . . . . . . . 10
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝐴 ⊆ (ℵ‘𝑦) ↔ ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌𝐴 ⊆ ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦))) |
54 | | csbconstg 3874 |
. . . . . . . . . . 11
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌𝐴 = 𝐴) |
55 | | csbfv2g 6891 |
. . . . . . . . . . . 12
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦) =
(ℵ‘⦋suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦⦌𝑦)) |
56 | | csbvarg 4391 |
. . . . . . . . . . . . 13
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌𝑦 = suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) |
57 | 56 | fveq2d 6846 |
. . . . . . . . . . . 12
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On →
(ℵ‘⦋suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦⦌𝑦) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) |
58 | 55, 57 | eqtrd 2776 |
. . . . . . . . . . 11
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})) |
59 | 54, 58 | sseq12d 3977 |
. . . . . . . . . 10
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → (⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌𝐴 ⊆ ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦) ↔ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))) |
60 | 53, 59 | bitrd 278 |
. . . . . . . . 9
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝐴 ⊆ (ℵ‘𝑦) ↔ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))) |
61 | | sbceqg 4369 |
. . . . . . . . . 10
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](cf‘(ℵ‘𝑦)) = (ℵ‘𝑦) ↔ ⦋suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦⦌(cf‘(ℵ‘𝑦)) = ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦))) |
62 | | csbfv2g 6891 |
. . . . . . . . . . . 12
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(cf‘(ℵ‘𝑦)) =
(cf‘⦋suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦))) |
63 | 58 | fveq2d 6846 |
. . . . . . . . . . . 12
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On →
(cf‘⦋suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦)) =
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}))) |
64 | 62, 63 | eqtrd 2776 |
. . . . . . . . . . 11
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(cf‘(ℵ‘𝑦)) =
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)}))) |
65 | 64, 58 | eqeq12d 2752 |
. . . . . . . . . 10
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → (⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(cf‘(ℵ‘𝑦)) = ⦋suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦⦌(ℵ‘𝑦) ↔
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))) |
66 | 61, 65 | bitrd 278 |
. . . . . . . . 9
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](cf‘(ℵ‘𝑦)) = (ℵ‘𝑦) ↔
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))) |
67 | 52, 60, 66 | 3anbi123d 1436 |
. . . . . . . 8
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → (([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]∅ ∈ 𝑦 ∧ [suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝐴 ⊆ (ℵ‘𝑦) ∧ [suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)) ↔ (∅ ∈ suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∧ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ∧
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})))) |
68 | 51, 67 | bitrid 282 |
. . . . . . 7
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)) ↔ (∅ ∈ suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∧ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ∧
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)})))) |
69 | 50, 68 | anbi12d 631 |
. . . . . 6
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → (([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦]𝑦 ∈ On ∧ [suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))) ↔ (suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On ∧ (∅ ∈ suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∧ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ∧
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))))) |
70 | 48, 69 | bitrid 282 |
. . . . 5
⊢ (suc
∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∈ On → ([suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} / 𝑦](𝑦 ∈ On ∧ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))) ↔ (suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On ∧ (∅ ∈ suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∧ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ∧
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))))) |
71 | 47, 70 | syl 17 |
. . . 4
⊢ (𝐴 ∈ (ran card ∖
ω) → ([suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦](𝑦 ∈ On ∧ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))) ↔ (suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)} ∈
On ∧ (∅ ∈ suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} ∧ 𝐴 ⊆ (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}) ∧
(cf‘(ℵ‘suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)})) = (ℵ‘suc ∩ {𝑥
∈ On ∣ 𝐴 ⊆
(ℵ‘𝑥)}))))) |
72 | 41, 71 | mpbird 256 |
. . 3
⊢ (𝐴 ∈ (ran card ∖
ω) → [suc ∩ {𝑥 ∈ On ∣ 𝐴 ⊆ (ℵ‘𝑥)} / 𝑦](𝑦 ∈ On ∧ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)))) |
73 | 72 | spesbcd 3839 |
. 2
⊢ (𝐴 ∈ (ran card ∖
ω) → ∃𝑦(𝑦 ∈ On ∧ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)))) |
74 | | onintrab2 7731 |
. . 3
⊢
(∃𝑦 ∈ On
(∅ ∈ 𝑦 ∧
𝐴 ⊆
(ℵ‘𝑦) ∧
(cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)) ↔ ∩ {𝑦 ∈ On ∣ (∅
∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧
(cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))} ∈ On) |
75 | | df-rex 3074 |
. . 3
⊢
(∃𝑦 ∈ On
(∅ ∈ 𝑦 ∧
𝐴 ⊆
(ℵ‘𝑦) ∧
(cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)) ↔ ∃𝑦(𝑦 ∈ On ∧ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦)))) |
76 | | risset 3221 |
. . 3
⊢ (∩ {𝑦
∈ On ∣ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))} ∈ On ↔
∃𝑥 ∈ On 𝑥 = ∩
{𝑦 ∈ On ∣
(∅ ∈ 𝑦 ∧
𝐴 ⊆
(ℵ‘𝑦) ∧
(cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))}) |
77 | 74, 75, 76 | 3bitr3i 300 |
. 2
⊢
(∃𝑦(𝑦 ∈ On ∧ (∅ ∈
𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))) ↔ ∃𝑥 ∈ On 𝑥 = ∩ {𝑦 ∈ On ∣ (∅
∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧
(cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))}) |
78 | 73, 77 | sylib 217 |
1
⊢ (𝐴 ∈ (ran card ∖
ω) → ∃𝑥
∈ On 𝑥 = ∩ {𝑦
∈ On ∣ (∅ ∈ 𝑦 ∧ 𝐴 ⊆ (ℵ‘𝑦) ∧ (cf‘(ℵ‘𝑦)) = (ℵ‘𝑦))}) |