Proof of Theorem eqvinop
Step | Hyp | Ref
| Expression |
1 | | eqvinop.1 |
. . . . . . . 8
⊢ 𝐵 ∈ V |
2 | | eqvinop.2 |
. . . . . . . 8
⊢ 𝐶 ∈ V |
3 | 1, 2 | opth2 5389 |
. . . . . . 7
⊢
(〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉 ↔ (𝑥 = 𝐵 ∧ 𝑦 = 𝐶)) |
4 | 3 | anbi2i 622 |
. . . . . 6
⊢ ((𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ (𝐴 = 〈𝑥, 𝑦〉 ∧ (𝑥 = 𝐵 ∧ 𝑦 = 𝐶))) |
5 | | ancom 460 |
. . . . . 6
⊢ ((𝐴 = 〈𝑥, 𝑦〉 ∧ (𝑥 = 𝐵 ∧ 𝑦 = 𝐶)) ↔ ((𝑥 = 𝐵 ∧ 𝑦 = 𝐶) ∧ 𝐴 = 〈𝑥, 𝑦〉)) |
6 | | anass 468 |
. . . . . 6
⊢ (((𝑥 = 𝐵 ∧ 𝑦 = 𝐶) ∧ 𝐴 = 〈𝑥, 𝑦〉) ↔ (𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
7 | 4, 5, 6 | 3bitri 296 |
. . . . 5
⊢ ((𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ (𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
8 | 7 | exbii 1851 |
. . . 4
⊢
(∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ ∃𝑦(𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
9 | | 19.42v 1958 |
. . . 4
⊢
(∃𝑦(𝑥 = 𝐵 ∧ (𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉)) ↔ (𝑥 = 𝐵 ∧ ∃𝑦(𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉))) |
10 | | opeq2 4802 |
. . . . . . 7
⊢ (𝑦 = 𝐶 → 〈𝑥, 𝑦〉 = 〈𝑥, 𝐶〉) |
11 | 10 | eqeq2d 2749 |
. . . . . 6
⊢ (𝑦 = 𝐶 → (𝐴 = 〈𝑥, 𝑦〉 ↔ 𝐴 = 〈𝑥, 𝐶〉)) |
12 | 2, 11 | ceqsexv 3469 |
. . . . 5
⊢
(∃𝑦(𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉) ↔ 𝐴 = 〈𝑥, 𝐶〉) |
13 | 12 | anbi2i 622 |
. . . 4
⊢ ((𝑥 = 𝐵 ∧ ∃𝑦(𝑦 = 𝐶 ∧ 𝐴 = 〈𝑥, 𝑦〉)) ↔ (𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉)) |
14 | 8, 9, 13 | 3bitri 296 |
. . 3
⊢
(∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ (𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉)) |
15 | 14 | exbii 1851 |
. 2
⊢
(∃𝑥∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉) ↔ ∃𝑥(𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉)) |
16 | | opeq1 4801 |
. . . 4
⊢ (𝑥 = 𝐵 → 〈𝑥, 𝐶〉 = 〈𝐵, 𝐶〉) |
17 | 16 | eqeq2d 2749 |
. . 3
⊢ (𝑥 = 𝐵 → (𝐴 = 〈𝑥, 𝐶〉 ↔ 𝐴 = 〈𝐵, 𝐶〉)) |
18 | 1, 17 | ceqsexv 3469 |
. 2
⊢
(∃𝑥(𝑥 = 𝐵 ∧ 𝐴 = 〈𝑥, 𝐶〉) ↔ 𝐴 = 〈𝐵, 𝐶〉) |
19 | 15, 18 | bitr2i 275 |
1
⊢ (𝐴 = 〈𝐵, 𝐶〉 ↔ ∃𝑥∃𝑦(𝐴 = 〈𝑥, 𝑦〉 ∧ 〈𝑥, 𝑦〉 = 〈𝐵, 𝐶〉)) |