Proof of Theorem copsex2g
| Step | Hyp | Ref
| Expression |
| 1 | | elisset 2777 |
. 2
⊢ (𝐴 ∈ 𝑉 → ∃𝑥 𝑥 = 𝐴) |
| 2 | | elisset 2777 |
. 2
⊢ (𝐵 ∈ 𝑊 → ∃𝑦 𝑦 = 𝐵) |
| 3 | | eeanv 1951 |
. . 3
⊢
(∃𝑥∃𝑦(𝑥 = 𝐴 ∧ 𝑦 = 𝐵) ↔ (∃𝑥 𝑥 = 𝐴 ∧ ∃𝑦 𝑦 = 𝐵)) |
| 4 | | nfe1 1510 |
. . . . 5
⊢
Ⅎ𝑥∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) |
| 5 | | nfv 1542 |
. . . . 5
⊢
Ⅎ𝑥𝜓 |
| 6 | 4, 5 | nfbi 1603 |
. . . 4
⊢
Ⅎ𝑥(∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓) |
| 7 | | nfe1 1510 |
. . . . . . 7
⊢
Ⅎ𝑦∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) |
| 8 | 7 | nfex 1651 |
. . . . . 6
⊢
Ⅎ𝑦∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) |
| 9 | | nfv 1542 |
. . . . . 6
⊢
Ⅎ𝑦𝜓 |
| 10 | 8, 9 | nfbi 1603 |
. . . . 5
⊢
Ⅎ𝑦(∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓) |
| 11 | | opeq12 3811 |
. . . . . . 7
⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → 〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉) |
| 12 | | copsexg 4278 |
. . . . . . . 8
⊢
(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 → (𝜑 ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑))) |
| 13 | 12 | eqcoms 2199 |
. . . . . . 7
⊢
(〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉 → (𝜑 ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑))) |
| 14 | 11, 13 | syl 14 |
. . . . . 6
⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (𝜑 ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑))) |
| 15 | | copsex2g.1 |
. . . . . 6
⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (𝜑 ↔ 𝜓)) |
| 16 | 14, 15 | bitr3d 190 |
. . . . 5
⊢ ((𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓)) |
| 17 | 10, 16 | exlimi 1608 |
. . . 4
⊢
(∃𝑦(𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓)) |
| 18 | 6, 17 | exlimi 1608 |
. . 3
⊢
(∃𝑥∃𝑦(𝑥 = 𝐴 ∧ 𝑦 = 𝐵) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓)) |
| 19 | 3, 18 | sylbir 135 |
. 2
⊢
((∃𝑥 𝑥 = 𝐴 ∧ ∃𝑦 𝑦 = 𝐵) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓)) |
| 20 | 1, 2, 19 | syl2an 289 |
1
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ 𝜑) ↔ 𝜓)) |