Metamath Proof Explorer


Theorem paddasslem16

Description: Lemma for paddass . Use elpaddn0 to eliminate x and r from paddasslem15 . (Contributed by NM, 11-Jan-2012)

Ref Expression
Hypotheses paddasslem.l ˙ = K
paddasslem.j ˙ = join K
paddasslem.a A = Atoms K
paddasslem.p + ˙ = + 𝑃 K
Assertion paddasslem16 K HL X A Y A Z A X Y + ˙ Z Y Z X + ˙ Y + ˙ Z X + ˙ Y + ˙ Z

Proof

Step Hyp Ref Expression
1 paddasslem.l ˙ = K
2 paddasslem.j ˙ = join K
3 paddasslem.a A = Atoms K
4 paddasslem.p + ˙ = + 𝑃 K
5 hllat K HL K Lat
6 5 3ad2ant1 K HL X A Y A Z A X Y + ˙ Z Y Z K Lat
7 simp21 K HL X A Y A Z A X Y + ˙ Z Y Z X A
8 simp1 K HL X A Y A Z A X Y + ˙ Z Y Z K HL
9 simp22 K HL X A Y A Z A X Y + ˙ Z Y Z Y A
10 simp23 K HL X A Y A Z A X Y + ˙ Z Y Z Z A
11 3 4 paddssat K HL Y A Z A Y + ˙ Z A
12 8 9 10 11 syl3anc K HL X A Y A Z A X Y + ˙ Z Y Z Y + ˙ Z A
13 simp3l K HL X A Y A Z A X Y + ˙ Z Y Z X Y + ˙ Z
14 1 2 3 4 elpaddn0 K Lat X A Y + ˙ Z A X Y + ˙ Z p X + ˙ Y + ˙ Z p A x X r Y + ˙ Z p ˙ x ˙ r
15 6 7 12 13 14 syl31anc K HL X A Y A Z A X Y + ˙ Z Y Z p X + ˙ Y + ˙ Z p A x X r Y + ˙ Z p ˙ x ˙ r
16 simpr X Y + ˙ Z Y Z Y Z
17 1 2 3 4 paddasslem15 K HL X A Y A Z A Y Z p A x X r Y + ˙ Z p ˙ x ˙ r p X + ˙ Y + ˙ Z
18 16 17 syl3anl3 K HL X A Y A Z A X Y + ˙ Z Y Z p A x X r Y + ˙ Z p ˙ x ˙ r p X + ˙ Y + ˙ Z
19 18 3exp2 K HL X A Y A Z A X Y + ˙ Z Y Z p A x X r Y + ˙ Z p ˙ x ˙ r p X + ˙ Y + ˙ Z
20 19 imp K HL X A Y A Z A X Y + ˙ Z Y Z p A x X r Y + ˙ Z p ˙ x ˙ r p X + ˙ Y + ˙ Z
21 20 rexlimdvv K HL X A Y A Z A X Y + ˙ Z Y Z p A x X r Y + ˙ Z p ˙ x ˙ r p X + ˙ Y + ˙ Z
22 21 expimpd K HL X A Y A Z A X Y + ˙ Z Y Z p A x X r Y + ˙ Z p ˙ x ˙ r p X + ˙ Y + ˙ Z
23 15 22 sylbid K HL X A Y A Z A X Y + ˙ Z Y Z p X + ˙ Y + ˙ Z p X + ˙ Y + ˙ Z
24 23 ssrdv K HL X A Y A Z A X Y + ˙ Z Y Z X + ˙ Y + ˙ Z X + ˙ Y + ˙ Z