Metamath Proof Explorer


Theorem pmodlem1

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

Ref Expression
Hypotheses pmodlem.l ˙=K
pmodlem.j ˙=joinK
pmodlem.a A=AtomsK
pmodlem.s S=PSubSpK
pmodlem.p +˙=+𝑃K
Assertion pmodlem1 KHLXAYAZSXZpZqXrYp˙q˙rpX+˙YZ

Proof

Step Hyp Ref Expression
1 pmodlem.l ˙=K
2 pmodlem.j ˙=joinK
3 pmodlem.a A=AtomsK
4 pmodlem.s S=PSubSpK
5 pmodlem.p +˙=+𝑃K
6 simpl11 KHLXAYAZSXZpZqXrYp˙q˙rp=qKHL
7 simpl12 KHLXAYAZSXZpZqXrYp˙q˙rp=qXA
8 simpl13 KHLXAYAZSXZpZqXrYp˙q˙rp=qYA
9 ssinss1 YAYZA
10 8 9 syl KHLXAYAZSXZpZqXrYp˙q˙rp=qYZA
11 3 5 sspadd1 KHLXAYZAXX+˙YZ
12 6 7 10 11 syl3anc KHLXAYAZSXZpZqXrYp˙q˙rp=qXX+˙YZ
13 simpr KHLXAYAZSXZpZqXrYp˙q˙rp=qp=q
14 simpl31 KHLXAYAZSXZpZqXrYp˙q˙rp=qqX
15 13 14 eqeltrd KHLXAYAZSXZpZqXrYp˙q˙rp=qpX
16 12 15 sseldd KHLXAYAZSXZpZqXrYp˙q˙rp=qpX+˙YZ
17 simpl11 KHLXAYAZSXZpZqXrYp˙q˙rpqKHL
18 17 hllatd KHLXAYAZSXZpZqXrYp˙q˙rpqKLat
19 simpl12 KHLXAYAZSXZpZqXrYp˙q˙rpqXA
20 simpl13 KHLXAYAZSXZpZqXrYp˙q˙rpqYA
21 20 9 syl KHLXAYAZSXZpZqXrYp˙q˙rpqYZA
22 simpl31 KHLXAYAZSXZpZqXrYp˙q˙rpqqX
23 simpl32 KHLXAYAZSXZpZqXrYp˙q˙rpqrY
24 simpl21 KHLXAYAZSXZpZqXrYp˙q˙rpqZS
25 simpl22 KHLXAYAZSXZpZqXrYp˙q˙rpqXZ
26 simpl23 KHLXAYAZSXZpZqXrYp˙q˙rpqpZ
27 3 4 psubssat KHLZSZA
28 17 24 27 syl2anc KHLXAYAZSXZpZqXrYp˙q˙rpqZA
29 28 26 sseldd KHLXAYAZSXZpZqXrYp˙q˙rpqpA
30 20 23 sseldd KHLXAYAZSXZpZqXrYp˙q˙rpqrA
31 19 22 sseldd KHLXAYAZSXZpZqXrYp˙q˙rpqqA
32 29 30 31 3jca KHLXAYAZSXZpZqXrYp˙q˙rpqpArAqA
33 simpr KHLXAYAZSXZpZqXrYp˙q˙rpqpq
34 simpl33 KHLXAYAZSXZpZqXrYp˙q˙rpqp˙q˙r
35 1 2 3 hlatexch1 KHLpArAqApqp˙q˙rr˙q˙p
36 35 imp KHLpArAqApqp˙q˙rr˙q˙p
37 17 32 33 34 36 syl31anc KHLXAYAZSXZpZqXrYp˙q˙rpqr˙q˙p
38 simp31 KHLXAYAZSXZpZqXrYr˙q˙pqX
39 38 snssd KHLXAYAZSXZpZqXrYr˙q˙pqX
40 simp22 KHLXAYAZSXZpZqXrYr˙q˙pXZ
41 39 40 sstrd KHLXAYAZSXZpZqXrYr˙q˙pqZ
42 simp23 KHLXAYAZSXZpZqXrYr˙q˙ppZ
43 42 snssd KHLXAYAZSXZpZqXrYr˙q˙ppZ
44 simp11 KHLXAYAZSXZpZqXrYr˙q˙pKHL
45 simp12 KHLXAYAZSXZpZqXrYr˙q˙pXA
46 45 38 sseldd KHLXAYAZSXZpZqXrYr˙q˙pqA
47 46 snssd KHLXAYAZSXZpZqXrYr˙q˙pqA
48 simp21 KHLXAYAZSXZpZqXrYr˙q˙pZS
49 44 48 27 syl2anc KHLXAYAZSXZpZqXrYr˙q˙pZA
50 49 42 sseldd KHLXAYAZSXZpZqXrYr˙q˙ppA
51 50 snssd KHLXAYAZSXZpZqXrYr˙q˙ppA
52 3 4 5 paddss KHLqApAZSqZpZq+˙pZ
53 44 47 51 48 52 syl13anc KHLXAYAZSXZpZqXrYr˙q˙pqZpZq+˙pZ
54 41 43 53 mpbi2and KHLXAYAZSXZpZqXrYr˙q˙pq+˙pZ
55 simp33 KHLXAYAZSXZpZqXrYr˙q˙pr˙q˙p
56 44 hllatd KHLXAYAZSXZpZqXrYr˙q˙pKLat
57 simp13 KHLXAYAZSXZpZqXrYr˙q˙pYA
58 simp32 KHLXAYAZSXZpZqXrYr˙q˙prY
59 57 58 sseldd KHLXAYAZSXZpZqXrYr˙q˙prA
60 1 2 3 5 elpadd2at2 KLatqApArArq+˙pr˙q˙p
61 56 46 50 59 60 syl13anc KHLXAYAZSXZpZqXrYr˙q˙prq+˙pr˙q˙p
62 55 61 mpbird KHLXAYAZSXZpZqXrYr˙q˙prq+˙p
63 54 62 sseldd KHLXAYAZSXZpZqXrYr˙q˙prZ
64 17 19 20 24 25 26 22 23 37 63 syl333anc KHLXAYAZSXZpZqXrYp˙q˙rpqrZ
65 23 64 elind KHLXAYAZSXZpZqXrYp˙q˙rpqrYZ
66 1 2 3 5 elpaddri KLatXAYZAqXrYZpAp˙q˙rpX+˙YZ
67 18 19 21 22 65 29 34 66 syl322anc KHLXAYAZSXZpZqXrYp˙q˙rpqpX+˙YZ
68 16 67 pm2.61dane KHLXAYAZSXZpZqXrYp˙q˙rpX+˙YZ