Proof of Theorem 2reuswap
| Step | Hyp | Ref
| Expression |
| 1 | | df-ral 1205 |
. . 3
⊢ (∀x ∈ A
∃*y(y ∈ A ∧
φ) ↔ ∀x(x ∈
A → ∃*y(y ∈
A ∧ φ))) |
| 2 | | moanimv 1052 |
. . . 4
⊢ (∃*y(x ∈
A ∧ (y ∈ A ∧
φ)) ↔ (x ∈ A
→ ∃*y(y ∈ A ∧
φ))) |
| 3 | 2 | bial 695 |
. . 3
⊢ (∀x∃*y(x ∈
A ∧ (y ∈ A ∧
φ)) ↔ ∀x(x ∈
A → ∃*y(y ∈
A ∧ φ))) |
| 4 | 1, 3 | bitr4 154 |
. 2
⊢ (∀x ∈ A
∃*y(y ∈ A ∧
φ) ↔ ∀x∃*y(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 5 | | 2euswap 1065 |
. . 3
⊢ (∀x∃*y(x ∈
A ∧ (y ∈ A ∧
φ)) → (∃!x∃y(x ∈
A ∧ (y ∈ A ∧
φ)) → ∃!y∃x(x ∈
A ∧ (y ∈ A ∧
φ)))) |
| 6 | | df-reu 1207 |
. . . 4
⊢ (∃!x ∈ A
∃y ∈ A φ ↔
∃!x(x ∈ A ∧
∃y ∈ A φ)) |
| 7 | | df-rex 1206 |
. . . . . 6
⊢ (∃y ∈ A
(x ∈ A ∧ φ)
↔ ∃y(y ∈ A ∧
(x ∈ A ∧ φ))) |
| 8 | | r19.42v 1303 |
. . . . . 6
⊢ (∃y ∈ A
(x ∈ A ∧ φ)
↔ (x ∈ A ∧ ∃y
∈ A φ)) |
| 9 | | an12 370 |
. . . . . . 7
⊢ ((y
∈ A ∧ (x ∈ A ∧
φ)) ↔ (x ∈ A ∧
(y ∈ A ∧ φ))) |
| 10 | 9 | biex 733 |
. . . . . 6
⊢ (∃y(y ∈
A ∧ (x ∈ A ∧
φ)) ↔ ∃y(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 11 | 7, 8, 10 | 3bitr3 156 |
. . . . 5
⊢ ((x
∈ A ∧ ∃y ∈ A φ) ↔ ∃y(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 12 | 11 | bieu 1014 |
. . . 4
⊢ (∃!x(x ∈
A ∧ ∃y ∈ A φ) ↔ ∃!x∃y(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 13 | 6, 12 | bitr 151 |
. . 3
⊢ (∃!x ∈ A
∃y ∈ A φ ↔
∃!x∃y(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 14 | | df-reu 1207 |
. . . 4
⊢ (∃!y ∈ A
∃x ∈ A φ ↔
∃!y(y ∈ A ∧
∃x ∈ A φ)) |
| 15 | | r19.42v 1303 |
. . . . . 6
⊢ (∃x ∈ A
(y ∈ A ∧ φ)
↔ (y ∈ A ∧ ∃x
∈ A φ)) |
| 16 | | df-rex 1206 |
. . . . . 6
⊢ (∃x ∈ A
(y ∈ A ∧ φ)
↔ ∃x(x ∈ A ∧
(y ∈ A ∧ φ))) |
| 17 | 15, 16 | bitr3 153 |
. . . . 5
⊢ ((y
∈ A ∧ ∃x ∈ A φ) ↔ ∃x(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 18 | 17 | bieu 1014 |
. . . 4
⊢ (∃!y(y ∈
A ∧ ∃x ∈ A φ) ↔ ∃!y∃x(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 19 | 14, 18 | bitr 151 |
. . 3
⊢ (∃!y ∈ A
∃x ∈ A φ ↔
∃!y∃x(x ∈
A ∧ (y ∈ A ∧
φ))) |
| 20 | 5, 13, 19 | 3imtr4g 426 |
. 2
⊢ (∀x∃*y(x ∈
A ∧ (y ∈ A ∧
φ)) → (∃!x ∈ A
∃y ∈ A φ →
∃!y ∈ A ∃x
∈ A φ)) |
| 21 | 4, 20 | sylbi 174 |
1
⊢ (∀x ∈ A
∃*y(y ∈ A ∧
φ) → (∃!x ∈ A
∃y ∈ A φ →
∃!y ∈ A ∃x
∈ A φ)) |