Metamath Proof Explorer


Theorem alephval3

Description: An alternate way to express the value of the aleph function: it is the least infinite cardinal different from all values at smaller arguments. Definition of aleph in Enderton p. 212 and definition of aleph in BellMachover p. 490 . (Contributed by NM, 16-Nov-2003)

Ref Expression
Assertion alephval3 ⊢ A ∈ On → ℵ ⁡ A = ⋂ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y

Proof

Step Hyp Ref Expression
1 alephcard ⊢ card ⁡ ℵ ⁡ A = ℵ ⁡ A
2 1 a1i ⊢ A ∈ On → card ⁡ ℵ ⁡ A = ℵ ⁡ A
3 alephgeom ⊢ A ∈ On ↔ ω ⊆ ℵ ⁡ A
4 3 biimpi ⊢ A ∈ On → ω ⊆ ℵ ⁡ A
5 alephord2i ⊢ A ∈ On → y ∈ A → ℵ ⁡ y ∈ ℵ ⁡ A
6 alephon ⊢ ℵ ⁡ y ∈ On
7 6 onirri ⊢ ¬ ℵ ⁡ y ∈ ℵ ⁡ y
8 eleq2 ⊢ ℵ ⁡ A = ℵ ⁡ y → ℵ ⁡ y ∈ ℵ ⁡ A ↔ ℵ ⁡ y ∈ ℵ ⁡ y
9 7 8 mtbiri ⊢ ℵ ⁡ A = ℵ ⁡ y → ¬ ℵ ⁡ y ∈ ℵ ⁡ A
10 9 con2i ⊢ ℵ ⁡ y ∈ ℵ ⁡ A → ¬ ℵ ⁡ A = ℵ ⁡ y
11 5 10 syl6 ⊢ A ∈ On → y ∈ A → ¬ ℵ ⁡ A = ℵ ⁡ y
12 11 ralrimiv ⊢ A ∈ On → ∀ y ∈ A ¬ ℵ ⁡ A = ℵ ⁡ y
13 fvex ⊢ ℵ ⁡ A ∈ V
14 fveq2 ⊢ x = ℵ ⁡ A → card ⁡ x = card ⁡ ℵ ⁡ A
15 id ⊢ x = ℵ ⁡ A → x = ℵ ⁡ A
16 14 15 eqeq12d ⊢ x = ℵ ⁡ A → card ⁡ x = x ↔ card ⁡ ℵ ⁡ A = ℵ ⁡ A
17 sseq2 ⊢ x = ℵ ⁡ A → ω ⊆ x ↔ ω ⊆ ℵ ⁡ A
18 eqeq1 ⊢ x = ℵ ⁡ A → x = ℵ ⁡ y ↔ ℵ ⁡ A = ℵ ⁡ y
19 18 notbid ⊢ x = ℵ ⁡ A → ¬ x = ℵ ⁡ y ↔ ¬ ℵ ⁡ A = ℵ ⁡ y
20 19 ralbidv ⊢ x = ℵ ⁡ A → ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ ∀ y ∈ A ¬ ℵ ⁡ A = ℵ ⁡ y
21 16 17 20 3anbi123d ⊢ x = ℵ ⁡ A → card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ card ⁡ ℵ ⁡ A = ℵ ⁡ A ∧ ω ⊆ ℵ ⁡ A ∧ ∀ y ∈ A ¬ ℵ ⁡ A = ℵ ⁡ y
22 13 21 elab ⊢ ℵ ⁡ A ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ card ⁡ ℵ ⁡ A = ℵ ⁡ A ∧ ω ⊆ ℵ ⁡ A ∧ ∀ y ∈ A ¬ ℵ ⁡ A = ℵ ⁡ y
23 2 4 12 22 syl3anbrc ⊢ A ∈ On → ℵ ⁡ A ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y
24 eleq1 ⊢ z = ℵ ⁡ y → z ∈ ℵ ⁡ A ↔ ℵ ⁡ y ∈ ℵ ⁡ A
25 alephord2 ⊢ y ∈ On ∧ A ∈ On → y ∈ A ↔ ℵ ⁡ y ∈ ℵ ⁡ A
26 25 bicomd ⊢ y ∈ On ∧ A ∈ On → ℵ ⁡ y ∈ ℵ ⁡ A ↔ y ∈ A
27 24 26 sylan9bbr ⊢ y ∈ On ∧ A ∈ On ∧ z = ℵ ⁡ y → z ∈ ℵ ⁡ A ↔ y ∈ A
28 27 biimpcd ⊢ z ∈ ℵ ⁡ A → y ∈ On ∧ A ∈ On ∧ z = ℵ ⁡ y → y ∈ A
29 simpr ⊢ y ∈ On ∧ A ∈ On ∧ z = ℵ ⁡ y → z = ℵ ⁡ y
30 28 29 jca2 ⊢ z ∈ ℵ ⁡ A → y ∈ On ∧ A ∈ On ∧ z = ℵ ⁡ y → y ∈ A ∧ z = ℵ ⁡ y
31 30 exp4c ⊢ z ∈ ℵ ⁡ A → y ∈ On → A ∈ On → z = ℵ ⁡ y → y ∈ A ∧ z = ℵ ⁡ y
32 31 com3r ⊢ A ∈ On → z ∈ ℵ ⁡ A → y ∈ On → z = ℵ ⁡ y → y ∈ A ∧ z = ℵ ⁡ y
33 32 imp4b ⊢ A ∈ On ∧ z ∈ ℵ ⁡ A → y ∈ On ∧ z = ℵ ⁡ y → y ∈ A ∧ z = ℵ ⁡ y
34 33 reximdv2 ⊢ A ∈ On ∧ z ∈ ℵ ⁡ A → ∃ y ∈ On z = ℵ ⁡ y → ∃ y ∈ A z = ℵ ⁡ y
35 cardalephex ⊢ ω ⊆ z → card ⁡ z = z ↔ ∃ y ∈ On z = ℵ ⁡ y
36 35 biimpac ⊢ card ⁡ z = z ∧ ω ⊆ z → ∃ y ∈ On z = ℵ ⁡ y
37 34 36 impel ⊢ A ∈ On ∧ z ∈ ℵ ⁡ A ∧ card ⁡ z = z ∧ ω ⊆ z → ∃ y ∈ A z = ℵ ⁡ y
38 dfrex2 ⊢ ∃ y ∈ A z = ℵ ⁡ y ↔ ¬ ∀ y ∈ A ¬ z = ℵ ⁡ y
39 37 38 sylib ⊢ A ∈ On ∧ z ∈ ℵ ⁡ A ∧ card ⁡ z = z ∧ ω ⊆ z → ¬ ∀ y ∈ A ¬ z = ℵ ⁡ y
40 nan ⊢ A ∈ On ∧ z ∈ ℵ ⁡ A → ¬ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y ↔ A ∈ On ∧ z ∈ ℵ ⁡ A ∧ card ⁡ z = z ∧ ω ⊆ z → ¬ ∀ y ∈ A ¬ z = ℵ ⁡ y
41 39 40 mpbir ⊢ A ∈ On ∧ z ∈ ℵ ⁡ A → ¬ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
42 41 ex ⊢ A ∈ On → z ∈ ℵ ⁡ A → ¬ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
43 vex ⊢ z ∈ V
44 fveq2 ⊢ x = z → card ⁡ x = card ⁡ z
45 id ⊢ x = z → x = z
46 44 45 eqeq12d ⊢ x = z → card ⁡ x = x ↔ card ⁡ z = z
47 sseq2 ⊢ x = z → ω ⊆ x ↔ ω ⊆ z
48 eqeq1 ⊢ x = z → x = ℵ ⁡ y ↔ z = ℵ ⁡ y
49 48 notbid ⊢ x = z → ¬ x = ℵ ⁡ y ↔ ¬ z = ℵ ⁡ y
50 49 ralbidv ⊢ x = z → ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ ∀ y ∈ A ¬ z = ℵ ⁡ y
51 46 47 50 3anbi123d ⊢ x = z → card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
52 43 51 elab ⊢ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
53 df-3an ⊢ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y ↔ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
54 52 53 bitri ⊢ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
55 54 notbii ⊢ ¬ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ↔ ¬ card ⁡ z = z ∧ ω ⊆ z ∧ ∀ y ∈ A ¬ z = ℵ ⁡ y
56 42 55 imbitrrdi ⊢ A ∈ On → z ∈ ℵ ⁡ A → ¬ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y
57 56 ralrimiv ⊢ A ∈ On → ∀ z ∈ ℵ ⁡ A ¬ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y
58 cardon ⊢ card ⁡ x ∈ On
59 eleq1 ⊢ card ⁡ x = x → card ⁡ x ∈ On ↔ x ∈ On
60 58 59 mpbii ⊢ card ⁡ x = x → x ∈ On
61 60 3ad2ant1 ⊢ card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y → x ∈ On
62 61 abssi ⊢ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ⊆ On
63 oneqmini ⊢ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ⊆ On → ℵ ⁡ A ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ∧ ∀ z ∈ ℵ ⁡ A ¬ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y → ℵ ⁡ A = ⋂ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y
64 62 63 ax-mp ⊢ ℵ ⁡ A ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y ∧ ∀ z ∈ ℵ ⁡ A ¬ z ∈ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y → ℵ ⁡ A = ⋂ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y
65 23 57 64 syl2anc ⊢ A ∈ On → ℵ ⁡ A = ⋂ x | card ⁡ x = x ∧ ω ⊆ x ∧ ∀ y ∈ A ¬ x = ℵ ⁡ y