Metamath Proof Explorer


Theorem cdleme35b

Description: Part of proof of Lemma E in Crawley p. 113. TODO: FIX COMMENT. (Contributed by NM, 10-Mar-2013)

Ref Expression
Hypotheses cdleme35.l ˙ = K
cdleme35.j ˙ = join K
cdleme35.m ˙ = meet K
cdleme35.a A = Atoms K
cdleme35.h H = LHyp K
cdleme35.u U = P ˙ Q ˙ W
cdleme35.f F = R ˙ U ˙ Q ˙ P ˙ R ˙ W
Assertion cdleme35b K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ P ˙ R ˙ W ˙ Q ˙ R ˙ U

Proof

Step Hyp Ref Expression
1 cdleme35.l ˙ = K
2 cdleme35.j ˙ = join K
3 cdleme35.m ˙ = meet K
4 cdleme35.a A = Atoms K
5 cdleme35.h H = LHyp K
6 cdleme35.u U = P ˙ Q ˙ W
7 cdleme35.f F = R ˙ U ˙ Q ˙ P ˙ R ˙ W
8 simp11l K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q K HL
9 8 hllatd K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q K Lat
10 simp13l K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q A
11 eqid Base K = Base K
12 11 4 atbase Q A Q Base K
13 10 12 syl K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q Base K
14 simp2rl K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q R A
15 simp11 K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q K HL W H
16 simp12 K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P A ¬ P ˙ W
17 simp2l K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P Q
18 1 2 3 4 5 6 cdleme0a K HL W H P A ¬ P ˙ W Q A P Q U A
19 15 16 10 17 18 syl112anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q U A
20 11 2 4 hlatjcl K HL R A U A R ˙ U Base K
21 8 14 19 20 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q R ˙ U Base K
22 11 1 2 latlej1 K Lat Q Base K R ˙ U Base K Q ˙ Q ˙ R ˙ U
23 9 13 21 22 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ Q ˙ R ˙ U
24 simp12l K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P A
25 11 4 atbase P A P Base K
26 24 25 syl K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P Base K
27 11 4 atbase R A R Base K
28 14 27 syl K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q R Base K
29 11 2 latjcl K Lat P Base K R Base K P ˙ R Base K
30 9 26 28 29 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R Base K
31 simp11r K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q W H
32 11 5 lhpbase W H W Base K
33 31 32 syl K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q W Base K
34 11 3 latmcl K Lat P ˙ R Base K W Base K P ˙ R ˙ W Base K
35 9 30 33 34 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ W Base K
36 11 2 latjcl K Lat P ˙ R Base K Q Base K P ˙ R ˙ Q Base K
37 9 30 13 36 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ Q Base K
38 11 1 3 latmle1 K Lat P ˙ R Base K W Base K P ˙ R ˙ W ˙ P ˙ R
39 9 30 33 38 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ W ˙ P ˙ R
40 11 1 2 latlej1 K Lat P ˙ R Base K Q Base K P ˙ R ˙ P ˙ R ˙ Q
41 9 30 13 40 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ P ˙ R ˙ Q
42 11 1 9 35 30 37 39 41 lattrd K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ W ˙ P ˙ R ˙ Q
43 6 oveq2i Q ˙ U = Q ˙ P ˙ Q ˙ W
44 11 2 4 hlatjcl K HL P A Q A P ˙ Q Base K
45 8 24 10 44 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ Q Base K
46 1 2 4 hlatlej2 K HL P A Q A Q ˙ P ˙ Q
47 8 24 10 46 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ P ˙ Q
48 11 1 2 3 4 atmod3i1 K HL Q A P ˙ Q Base K W Base K Q ˙ P ˙ Q Q ˙ P ˙ Q ˙ W = P ˙ Q ˙ Q ˙ W
49 8 10 45 33 47 48 syl131anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ P ˙ Q ˙ W = P ˙ Q ˙ Q ˙ W
50 simp13 K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q A ¬ Q ˙ W
51 eqid 1. K = 1. K
52 1 2 51 4 5 lhpjat2 K HL W H Q A ¬ Q ˙ W Q ˙ W = 1. K
53 15 50 52 syl2anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ W = 1. K
54 53 oveq2d K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ Q ˙ Q ˙ W = P ˙ Q ˙ 1. K
55 hlol K HL K OL
56 8 55 syl K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q K OL
57 11 3 51 olm11 K OL P ˙ Q Base K P ˙ Q ˙ 1. K = P ˙ Q
58 56 45 57 syl2anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ Q ˙ 1. K = P ˙ Q
59 49 54 58 3eqtrd K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ P ˙ Q ˙ W = P ˙ Q
60 43 59 eqtrid K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ U = P ˙ Q
61 60 oveq2d K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q R ˙ Q ˙ U = R ˙ P ˙ Q
62 2 4 hlatj12 K HL Q A R A U A Q ˙ R ˙ U = R ˙ Q ˙ U
63 8 10 14 19 62 syl13anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ R ˙ U = R ˙ Q ˙ U
64 2 4 hlatjcom K HL P A R A P ˙ R = R ˙ P
65 8 24 14 64 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R = R ˙ P
66 65 oveq1d K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ Q = R ˙ P ˙ Q
67 2 4 hlatjass K HL R A P A Q A R ˙ P ˙ Q = R ˙ P ˙ Q
68 8 14 24 10 67 syl13anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q R ˙ P ˙ Q = R ˙ P ˙ Q
69 66 68 eqtrd K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ Q = R ˙ P ˙ Q
70 61 63 69 3eqtr4rd K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ Q = Q ˙ R ˙ U
71 42 70 breqtrd K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q P ˙ R ˙ W ˙ Q ˙ R ˙ U
72 11 2 latjcl K Lat Q Base K R ˙ U Base K Q ˙ R ˙ U Base K
73 9 13 21 72 syl3anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ R ˙ U Base K
74 11 1 2 latjle12 K Lat Q Base K P ˙ R ˙ W Base K Q ˙ R ˙ U Base K Q ˙ Q ˙ R ˙ U P ˙ R ˙ W ˙ Q ˙ R ˙ U Q ˙ P ˙ R ˙ W ˙ Q ˙ R ˙ U
75 9 13 35 73 74 syl13anc K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ Q ˙ R ˙ U P ˙ R ˙ W ˙ Q ˙ R ˙ U Q ˙ P ˙ R ˙ W ˙ Q ˙ R ˙ U
76 23 71 75 mpbi2and K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W ¬ R ˙ P ˙ Q Q ˙ P ˙ R ˙ W ˙ Q ˙ R ˙ U