Proof of Theorem inf4
| Step | Hyp | Ref
| Expression |
| 1 | | peano1 2390 |
. . 3
⊢ ∅ ∈ ω |
| 2 | | peano2 2391 |
. . . 4
⊢ (y
∈ ω → suc y ∈
ω) |
| 3 | 2 | ax-gen 677 |
. . 3
⊢ ∀y(y ∈
ω → suc y ∈
ω) |
| 4 | | axinf 1084 |
. . . . . 6
⊢ ∃x(y ∈
x ∧ ∀y(y ∈
x → ∃z(y ∈
z ∧ z ∈ x))) |
| 5 | 4 | inf2 3459 |
. . . . 5
⊢ ∃x(¬ x =
∅ ∧ x ⊆ ∪x) |
| 6 | 5 | inf3 3471 |
. . . 4
⊢ ω ∈ V |
| 7 | | eleq2 1150 |
. . . . 5
⊢ (x =
ω → (∅ ∈ x ↔
∅ ∈ ω)) |
| 8 | | eleq2 1150 |
. . . . . . 7
⊢ (x =
ω → (y ∈ x ↔ y
∈ ω)) |
| 9 | | eleq2 1150 |
. . . . . . 7
⊢ (x =
ω → (suc y ∈ x ↔ suc y
∈ ω)) |
| 10 | 8, 9 | imbi12d 474 |
. . . . . 6
⊢ (x =
ω → ((y ∈ x → suc y
∈ x) ↔ (y ∈ ω → suc y ∈ ω))) |
| 11 | 10 | bialdv 935 |
. . . . 5
⊢ (x =
ω → (∀y(y ∈ x
→ suc y ∈ x) ↔ ∀y(y ∈
ω → suc y ∈
ω))) |
| 12 | 7, 11 | anbi12d 476 |
. . . 4
⊢ (x =
ω → ((∅ ∈ x ∧
∀y(y ∈ x
→ suc y ∈ x)) ↔ (∅ ∈ ω ∧
∀y(y ∈ ω → suc y ∈ ω)))) |
| 13 | 6, 12 | cla4ev 1401 |
. . 3
⊢ ((∅ ∈ ω ∧
∀y(y ∈ ω → suc y ∈ ω)) → ∃x(∅ ∈ x ∧ ∀y(y ∈
x → suc y ∈ x))) |
| 14 | 1, 3, 13 | mp2an 520 |
. 2
⊢ ∃x(∅ ∈ x ∧ ∀y(y ∈
x → suc y ∈ x)) |
| 15 | | 0el 1720 |
. . . . 5
⊢ (∅ ∈ x ↔ ∃y ∈ x
∀z ¬ z ∈ y) |
| 16 | | df-rex 1206 |
. . . . 5
⊢ (∃y ∈ x
∀z ¬ z ∈ y
↔ ∃y(y ∈ x ∧
∀z ¬ z ∈ y)) |
| 17 | 15, 16 | bitr 151 |
. . . 4
⊢ (∅ ∈ x ↔ ∃y(y ∈
x ∧ ∀z ¬ z ∈
y)) |
| 18 | | sucel 2296 |
. . . . . . 7
⊢ (suc y
∈ x ↔ ∃z ∈ x
∀w(w ∈ z
↔ (w ∈ y ∨ w =
y))) |
| 19 | | df-rex 1206 |
. . . . . . 7
⊢ (∃z ∈ x
∀w(w ∈ z
↔ (w ∈ y ∨ w =
y)) ↔ ∃z(z ∈
x ∧ ∀w(w ∈
z ↔ (w ∈ y ∨
w = y)))) |
| 20 | 18, 19 | bitr 151 |
. . . . . 6
⊢ (suc y
∈ x ↔ ∃z(z ∈
x ∧ ∀w(w ∈
z ↔ (w ∈ y ∨
w = y)))) |
| 21 | 20 | imbi2i 160 |
. . . . 5
⊢ ((y
∈ x → suc y ∈ x)
↔ (y ∈ x → ∃z(z ∈
x ∧ ∀w(w ∈
z ↔ (w ∈ y ∨
w = y))))) |
| 22 | 21 | bial 695 |
. . . 4
⊢ (∀y(y ∈
x → suc y ∈ x)
↔ ∀y(y ∈ x
→ ∃z(z ∈ x ∧
∀w(w ∈ z
↔ (w ∈ y ∨ w =
y))))) |
| 23 | 17, 22 | anbi12i 369 |
. . 3
⊢ ((∅ ∈ x ∧ ∀y(y ∈
x → suc y ∈ x))
↔ (∃y(y ∈ x ∧
∀z ¬ z ∈ y)
∧ ∀y(y ∈ x
→ ∃z(z ∈ x ∧
∀w(w ∈ z
↔ (w ∈ y ∨ w =
y)))))) |
| 24 | 23 | biex 733 |
. 2
⊢ (∃x(∅ ∈ x ∧ ∀y(y ∈
x → suc y ∈ x))
↔ ∃x(∃y(y ∈
x ∧ ∀z ¬ z ∈
y) ∧ ∀y(y ∈
x → ∃z(z ∈
x ∧ ∀w(w ∈
z ↔ (w ∈ y ∨
w = y)))))) |
| 25 | 14, 24 | mpbi 164 |
1
⊢ ∃x(∃y(y ∈
x ∧ ∀z ¬ z ∈
y) ∧ ∀y(y ∈
x → ∃z(z ∈
x ∧ ∀w(w ∈
z ↔ (w ∈ y ∨
w = y))))) |