Proof of Theorem axxpprim
Step | Hyp | Ref
| Expression |
1 | | ax-xp 4080 |
. 2
⊢ ∃y∀z(z ∈ y ↔ ∃w∃t(z = ⟪w,
t⟫ ∧ t ∈ x)) |
2 | | axprimlem2 4090 |
. . . . . . 7
⊢ (z = ⟪w,
t⟫ ↔ ∀a(a ∈ z ↔ (∀b(b ∈ a ↔ b =
w) ∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t))))) |
3 | 2 | anbi1i 676 |
. . . . . 6
⊢ ((z = ⟪w,
t⟫ ∧ t ∈ x) ↔
(∀a(a ∈ z ↔
(∀b(b ∈ a ↔
b = w)
∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t)))) ∧ t ∈ x)) |
4 | 3 | 2exbii 1583 |
. . . . 5
⊢ (∃w∃t(z = ⟪w,
t⟫ ∧ t ∈ x) ↔
∃w∃t(∀a(a ∈ z ↔ (∀b(b ∈ a ↔ b =
w) ∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t)))) ∧ t ∈ x)) |
5 | 4 | bibi2i 304 |
. . . 4
⊢ ((z ∈ y ↔ ∃w∃t(z = ⟪w,
t⟫ ∧ t ∈ x)) ↔
(z ∈
y ↔ ∃w∃t(∀a(a ∈ z ↔ (∀b(b ∈ a ↔ b =
w) ∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t)))) ∧ t ∈ x))) |
6 | 5 | albii 1566 |
. . 3
⊢ (∀z(z ∈ y ↔ ∃w∃t(z = ⟪w,
t⟫ ∧ t ∈ x)) ↔
∀z(z ∈ y ↔
∃w∃t(∀a(a ∈ z ↔ (∀b(b ∈ a ↔ b =
w) ∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t)))) ∧ t ∈ x))) |
7 | 6 | exbii 1582 |
. 2
⊢ (∃y∀z(z ∈ y ↔ ∃w∃t(z = ⟪w,
t⟫ ∧ t ∈ x)) ↔
∃y∀z(z ∈ y ↔ ∃w∃t(∀a(a ∈ z ↔ (∀b(b ∈ a ↔ b =
w) ∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t)))) ∧ t ∈ x))) |
8 | 1, 7 | mpbi 199 |
1
⊢ ∃y∀z(z ∈ y ↔ ∃w∃t(∀a(a ∈ z ↔ (∀b(b ∈ a ↔ b =
w) ∨ ∀c(c ∈ a ↔ (c =
w ∨
c = t)))) ∧ t ∈ x)) |