Proof of Theorem eueq2
| Step | Hyp | Ref
| Expression |
| 1 | | notnot 142 |
. . . 4
⊢ (𝜑 → ¬ ¬ 𝜑) |
| 2 | | eueq2.1 |
. . . . . 6
⊢ 𝐴 ∈ V |
| 3 | 2 | eueqi 3715 |
. . . . 5
⊢
∃!𝑥 𝑥 = 𝐴 |
| 4 | | euanv 2624 |
. . . . . 6
⊢
(∃!𝑥(𝜑 ∧ 𝑥 = 𝐴) ↔ (𝜑 ∧ ∃!𝑥 𝑥 = 𝐴)) |
| 5 | 4 | biimpri 228 |
. . . . 5
⊢ ((𝜑 ∧ ∃!𝑥 𝑥 = 𝐴) → ∃!𝑥(𝜑 ∧ 𝑥 = 𝐴)) |
| 6 | 3, 5 | mpan2 691 |
. . . 4
⊢ (𝜑 → ∃!𝑥(𝜑 ∧ 𝑥 = 𝐴)) |
| 7 | | euorv 2612 |
. . . 4
⊢ ((¬
¬ 𝜑 ∧ ∃!𝑥(𝜑 ∧ 𝑥 = 𝐴)) → ∃!𝑥(¬ 𝜑 ∨ (𝜑 ∧ 𝑥 = 𝐴))) |
| 8 | 1, 6, 7 | syl2anc 584 |
. . 3
⊢ (𝜑 → ∃!𝑥(¬ 𝜑 ∨ (𝜑 ∧ 𝑥 = 𝐴))) |
| 9 | | orcom 871 |
. . . . 5
⊢ ((¬
𝜑 ∨ (𝜑 ∧ 𝑥 = 𝐴)) ↔ ((𝜑 ∧ 𝑥 = 𝐴) ∨ ¬ 𝜑)) |
| 10 | 1 | bianfd 534 |
. . . . . 6
⊢ (𝜑 → (¬ 𝜑 ↔ (¬ 𝜑 ∧ 𝑥 = 𝐵))) |
| 11 | 10 | orbi2d 916 |
. . . . 5
⊢ (𝜑 → (((𝜑 ∧ 𝑥 = 𝐴) ∨ ¬ 𝜑) ↔ ((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)))) |
| 12 | 9, 11 | bitrid 283 |
. . . 4
⊢ (𝜑 → ((¬ 𝜑 ∨ (𝜑 ∧ 𝑥 = 𝐴)) ↔ ((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)))) |
| 13 | 12 | eubidv 2586 |
. . 3
⊢ (𝜑 → (∃!𝑥(¬ 𝜑 ∨ (𝜑 ∧ 𝑥 = 𝐴)) ↔ ∃!𝑥((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)))) |
| 14 | 8, 13 | mpbid 232 |
. 2
⊢ (𝜑 → ∃!𝑥((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵))) |
| 15 | | eueq2.2 |
. . . . . 6
⊢ 𝐵 ∈ V |
| 16 | 15 | eueqi 3715 |
. . . . 5
⊢
∃!𝑥 𝑥 = 𝐵 |
| 17 | | euanv 2624 |
. . . . . 6
⊢
(∃!𝑥(¬
𝜑 ∧ 𝑥 = 𝐵) ↔ (¬ 𝜑 ∧ ∃!𝑥 𝑥 = 𝐵)) |
| 18 | 17 | biimpri 228 |
. . . . 5
⊢ ((¬
𝜑 ∧ ∃!𝑥 𝑥 = 𝐵) → ∃!𝑥(¬ 𝜑 ∧ 𝑥 = 𝐵)) |
| 19 | 16, 18 | mpan2 691 |
. . . 4
⊢ (¬
𝜑 → ∃!𝑥(¬ 𝜑 ∧ 𝑥 = 𝐵)) |
| 20 | | euorv 2612 |
. . . 4
⊢ ((¬
𝜑 ∧ ∃!𝑥(¬ 𝜑 ∧ 𝑥 = 𝐵)) → ∃!𝑥(𝜑 ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵))) |
| 21 | 19, 20 | mpdan 687 |
. . 3
⊢ (¬
𝜑 → ∃!𝑥(𝜑 ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵))) |
| 22 | | id 22 |
. . . . . 6
⊢ (¬
𝜑 → ¬ 𝜑) |
| 23 | 22 | bianfd 534 |
. . . . 5
⊢ (¬
𝜑 → (𝜑 ↔ (𝜑 ∧ 𝑥 = 𝐴))) |
| 24 | 23 | orbi1d 917 |
. . . 4
⊢ (¬
𝜑 → ((𝜑 ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)) ↔ ((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)))) |
| 25 | 24 | eubidv 2586 |
. . 3
⊢ (¬
𝜑 → (∃!𝑥(𝜑 ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)) ↔ ∃!𝑥((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)))) |
| 26 | 21, 25 | mpbid 232 |
. 2
⊢ (¬
𝜑 → ∃!𝑥((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵))) |
| 27 | 14, 26 | pm2.61i 182 |
1
⊢
∃!𝑥((𝜑 ∧ 𝑥 = 𝐴) ∨ (¬ 𝜑 ∧ 𝑥 = 𝐵)) |