Proof of Theorem dfom3
| Step | Hyp | Ref
| Expression |
| 1 | | 0ex 1745 |
. . . . 5
⊢ ∅ ∈ V |
| 2 | 1 | elintab 1976 |
. . . 4
⊢ (∅ ∈ ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)} ↔ ∀x((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → ∅ ∈ x)) |
| 3 | | pm3.26 256 |
. . . 4
⊢ ((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → ∅ ∈ x) |
| 4 | 2, 3 | mpgbir 686 |
. . 3
⊢ ∅ ∈ ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)} |
| 5 | | suceq 2288 |
. . . . . . . . . . 11
⊢ (y =
z → suc y = suc z) |
| 6 | 5 | eleq1d 1155 |
. . . . . . . . . 10
⊢ (y =
z → (suc y ∈ x
↔ suc z ∈ x)) |
| 7 | 6 | rcla4v 1402 |
. . . . . . . . 9
⊢ (∀y ∈ x suc
y ∈ x → (z
∈ x → suc z ∈ x)) |
| 8 | 7 | adantl 305 |
. . . . . . . 8
⊢ ((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → (z
∈ x → suc z ∈ x)) |
| 9 | 8 | a2i 8 |
. . . . . . 7
⊢ (((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → z
∈ x) → ((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → suc z
∈ x)) |
| 10 | 9 | 19.20i 691 |
. . . . . 6
⊢ (∀x((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → z
∈ x) → ∀x((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → suc z
∈ x)) |
| 11 | | visset 1350 |
. . . . . . 7
⊢ z
∈ V |
| 12 | 11 | elintab 1976 |
. . . . . 6
⊢ (z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} ↔ ∀x((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → z
∈ x)) |
| 13 | 11 | sucex 2303 |
. . . . . . 7
⊢ suc z
∈ V |
| 14 | 13 | elintab 1976 |
. . . . . 6
⊢ (suc z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} ↔ ∀x((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → suc z
∈ x)) |
| 15 | 10, 12, 14 | 3imtr4 192 |
. . . . 5
⊢ (z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} → suc z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)}) |
| 16 | 15 | a1i 7 |
. . . 4
⊢ (z
∈ ω → (z ∈ ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)} → suc z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)})) |
| 17 | 16 | rgen 1247 |
. . 3
⊢ ∀z ∈ ω (z ∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} → suc z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)}) |
| 18 | | peano5 2394 |
. . 3
⊢ ((∅ ∈ ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)} ∧ ∀z ∈ ω (z ∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} → suc z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)})) → ω ⊆ ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)}) |
| 19 | 4, 17, 18 | mp2an 520 |
. 2
⊢ ω ⊆ ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)} |
| 20 | | peano1 2390 |
. . . 4
⊢ ∅ ∈ ω |
| 21 | | peano2 2391 |
. . . . 5
⊢ (y
∈ ω → suc y ∈
ω) |
| 22 | 21 | rgen 1247 |
. . . 4
⊢ ∀y ∈ ω suc y ∈ ω |
| 23 | | omex 3475 |
. . . . . 6
⊢ ω ∈ V |
| 24 | | eleq2 1150 |
. . . . . . . 8
⊢ (x =
ω → (∅ ∈ x ↔
∅ ∈ ω)) |
| 25 | | eleq2 1150 |
. . . . . . . . 9
⊢ (x =
ω → (suc y ∈ x ↔ suc y
∈ ω)) |
| 26 | 25 | raleqd 1327 |
. . . . . . . 8
⊢ (x =
ω → (∀y ∈ x suc y ∈
x ↔ ∀y ∈ ω suc y ∈ ω)) |
| 27 | 24, 26 | anbi12d 476 |
. . . . . . 7
⊢ (x =
ω → ((∅ ∈ x ∧
∀y ∈ x suc y ∈
x) ↔ (∅ ∈ ω ∧
∀y ∈ ω suc y ∈ ω))) |
| 28 | | eleq2 1150 |
. . . . . . 7
⊢ (x =
ω → (z ∈ x ↔ z
∈ ω)) |
| 29 | 27, 28 | imbi12d 474 |
. . . . . 6
⊢ (x =
ω → (((∅ ∈ x ∧
∀y ∈ x suc y ∈
x) → z ∈ x)
↔ ((∅ ∈ ω ∧ ∀y ∈ ω suc y ∈ ω) → z ∈ ω))) |
| 30 | 23, 29 | cla4v 1400 |
. . . . 5
⊢ (∀x((∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x) → z
∈ x) → ((∅ ∈ ω
∧ ∀y ∈ ω suc y ∈ ω) → z ∈ ω)) |
| 31 | 12, 30 | sylbi 174 |
. . . 4
⊢ (z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} → ((∅ ∈ ω ∧
∀y ∈ ω suc y ∈ ω) → z ∈ ω)) |
| 32 | 20, 22, 31 | mp2ani 523 |
. . 3
⊢ (z
∈ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} → z
∈ ω) |
| 33 | 32 | ssriv 1508 |
. 2
⊢ ∩{x∣(∅ ∈ x ∧ ∀y ∈ x suc
y ∈ x)} ⊆ ω |
| 34 | 19, 33 | eqssi 1517 |
1
⊢ ω = ∩{x∣(∅
∈ x ∧ ∀y ∈ x suc
y ∈ x)} |