Proof of Theorem brab2dd
| Step | Hyp | Ref
| Expression |
| 1 | | df-br 5124 |
. . . 4
⊢ (𝐴𝑅𝐵 ↔ 〈𝐴, 𝐵〉 ∈ 𝑅) |
| 2 | | brab2dd.1 |
. . . . 5
⊢ (𝜑 → 𝑅 = {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)}) |
| 3 | 2 | eleq2d 2819 |
. . . 4
⊢ (𝜑 → (〈𝐴, 𝐵〉 ∈ 𝑅 ↔ 〈𝐴, 𝐵〉 ∈ {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)})) |
| 4 | 1, 3 | bitrid 283 |
. . 3
⊢ (𝜑 → (𝐴𝑅𝐵 ↔ 〈𝐴, 𝐵〉 ∈ {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)})) |
| 5 | | elopab 5512 |
. . 3
⊢
(〈𝐴, 𝐵〉 ∈ {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)} ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) |
| 6 | 4, 5 | bitrdi 287 |
. 2
⊢ (𝜑 → (𝐴𝑅𝐵 ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)))) |
| 7 | | simpl 482 |
. . . . . . 7
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → 𝜑) |
| 8 | | eqcom 2741 |
. . . . . . . . 9
⊢
(〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉 ↔ 〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉) |
| 9 | | vex 3467 |
. . . . . . . . . 10
⊢ 𝑥 ∈ V |
| 10 | | vex 3467 |
. . . . . . . . . 10
⊢ 𝑦 ∈ V |
| 11 | 9, 10 | opth 5461 |
. . . . . . . . 9
⊢
(〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉 ↔ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
| 12 | 8, 11 | sylbb1 237 |
. . . . . . . 8
⊢
(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 → (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
| 13 | 12 | ad2antrl 728 |
. . . . . . 7
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
| 14 | | simprrl 780 |
. . . . . . 7
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷)) |
| 15 | | brab2dd.3 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ↔ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉))) |
| 16 | 15 | biimpa 476 |
. . . . . . 7
⊢ (((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 17 | 7, 13, 14, 16 | syl21anc 837 |
. . . . . 6
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 18 | 17 | ex 412 |
. . . . 5
⊢ (𝜑 → ((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉))) |
| 19 | 18 | exlimdvv 1933 |
. . . 4
⊢ (𝜑 → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉))) |
| 20 | 19 | imp 406 |
. . 3
⊢ ((𝜑 ∧ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 21 | | simprl 770 |
. . 3
⊢ ((𝜑 ∧ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 22 | | simprl 770 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) → 𝐴 ∈ 𝑈) |
| 23 | | simprr 772 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) → 𝐵 ∈ 𝑉) |
| 24 | | brab2dd.2 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → (𝜓 ↔ 𝜒)) |
| 25 | 15, 24 | anbi12d 632 |
. . . . 5
⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → (((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 26 | 25 | adantlr 715 |
. . . 4
⊢ (((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → (((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 27 | 22, 23, 26 | copsex2dv 5479 |
. . 3
⊢ ((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 28 | 20, 21, 27 | bibiad 839 |
. 2
⊢ (𝜑 → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 29 | 6, 28 | bitrd 279 |
1
⊢ (𝜑 → (𝐴𝑅𝐵 ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |