Metamath Proof Explorer


Theorem cvrval4N

Description: Binary relation expressing Y covers X . (Contributed by NM, 16-Jun-2012) (New usage is discouraged.)

Ref Expression
Hypotheses cvrval4.b B = Base K
cvrval4.s < ˙ = < K
cvrval4.j ˙ = join K
cvrval4.c C = K
cvrval4.a A = Atoms K
Assertion cvrval4N K HL X B Y B X C Y X < ˙ Y p A X ˙ p = Y

Proof

Step Hyp Ref Expression
1 cvrval4.b B = Base K
2 cvrval4.s < ˙ = < K
3 cvrval4.j ˙ = join K
4 cvrval4.c C = K
5 cvrval4.a A = Atoms K
6 1 2 4 cvrlt K HL X B Y B X C Y X < ˙ Y
7 eqid K = K
8 1 7 3 4 5 cvrval3 K HL X B Y B X C Y p A ¬ p K X X ˙ p = Y
9 simpr ¬ p K X X ˙ p = Y X ˙ p = Y
10 9 reximi p A ¬ p K X X ˙ p = Y p A X ˙ p = Y
11 8 10 syl6bi K HL X B Y B X C Y p A X ˙ p = Y
12 11 imp K HL X B Y B X C Y p A X ˙ p = Y
13 6 12 jca K HL X B Y B X C Y X < ˙ Y p A X ˙ p = Y
14 13 ex K HL X B Y B X C Y X < ˙ Y p A X ˙ p = Y
15 simp1r K HL X B Y B X < ˙ Y p A X ˙ p = Y X < ˙ Y
16 simp3 K HL X B Y B X < ˙ Y p A X ˙ p = Y X ˙ p = Y
17 15 16 breqtrrd K HL X B Y B X < ˙ Y p A X ˙ p = Y X < ˙ X ˙ p
18 simp1l1 K HL X B Y B X < ˙ Y p A X ˙ p = Y K HL
19 simp1l2 K HL X B Y B X < ˙ Y p A X ˙ p = Y X B
20 simp2 K HL X B Y B X < ˙ Y p A X ˙ p = Y p A
21 1 7 3 4 5 cvr1 K HL X B p A ¬ p K X X C X ˙ p
22 18 19 20 21 syl3anc K HL X B Y B X < ˙ Y p A X ˙ p = Y ¬ p K X X C X ˙ p
23 1 2 3 4 5 cvr2N K HL X B p A X < ˙ X ˙ p X C X ˙ p
24 18 19 20 23 syl3anc K HL X B Y B X < ˙ Y p A X ˙ p = Y X < ˙ X ˙ p X C X ˙ p
25 22 24 bitr4d K HL X B Y B X < ˙ Y p A X ˙ p = Y ¬ p K X X < ˙ X ˙ p
26 17 25 mpbird K HL X B Y B X < ˙ Y p A X ˙ p = Y ¬ p K X
27 26 16 jca K HL X B Y B X < ˙ Y p A X ˙ p = Y ¬ p K X X ˙ p = Y
28 27 3exp K HL X B Y B X < ˙ Y p A X ˙ p = Y ¬ p K X X ˙ p = Y
29 28 reximdvai K HL X B Y B X < ˙ Y p A X ˙ p = Y p A ¬ p K X X ˙ p = Y
30 29 expimpd K HL X B Y B X < ˙ Y p A X ˙ p = Y p A ¬ p K X X ˙ p = Y
31 30 8 sylibrd K HL X B Y B X < ˙ Y p A X ˙ p = Y X C Y
32 14 31 impbid K HL X B Y B X C Y X < ˙ Y p A X ˙ p = Y