Step | Hyp | Ref
| Expression |
1 | | ecxrn 36444 |
. . . . . . 7
⊢ (𝐴 ∈ 𝑉 → [𝐴](𝑅 ⋉ 𝑆) = {〈𝑥, 𝑦〉 ∣ (𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦)}) |
2 | | ecxrn 36444 |
. . . . . . 7
⊢ (𝐵 ∈ 𝑊 → [𝐵](𝑅 ⋉ 𝑆) = {〈𝑥, 𝑦〉 ∣ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦)}) |
3 | 1, 2 | ineqan12d 4145 |
. . . . . 6
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ([𝐴](𝑅 ⋉ 𝑆) ∩ [𝐵](𝑅 ⋉ 𝑆)) = ({〈𝑥, 𝑦〉 ∣ (𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦)} ∩ {〈𝑥, 𝑦〉 ∣ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦)})) |
4 | | inopab 5728 |
. . . . . 6
⊢
({〈𝑥, 𝑦〉 ∣ (𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦)} ∩ {〈𝑥, 𝑦〉 ∣ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦)}) = {〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦) ∧ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦))} |
5 | 3, 4 | eqtrdi 2795 |
. . . . 5
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ([𝐴](𝑅 ⋉ 𝑆) ∩ [𝐵](𝑅 ⋉ 𝑆)) = {〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦) ∧ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦))}) |
6 | | an4 652 |
. . . . . 6
⊢ (((𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦) ∧ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦)) ↔ ((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))) |
7 | 6 | opabbii 5137 |
. . . . 5
⊢
{〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐴𝑆𝑦) ∧ (𝐵𝑅𝑥 ∧ 𝐵𝑆𝑦))} = {〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))} |
8 | 5, 7 | eqtrdi 2795 |
. . . 4
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ([𝐴](𝑅 ⋉ 𝑆) ∩ [𝐵](𝑅 ⋉ 𝑆)) = {〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))}) |
9 | 8 | neeq1d 3002 |
. . 3
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (([𝐴](𝑅 ⋉ 𝑆) ∩ [𝐵](𝑅 ⋉ 𝑆)) ≠ ∅ ↔ {〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))} ≠ ∅)) |
10 | | opabn0 5459 |
. . . 4
⊢
({〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))} ≠ ∅ ↔ ∃𝑥∃𝑦((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))) |
11 | | exdistrv 1960 |
. . . 4
⊢
(∃𝑥∃𝑦((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦)) ↔ (∃𝑥(𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ ∃𝑦(𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))) |
12 | 10, 11 | bitri 274 |
. . 3
⊢
({〈𝑥, 𝑦〉 ∣ ((𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ (𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))} ≠ ∅ ↔ (∃𝑥(𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ ∃𝑦(𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))) |
13 | 9, 12 | bitrdi 286 |
. 2
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (([𝐴](𝑅 ⋉ 𝑆) ∩ [𝐵](𝑅 ⋉ 𝑆)) ≠ ∅ ↔ (∃𝑥(𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ ∃𝑦(𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦)))) |
14 | | brcosscnv2 36518 |
. 2
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (𝐴 ≀ ◡(𝑅 ⋉ 𝑆)𝐵 ↔ ([𝐴](𝑅 ⋉ 𝑆) ∩ [𝐵](𝑅 ⋉ 𝑆)) ≠ ∅)) |
15 | | brcosscnv 36517 |
. . 3
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (𝐴 ≀ ◡𝑅𝐵 ↔ ∃𝑥(𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥))) |
16 | | brcosscnv 36517 |
. . 3
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (𝐴 ≀ ◡𝑆𝐵 ↔ ∃𝑦(𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦))) |
17 | 15, 16 | anbi12d 630 |
. 2
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ((𝐴 ≀ ◡𝑅𝐵 ∧ 𝐴 ≀ ◡𝑆𝐵) ↔ (∃𝑥(𝐴𝑅𝑥 ∧ 𝐵𝑅𝑥) ∧ ∃𝑦(𝐴𝑆𝑦 ∧ 𝐵𝑆𝑦)))) |
18 | 13, 14, 17 | 3bitr4d 310 |
1
⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → (𝐴 ≀ ◡(𝑅 ⋉ 𝑆)𝐵 ↔ (𝐴 ≀ ◡𝑅𝐵 ∧ 𝐴 ≀ ◡𝑆𝐵))) |