Proof of Theorem eqvinop
| Step | Hyp | Ref
| Expression |
| 1 | | eqvinop.1 |
. . . . . . . 8
⊢ 𝐵 ∈ V |
| 2 | | eqvinop.2 |
. . . . . . . 8
⊢ 𝐶 ∈ V |
| 3 | 1, 2 | opth2 5485 |
. . . . . . 7
⊢
(〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉 ↔ (𝑥 = 𝐵 ∧ 𝑦 = 𝐶)) |
| 4 | 3 | anbi2i 623 |
. . . . . 6
⊢ ((𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ (𝐴 = 〈𝑥, 𝑦〉 ∧ (𝑥 = 𝐵 ∧ 𝑦 = 𝐶))) |
| 5 | | ancom 460 |
. . . . . 6
⊢ ((𝐴 = 〈𝑥, 𝑦〉 ∧ (𝑥 = 𝐵 ∧ 𝑦 = 𝐶)) ↔ ((𝑥 = 𝐵 ∧ 𝑦 = 𝐶) ∧ 𝐴 = 〈𝑥, 𝑦〉)) |
| 6 | | anass 468 |
. . . . . 6
⊢ (((𝑥 = 𝐵 ∧ 𝑦 = 𝐶) ∧ 𝐴 = 〈𝑥, 𝑦〉) ↔ (𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
| 7 | 4, 5, 6 | 3bitri 297 |
. . . . 5
⊢ ((𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ (𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
| 8 | 7 | exbii 1848 |
. . . 4
⊢
(∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ ∃𝑦(𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
| 9 | | 19.42v 1953 |
. . . 4
⊢
(∃𝑦(𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉)) ↔ (𝑥 = 𝐵 ∧ ∃𝑦(𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
| 10 | | opeq2 4874 |
. . . . . . 7
⊢ (𝑦 = 𝐶 → 〈𝑥, 𝑦〉 = 〈𝑥, 𝐶〉) |
| 11 | 10 | eqeq2d 2748 |
. . . . . 6
⊢ (𝑦 = 𝐶 → (𝐴 = 〈𝑥, 𝑦〉 ↔ 𝐴 = 〈𝑥, 𝐶〉)) |
| 12 | 2, 11 | ceqsexv 3532 |
. . . . 5
⊢
(∃𝑦(𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉) ↔ 𝐴 = 〈𝑥, 𝐶〉) |
| 13 | 12 | anbi2i 623 |
. . . 4
⊢ ((𝑥 = 𝐵 ∧ ∃𝑦(𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉)) ↔ (𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉)) |
| 14 | 8, 9, 13 | 3bitri 297 |
. . 3
⊢
(∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ (𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉)) |
| 15 | 14 | exbii 1848 |
. 2
⊢
(∃𝑥∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ ∃𝑥(𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉)) |
| 16 | | opeq1 4873 |
. . . 4
⊢ (𝑥 = 𝐵 → 〈𝑥, 𝐶〉 = 〈𝐵, 𝐶〉) |
| 17 | 16 | eqeq2d 2748 |
. . 3
⊢ (𝑥 = 𝐵 → (𝐴 = 〈𝑥, 𝐶〉 ↔ 𝐴 = 〈𝐵, 𝐶〉)) |
| 18 | 1, 17 | ceqsexv 3532 |
. 2
⊢
(∃𝑥(𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉) ↔ 𝐴 = 〈𝐵, 𝐶〉) |
| 19 | 15, 18 | bitr2i 276 |
1
⊢ (𝐴 = 〈𝐵, 𝐶〉 ↔ ∃𝑥∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉)) |