Metamath Proof Explorer


Theorem pexmidlem2N

Description: Lemma for pexmidN . (Contributed by NM, 2-Feb-2012) (New usage is discouraged.)

Ref Expression
Hypotheses pexmidlem.l ˙=K
pexmidlem.j ˙=joinK
pexmidlem.a A=AtomsK
pexmidlem.p +˙=+𝑃K
pexmidlem.o ˙=𝑃K
pexmidlem.m M=X+˙p
Assertion pexmidlem2N KHLXApArXq˙Xp˙r˙qpX+˙˙X

Proof

Step Hyp Ref Expression
1 pexmidlem.l ˙=K
2 pexmidlem.j ˙=joinK
3 pexmidlem.a A=AtomsK
4 pexmidlem.p +˙=+𝑃K
5 pexmidlem.o ˙=𝑃K
6 pexmidlem.m M=X+˙p
7 simpl1 KHLXApArXq˙Xp˙r˙qKHL
8 7 hllatd KHLXApArXq˙Xp˙r˙qKLat
9 simpl2 KHLXApArXq˙Xp˙r˙qXA
10 3 5 polssatN KHLXA˙XA
11 7 9 10 syl2anc KHLXApArXq˙Xp˙r˙q˙XA
12 simpr1 KHLXApArXq˙Xp˙r˙qrX
13 simpr2 KHLXApArXq˙Xp˙r˙qq˙X
14 simpl3 KHLXApArXq˙Xp˙r˙qpA
15 simpr3 KHLXApArXq˙Xp˙r˙qp˙r˙q
16 1 2 3 4 elpaddri KLatXA˙XArXq˙XpAp˙r˙qpX+˙˙X
17 8 9 11 12 13 14 15 16 syl322anc KHLXApArXq˙Xp˙r˙qpX+˙˙X