Proof of Theorem brab2dd
| Step | Hyp | Ref
| Expression |
| 1 | | df-br 5080 |
. . . 4
⊢ (𝐴𝑅𝐵 ↔ 〈𝐴, 𝐵〉 ∈ 𝑅) |
| 2 | | brab2dd.1 |
. . . . 5
⊢ (𝜑 → 𝑅 = {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)}) |
| 3 | 2 | eleq2d 2826 |
. . . 4
⊢ (𝜑 → (〈𝐴, 𝐵〉 ∈ 𝑅 ↔ 〈𝐴, 𝐵〉 ∈ {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)})) |
| 4 | 1, 3 | bitrid 284 |
. . 3
⊢ (𝜑 → (𝐴𝑅𝐵 ↔ 〈𝐴, 𝐵〉 ∈ {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)})) |
| 5 | | elopab 5476 |
. . 3
⊢
(〈𝐴, 𝐵〉 ∈ {〈𝑥, 𝑦〉 ∣ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)} ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) |
| 6 | 4, 5 | bitrdi 288 |
. 2
⊢ (𝜑 → (𝐴𝑅𝐵 ↔ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)))) |
| 7 | | simpl 483 |
. . . . . . 7
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → 𝜑) |
| 8 | | eqcom 2747 |
. . . . . . . . 9
⊢
(〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉 ↔ 〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉) |
| 9 | | vex 3436 |
. . . . . . . . . 10
⊢ 𝑥 ∈ V |
| 10 | | vex 3436 |
. . . . . . . . . 10
⊢ 𝑦 ∈ V |
| 11 | 9, 10 | opth 5423 |
. . . . . . . . 9
⊢
(〈𝑥, 𝑦〉 = 〈𝐴, 𝐵〉 ↔ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
| 12 | 8, 11 | sylbb1 238 |
. . . . . . . 8
⊢
(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 → (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
| 13 | 12 | ad2antrl 734 |
. . . . . . 7
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) |
| 14 | | simprrl 786 |
. . . . . . 7
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷)) |
| 15 | | brab2dd.3 |
. . . . . . . 8
⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ↔ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉))) |
| 16 | 15 | biimpa 477 |
. . . . . . 7
⊢ (((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) ∧ (𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 17 | 7, 13, 14, 16 | syl21anc 843 |
. . . . . 6
⊢ ((𝜑 ∧ (〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 18 | 17 | ex 413 |
. . . . 5
⊢ (𝜑 → ((〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉))) |
| 19 | 18 | exlimdvv 1941 |
. . . 4
⊢ (𝜑 → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉))) |
| 20 | 19 | imp 407 |
. . 3
⊢ ((𝜑 ∧ ∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓))) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 21 | | simprl 776 |
. . 3
⊢ ((𝜑 ∧ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒)) → (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) |
| 22 | | simprl 776 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) → 𝐴 ∈ 𝑈) |
| 23 | | simprr 778 |
. . . 4
⊢ ((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) → 𝐵 ∈ 𝑉) |
| 24 | | brab2dd.2 |
. . . . . 6
⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → (𝜓 ↔ 𝜒)) |
| 25 | 15, 24 | anbi12d 638 |
. . . . 5
⊢ ((𝜑 ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → (((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 26 | 25 | adantlr 721 |
. . . 4
⊢ (((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) ∧ (𝑥 = 𝐴 ∧ 𝑦 = 𝐵)) → (((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 27 | 22, 23, 26 | copsex2dv 5442 |
. . 3
⊢ ((𝜑 ∧ (𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉)) → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 28 | 20, 21, 27 | bibiad 845 |
. 2
⊢ (𝜑 → (∃𝑥∃𝑦(〈𝐴, 𝐵〉 = 〈𝑥, 𝑦〉 ∧ ((𝑥 ∈ 𝐶 ∧ 𝑦 ∈ 𝐷) ∧ 𝜓)) ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |
| 29 | 6, 28 | bitrd 280 |
1
⊢ (𝜑 → (𝐴𝑅𝐵 ↔ ((𝐴 ∈ 𝑈 ∧ 𝐵 ∈ 𝑉) ∧ 𝜒))) |