Proof of Theorem 2exeu
| Step | Hyp | Ref
| Expression |
| 1 | | excom 1678 |
. . . . 5
⊢
(∃𝑦∃𝑥𝜑 ↔ ∃𝑥∃𝑦𝜑) |
| 2 | | hbe1 1509 |
. . . . . . . 8
⊢
(∃𝑥𝜑 → ∀𝑥∃𝑥𝜑) |
| 3 | 2 | hbmo 2084 |
. . . . . . 7
⊢
(∃*𝑦∃𝑥𝜑 → ∀𝑥∃*𝑦∃𝑥𝜑) |
| 4 | 3 | 19.41h 1699 |
. . . . . 6
⊢
(∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦∃𝑥𝜑) ↔ (∃𝑥∃𝑦𝜑 ∧ ∃*𝑦∃𝑥𝜑)) |
| 5 | | 19.8a 1604 |
. . . . . . . . 9
⊢ (𝜑 → ∃𝑥𝜑) |
| 6 | 5 | moimi 2110 |
. . . . . . . 8
⊢
(∃*𝑦∃𝑥𝜑 → ∃*𝑦𝜑) |
| 7 | 6 | anim2i 342 |
. . . . . . 7
⊢
((∃𝑦𝜑 ∧ ∃*𝑦∃𝑥𝜑) → (∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 8 | 7 | eximi 1614 |
. . . . . 6
⊢
(∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦∃𝑥𝜑) → ∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 9 | 4, 8 | sylbir 135 |
. . . . 5
⊢
((∃𝑥∃𝑦𝜑 ∧ ∃*𝑦∃𝑥𝜑) → ∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 10 | 1, 9 | sylanb 284 |
. . . 4
⊢
((∃𝑦∃𝑥𝜑 ∧ ∃*𝑦∃𝑥𝜑) → ∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 11 | | simpl 109 |
. . . . . 6
⊢
((∃𝑦𝜑 ∧ ∃*𝑦𝜑) → ∃𝑦𝜑) |
| 12 | 11 | moimi 2110 |
. . . . 5
⊢
(∃*𝑥∃𝑦𝜑 → ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 13 | 12 | adantl 277 |
. . . 4
⊢
((∃𝑥∃𝑦𝜑 ∧ ∃*𝑥∃𝑦𝜑) → ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 14 | 10, 13 | anim12i 338 |
. . 3
⊢
(((∃𝑦∃𝑥𝜑 ∧ ∃*𝑦∃𝑥𝜑) ∧ (∃𝑥∃𝑦𝜑 ∧ ∃*𝑥∃𝑦𝜑)) → (∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑) ∧ ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑))) |
| 15 | 14 | ancoms 268 |
. 2
⊢
(((∃𝑥∃𝑦𝜑 ∧ ∃*𝑥∃𝑦𝜑) ∧ (∃𝑦∃𝑥𝜑 ∧ ∃*𝑦∃𝑥𝜑)) → (∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑) ∧ ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑))) |
| 16 | | eu5 2092 |
. . 3
⊢
(∃!𝑥∃𝑦𝜑 ↔ (∃𝑥∃𝑦𝜑 ∧ ∃*𝑥∃𝑦𝜑)) |
| 17 | | eu5 2092 |
. . 3
⊢
(∃!𝑦∃𝑥𝜑 ↔ (∃𝑦∃𝑥𝜑 ∧ ∃*𝑦∃𝑥𝜑)) |
| 18 | 16, 17 | anbi12i 460 |
. 2
⊢
((∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑) ↔ ((∃𝑥∃𝑦𝜑 ∧ ∃*𝑥∃𝑦𝜑) ∧ (∃𝑦∃𝑥𝜑 ∧ ∃*𝑦∃𝑥𝜑))) |
| 19 | | eu5 2092 |
. . 3
⊢
(∃!𝑥∃!𝑦𝜑 ↔ (∃𝑥∃!𝑦𝜑 ∧ ∃*𝑥∃!𝑦𝜑)) |
| 20 | | eu5 2092 |
. . . . 5
⊢
(∃!𝑦𝜑 ↔ (∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 21 | 20 | exbii 1619 |
. . . 4
⊢
(∃𝑥∃!𝑦𝜑 ↔ ∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 22 | 20 | mobii 2082 |
. . . 4
⊢
(∃*𝑥∃!𝑦𝜑 ↔ ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑)) |
| 23 | 21, 22 | anbi12i 460 |
. . 3
⊢
((∃𝑥∃!𝑦𝜑 ∧ ∃*𝑥∃!𝑦𝜑) ↔ (∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑) ∧ ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑))) |
| 24 | 19, 23 | bitri 184 |
. 2
⊢
(∃!𝑥∃!𝑦𝜑 ↔ (∃𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑) ∧ ∃*𝑥(∃𝑦𝜑 ∧ ∃*𝑦𝜑))) |
| 25 | 15, 18, 24 | 3imtr4i 201 |
1
⊢
((∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑) → ∃!𝑥∃!𝑦𝜑) |