Metamath Proof Explorer


Theorem lhpmcvr4N

Description: Specialization of lhpmcvr2 . (Contributed by NM, 6-Apr-2014) (New usage is discouraged.)

Ref Expression
Hypotheses lhpmcvr2.b B = Base K
lhpmcvr2.l ˙ = K
lhpmcvr2.j ˙ = join K
lhpmcvr2.m ˙ = meet K
lhpmcvr2.a A = Atoms K
lhpmcvr2.h H = LHyp K
Assertion lhpmcvr4N K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X ¬ P ˙ Y

Proof

Step Hyp Ref Expression
1 lhpmcvr2.b B = Base K
2 lhpmcvr2.l ˙ = K
3 lhpmcvr2.j ˙ = join K
4 lhpmcvr2.m ˙ = meet K
5 lhpmcvr2.a A = Atoms K
6 lhpmcvr2.h H = LHyp K
7 simp2rr K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X ¬ P ˙ W
8 simp33 K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ X
9 simp1l K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X K HL
10 9 hllatd K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X K Lat
11 simp2rl K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P A
12 1 5 atbase P A P B
13 11 12 syl K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P B
14 simp2ll K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X X B
15 simp31 K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X Y B
16 1 2 4 latlem12 K Lat P B X B Y B P ˙ X P ˙ Y P ˙ X ˙ Y
17 10 13 14 15 16 syl13anc K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ X P ˙ Y P ˙ X ˙ Y
18 17 biimpd K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ X P ˙ Y P ˙ X ˙ Y
19 8 18 mpand K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ Y P ˙ X ˙ Y
20 simp32 K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X X ˙ Y ˙ W
21 1 4 latmcl K Lat X B Y B X ˙ Y B
22 10 14 15 21 syl3anc K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X X ˙ Y B
23 simp1r K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X W H
24 1 6 lhpbase W H W B
25 23 24 syl K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X W B
26 1 2 lattr K Lat P B X ˙ Y B W B P ˙ X ˙ Y X ˙ Y ˙ W P ˙ W
27 10 13 22 25 26 syl13anc K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ X ˙ Y X ˙ Y ˙ W P ˙ W
28 20 27 mpan2d K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ X ˙ Y P ˙ W
29 19 28 syld K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X P ˙ Y P ˙ W
30 7 29 mtod K HL W H X B ¬ X ˙ W P A ¬ P ˙ W Y B X ˙ Y ˙ W P ˙ X ¬ P ˙ Y