Metamath Proof Explorer


Theorem catprslem

Description: Lemma for catprs . (Contributed by Zhi Wang, 18-Sep-2024)

Ref Expression
Hypotheses catprs.1 ⊢ φ → ∀ x ∈ B ∀ y ∈ B x ≤ ˙ y ↔ x H y ≠ ∅
catprslem.x ⊢ φ → X ∈ B
catprslem.y ⊢ φ → Y ∈ B
Assertion catprslem ⊢ φ → X ≤ ˙ Y ↔ X H Y ≠ ∅

Proof

Step Hyp Ref Expression
1 catprs.1 ⊢ φ → ∀ x ∈ B ∀ y ∈ B x ≤ ˙ y ↔ x H y ≠ ∅
2 catprslem.x ⊢ φ → X ∈ B
3 catprslem.y ⊢ φ → Y ∈ B
4 breq1 ⊢ x = z → x ≤ ˙ y ↔ z ≤ ˙ y
5 oveq1 ⊢ x = z → x H y = z H y
6 5 neeq1d ⊢ x = z → x H y ≠ ∅ ↔ z H y ≠ ∅
7 4 6 bibi12d ⊢ x = z → x ≤ ˙ y ↔ x H y ≠ ∅ ↔ z ≤ ˙ y ↔ z H y ≠ ∅
8 breq2 ⊢ y = w → z ≤ ˙ y ↔ z ≤ ˙ w
9 oveq2 ⊢ y = w → z H y = z H w
10 9 neeq1d ⊢ y = w → z H y ≠ ∅ ↔ z H w ≠ ∅
11 8 10 bibi12d ⊢ y = w → z ≤ ˙ y ↔ z H y ≠ ∅ ↔ z ≤ ˙ w ↔ z H w ≠ ∅
12 7 11 cbvral2vw ⊢ ∀ x ∈ B ∀ y ∈ B x ≤ ˙ y ↔ x H y ≠ ∅ ↔ ∀ z ∈ B ∀ w ∈ B z ≤ ˙ w ↔ z H w ≠ ∅
13 1 12 sylib ⊢ φ → ∀ z ∈ B ∀ w ∈ B z ≤ ˙ w ↔ z H w ≠ ∅
14 breq12 ⊢ z = X ∧ w = Y → z ≤ ˙ w ↔ X ≤ ˙ Y
15 oveq12 ⊢ z = X ∧ w = Y → z H w = X H Y
16 15 neeq1d ⊢ z = X ∧ w = Y → z H w ≠ ∅ ↔ X H Y ≠ ∅
17 14 16 bibi12d ⊢ z = X ∧ w = Y → z ≤ ˙ w ↔ z H w ≠ ∅ ↔ X ≤ ˙ Y ↔ X H Y ≠ ∅
18 17 rspc2gv ⊢ X ∈ B ∧ Y ∈ B → ∀ z ∈ B ∀ w ∈ B z ≤ ˙ w ↔ z H w ≠ ∅ → X ≤ ˙ Y ↔ X H Y ≠ ∅
19 2 3 18 syl2anc ⊢ φ → ∀ z ∈ B ∀ w ∈ B z ≤ ˙ w ↔ z H w ≠ ∅ → X ≤ ˙ Y ↔ X H Y ≠ ∅
20 13 19 mpd ⊢ φ → X ≤ ˙ Y ↔ X H Y ≠ ∅