Proof of Theorem copsex4g
Step | Hyp | Ref
| Expression |
1 | | eqcom 2167 |
. . . . . . 7
⊢
(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ↔ 〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉) |
2 | | vex 2729 |
. . . . . . . 8
⊢ 𝑥 ∈ V |
3 | | vex 2729 |
. . . . . . . 8
⊢ 𝑦 ∈ V |
4 | 2, 3 | opth 4215 |
. . . . . . 7
⊢
(〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉 ↔ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
5 | 1, 4 | bitri 183 |
. . . . . 6
⊢
(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ↔ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
6 | | eqcom 2167 |
. . . . . . 7
⊢
(〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉 ↔ 〈𝑧, 𝑤〉 = 〈𝐶, 𝐷〉) |
7 | | vex 2729 |
. . . . . . . 8
⊢ 𝑧 ∈ V |
8 | | vex 2729 |
. . . . . . . 8
⊢ 𝑤 ∈ V |
9 | 7, 8 | opth 4215 |
. . . . . . 7
⊢
(〈𝑧, 𝑤〉 = 〈𝐶, 𝐷〉 ↔ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) |
10 | 6, 9 | bitri 183 |
. . . . . 6
⊢
(〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉 ↔ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) |
11 | 5, 10 | anbi12i 456 |
. . . . 5
⊢
((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉) ↔ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷))) |
12 | 11 | anbi1i 454 |
. . . 4
⊢
(((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉) ∧ 𝜑) ↔ (((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) ∧ 𝜑)) |
13 | 12 | a1i 9 |
. . 3
⊢ (((𝐴 ∈ 𝑅 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑅 ∧ 𝐷 ∈ 𝑆)) → (((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉) ∧ 𝜑) ↔ (((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) ∧ 𝜑))) |
14 | 13 | 4exbidv 1858 |
. 2
⊢ (((𝐴 ∈ 𝑅 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑅 ∧ 𝐷 ∈ 𝑆)) → (∃𝑥∃𝑦∃𝑧∃𝑤((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉) ∧ 𝜑) ↔ ∃𝑥∃𝑦∃𝑧∃𝑤(((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) ∧ 𝜑))) |
15 | | id 19 |
. . 3
⊢ (((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) → ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷))) |
16 | | copsex4g.1 |
. . 3
⊢ (((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) → (𝜑 ↔ 𝜓)) |
17 | 15, 16 | cgsex4g 2763 |
. 2
⊢ (((𝐴 ∈ 𝑅 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑅 ∧ 𝐷 ∈ 𝑆)) → (∃𝑥∃𝑦∃𝑧∃𝑤(((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ∧ (𝑧 = 𝐶 ∧ 𝑤 = 𝐷)) ∧ 𝜑) ↔ 𝜓)) |
18 | 14, 17 | bitrd 187 |
1
⊢ (((𝐴 ∈ 𝑅 ∧ 𝐵 ∈ 𝑆) ∧ (𝐶 ∈ 𝑅 ∧ 𝐷 ∈ 𝑆)) → (∃𝑥∃𝑦∃𝑧∃𝑤((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 〈𝐶, 𝐷〉 = 〈𝑧, 𝑤〉) ∧ 𝜑) ↔ 𝜓)) |