Proof of Theorem 2eu3
| Step | Hyp | Ref
| Expression |
| 1 | | hbmo1 1032 |
. . . . 5
⊢ (∃*yφ →
∀y∃*yφ) |
| 2 | 1 | 19.31 766 |
. . . 4
⊢ (∀y(∃*xφ ∨ ∃*yφ) ↔
(∀y∃*xφ ∨
∃*yφ)) |
| 3 | 2 | bial 695 |
. . 3
⊢ (∀x∀y(∃*xφ ∨ ∃*yφ) ↔
∀x(∀y∃*xφ ∨ ∃*yφ)) |
| 4 | | hbmo1 1032 |
. . . . 5
⊢ (∃*xφ →
∀x∃*xφ) |
| 5 | 4 | hbal 700 |
. . . 4
⊢ (∀y∃*xφ → ∀x∀y∃*xφ) |
| 6 | 5 | 19.32 765 |
. . 3
⊢ (∀x(∀y∃*xφ ∨ ∃*yφ) ↔
(∀y∃*xφ ∨
∀x∃*yφ)) |
| 7 | 3, 6 | bitr 151 |
. 2
⊢ (∀x∀y(∃*xφ ∨ ∃*yφ) ↔
(∀y∃*xφ ∨
∀x∃*yφ)) |
| 8 | | 2eu1 1067 |
. . . . . . 7
⊢ (∀y∃*xφ → (∃!y∃!xφ ↔ (∃!y∃xφ ∧ ∃!x∃yφ))) |
| 9 | 8 | biimpd 135 |
. . . . . 6
⊢ (∀y∃*xφ → (∃!y∃!xφ → (∃!y∃xφ ∧ ∃!x∃yφ))) |
| 10 | | ancom 333 |
. . . . . 6
⊢ ((∃!y∃xφ ∧ ∃!x∃yφ) ↔ (∃!x∃yφ ∧ ∃!y∃xφ)) |
| 11 | 9, 10 | syl6ib 185 |
. . . . 5
⊢ (∀y∃*xφ → (∃!y∃!xφ → (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 12 | 11 | adantld 307 |
. . . 4
⊢ (∀y∃*xφ → ((∃!x∃!yφ ∧ ∃!y∃!xφ) → (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 13 | | 2eu1 1067 |
. . . . . 6
⊢ (∀x∃*yφ → (∃!x∃!yφ ↔ (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 14 | 13 | biimpd 135 |
. . . . 5
⊢ (∀x∃*yφ → (∃!x∃!yφ → (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 15 | 14 | adantrd 308 |
. . . 4
⊢ (∀x∃*yφ → ((∃!x∃!yφ ∧ ∃!y∃!xφ) → (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 16 | 12, 15 | jaoi 275 |
. . 3
⊢ ((∀y∃*xφ ∨ ∀x∃*yφ) → ((∃!x∃!yφ ∧ ∃!y∃!xφ) → (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 17 | | 2exeu 1066 |
. . . . 5
⊢ ((∃!x∃yφ ∧ ∃!y∃xφ) → ∃!x∃!yφ) |
| 18 | | 2exeu 1066 |
. . . . . 6
⊢ ((∃!y∃xφ ∧ ∃!x∃yφ) → ∃!y∃!xφ) |
| 19 | 18 | ancoms 334 |
. . . . 5
⊢ ((∃!x∃yφ ∧ ∃!y∃xφ) → ∃!y∃!xφ) |
| 20 | 17, 19 | jca 236 |
. . . 4
⊢ ((∃!x∃yφ ∧ ∃!y∃xφ) → (∃!x∃!yφ ∧ ∃!y∃!xφ)) |
| 21 | 20 | a1i 7 |
. . 3
⊢ ((∀y∃*xφ ∨ ∀x∃*yφ) → ((∃!x∃yφ ∧ ∃!y∃xφ) → (∃!x∃!yφ ∧ ∃!y∃!xφ))) |
| 22 | 16, 21 | impbid 397 |
. 2
⊢ ((∀y∃*xφ ∨ ∀x∃*yφ) → ((∃!x∃!yφ ∧ ∃!y∃!xφ) ↔ (∃!x∃yφ ∧ ∃!y∃xφ))) |
| 23 | 7, 22 | sylbi 174 |
1
⊢ (∀x∀y(∃*xφ ∨ ∃*yφ) →
((∃!x∃!yφ ∧
∃!y∃!xφ) ↔
(∃!x∃yφ ∧
∃!y∃xφ))) |