Metamath Proof Explorer


Theorem pmodlem1

Description: Lemma for pmod1i . (Contributed by NM, 9-Mar-2012)

Ref Expression
Hypotheses pmodlem.l ˙ = K
pmodlem.j ˙ = join K
pmodlem.a A = Atoms K
pmodlem.s S = PSubSp K
pmodlem.p + ˙ = + 𝑃 K
Assertion pmodlem1 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p X + ˙ Y Z

Proof

Step Hyp Ref Expression
1 pmodlem.l ˙ = K
2 pmodlem.j ˙ = join K
3 pmodlem.a A = Atoms K
4 pmodlem.s S = PSubSp K
5 pmodlem.p + ˙ = + 𝑃 K
6 simpl11 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q K HL
7 simpl12 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q X A
8 simpl13 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q Y A
9 ssinss1 Y A Y Z A
10 8 9 syl K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q Y Z A
11 3 5 sspadd1 K HL X A Y Z A X X + ˙ Y Z
12 6 7 10 11 syl3anc K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q X X + ˙ Y Z
13 simpr K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q p = q
14 simpl31 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q q X
15 13 14 eqeltrd K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q p X
16 12 15 sseldd K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p = q p X + ˙ Y Z
17 simpl11 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q K HL
18 17 hllatd K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q K Lat
19 simpl12 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q X A
20 simpl13 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q Y A
21 20 9 syl K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q Y Z A
22 simpl31 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q q X
23 simpl32 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q r Y
24 simpl21 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q Z S
25 simpl22 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q X Z
26 simpl23 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q p Z
27 3 4 psubssat K HL Z S Z A
28 17 24 27 syl2anc K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q Z A
29 28 26 sseldd K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q p A
30 20 23 sseldd K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q r A
31 19 22 sseldd K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q q A
32 29 30 31 3jca K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q p A r A q A
33 simpr K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q p q
34 simpl33 K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q p ˙ q ˙ r
35 1 2 3 hlatexch1 K HL p A r A q A p q p ˙ q ˙ r r ˙ q ˙ p
36 35 imp K HL p A r A q A p q p ˙ q ˙ r r ˙ q ˙ p
37 17 32 33 34 36 syl31anc K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q r ˙ q ˙ p
38 simp31 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q X
39 38 snssd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q X
40 simp22 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p X Z
41 39 40 sstrd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q Z
42 simp23 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p p Z
43 42 snssd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p p Z
44 simp11 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p K HL
45 simp12 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p X A
46 45 38 sseldd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q A
47 46 snssd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q A
48 simp21 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p Z S
49 44 48 27 syl2anc K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p Z A
50 49 42 sseldd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p p A
51 50 snssd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p p A
52 3 4 5 paddss K HL q A p A Z S q Z p Z q + ˙ p Z
53 44 47 51 48 52 syl13anc K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q Z p Z q + ˙ p Z
54 41 43 53 mpbi2and K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p q + ˙ p Z
55 simp33 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p r ˙ q ˙ p
56 44 hllatd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p K Lat
57 simp13 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p Y A
58 simp32 K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p r Y
59 57 58 sseldd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p r A
60 1 2 3 5 elpadd2at2 K Lat q A p A r A r q + ˙ p r ˙ q ˙ p
61 56 46 50 59 60 syl13anc K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p r q + ˙ p r ˙ q ˙ p
62 55 61 mpbird K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p r q + ˙ p
63 54 62 sseldd K HL X A Y A Z S X Z p Z q X r Y r ˙ q ˙ p r Z
64 17 19 20 24 25 26 22 23 37 63 syl333anc K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q r Z
65 23 64 elind K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q r Y Z
66 1 2 3 5 elpaddri K Lat X A Y Z A q X r Y Z p A p ˙ q ˙ r p X + ˙ Y Z
67 18 19 21 22 65 29 34 66 syl322anc K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p q p X + ˙ Y Z
68 16 67 pm2.61dane K HL X A Y A Z S X Z p Z q X r Y p ˙ q ˙ r p X + ˙ Y Z