Proof of Theorem 2reuswap
| Step | Hyp | Ref
| Expression |
| 1 | | df-ral 1646 |
. . 3
⊢ (∀x ∈ A
∃*y(y ∈ A
⋀ φ) ↔ ∀x(x ∈
A → ∃*y(y ∈
A ⋀ φ))) |
| 2 | | moanimv 1427 |
. . . 4
⊢ (∃*y(x ∈
A ⋀ (y ∈ A
⋀ φ)) ↔ (x ∈ A
→ ∃*y(y ∈ A
⋀ φ))) |
| 3 | 2 | albii 997 |
. . 3
⊢ (∀x∃*y(x ∈
A ⋀ (y ∈ A
⋀ φ)) ↔ ∀x(x ∈
A → ∃*y(y ∈
A ⋀ φ))) |
| 4 | 1, 3 | bitr4 176 |
. 2
⊢ (∀x ∈ A
∃*y(y ∈ A
⋀ φ) ↔ ∀x∃*y(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 5 | | 2euswap 1443 |
. . 3
⊢ (∀x∃*y(x ∈
A ⋀ (y ∈ A
⋀ φ)) → (∃!x∃y(x ∈
A ⋀ (y ∈ A
⋀ φ)) → ∃!y∃x(x ∈
A ⋀ (y ∈ A
⋀ φ)))) |
| 6 | | df-reu 1648 |
. . . 4
⊢ (∃!x ∈ A
∃y ∈ A φ ↔
∃!x(x ∈ A
⋀ ∃y ∈ A φ)) |
| 7 | | df-rex 1647 |
. . . . . 6
⊢ (∃y ∈ A
(x ∈ A ⋀ φ)
↔ ∃y(y ∈ A
⋀ (x ∈ A ⋀ φ))) |
| 8 | | r19.42v 1761 |
. . . . . 6
⊢ (∃y ∈ A
(x ∈ A ⋀ φ)
↔ (x ∈ A ⋀ ∃y ∈ A φ)) |
| 9 | | an12 484 |
. . . . . . 7
⊢ ((y
∈ A ⋀ (x ∈ A
⋀ φ)) ↔ (x ∈ A
⋀ (y ∈ A ⋀ φ))) |
| 10 | 9 | exbii 1049 |
. . . . . 6
⊢ (∃y(y ∈
A ⋀ (x ∈ A
⋀ φ)) ↔ ∃y(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 11 | 7, 8, 10 | 3bitr3 181 |
. . . . 5
⊢ ((x
∈ A ⋀ ∃y ∈ A φ) ↔ ∃y(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 12 | 11 | eubii 1385 |
. . . 4
⊢ (∃!x(x ∈
A ⋀ ∃y ∈ A φ) ↔ ∃!x∃y(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 13 | 6, 12 | bitr 173 |
. . 3
⊢ (∃!x ∈ A
∃y ∈ A φ ↔
∃!x∃y(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 14 | | df-reu 1648 |
. . . 4
⊢ (∃!y ∈ A
∃x ∈ A φ ↔
∃!y(y ∈ A
⋀ ∃x ∈ A φ)) |
| 15 | | r19.42v 1761 |
. . . . . 6
⊢ (∃x ∈ A
(y ∈ A ⋀ φ)
↔ (y ∈ A ⋀ ∃x ∈ A φ)) |
| 16 | | df-rex 1647 |
. . . . . 6
⊢ (∃x ∈ A
(y ∈ A ⋀ φ)
↔ ∃x(x ∈ A
⋀ (y ∈ A ⋀ φ))) |
| 17 | 15, 16 | bitr3 175 |
. . . . 5
⊢ ((y
∈ A ⋀ ∃x ∈ A φ) ↔ ∃x(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 18 | 17 | eubii 1385 |
. . . 4
⊢ (∃!y(y ∈
A ⋀ ∃x ∈ A φ) ↔ ∃!y∃x(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 19 | 14, 18 | bitr 173 |
. . 3
⊢ (∃!y ∈ A
∃x ∈ A φ ↔
∃!y∃x(x ∈
A ⋀ (y ∈ A
⋀ φ))) |
| 20 | 5, 13, 19 | 3imtr4g 552 |
. 2
⊢ (∀x∃*y(x ∈
A ⋀ (y ∈ A
⋀ φ)) → (∃!x ∈ A
∃y ∈ A φ →
∃!y ∈ A ∃x
∈ A φ)) |
| 21 | 4, 20 | sylbi 199 |
1
⊢ (∀x ∈ A
∃*y(y ∈ A
⋀ φ) → (∃!x ∈ A
∃y ∈ A φ →
∃!y ∈ A ∃x
∈ A φ)) |