Metamath Proof Explorer


Theorem lhpat2

Description: Create an atom under a co-atom. Part of proof of Lemma B in Crawley p. 112. (Contributed by NM, 21-Nov-2012)

Ref Expression
Hypotheses lhpat.l ˙=K
lhpat.j ˙=joinK
lhpat.m ˙=meetK
lhpat.a A=AtomsK
lhpat.h H=LHypK
lhpat2.r R=P˙Q˙W
Assertion lhpat2 KHLWHPA¬P˙WQAPQRA

Proof

Step Hyp Ref Expression
1 lhpat.l ˙=K
2 lhpat.j ˙=joinK
3 lhpat.m ˙=meetK
4 lhpat.a A=AtomsK
5 lhpat.h H=LHypK
6 lhpat2.r R=P˙Q˙W
7 1 2 3 4 5 lhpat KHLWHPA¬P˙WQAPQP˙Q˙WA
8 6 7 eqeltrid KHLWHPA¬P˙WQAPQRA