Metamath Proof Explorer


Theorem cdleme11c

Description: Part of proof of Lemma E in Crawley p. 113. Lemma leading to cdleme11 . (Contributed by NM, 13-Jun-2012)

Ref Expression
Hypotheses cdleme11.l ˙ = K
cdleme11.j ˙ = join K
cdleme11.m ˙ = meet K
cdleme11.a A = Atoms K
cdleme11.h H = LHyp K
cdleme11.u U = P ˙ Q ˙ W
Assertion cdleme11c K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T ¬ P ˙ S ˙ T

Proof

Step Hyp Ref Expression
1 cdleme11.l ˙ = K
2 cdleme11.j ˙ = join K
3 cdleme11.m ˙ = meet K
4 cdleme11.a A = Atoms K
5 cdleme11.h H = LHyp K
6 cdleme11.u U = P ˙ Q ˙ W
7 simp3l K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T ¬ S ˙ P ˙ Q
8 simp11l K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T K HL
9 simp12l K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P A
10 simp11 K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T K HL W H
11 simp12 K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P A ¬ P ˙ W
12 simp13 K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T Q A
13 simp23 K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P Q
14 1 2 3 4 5 6 lhpat2 K HL W H P A ¬ P ˙ W Q A P Q U A
15 10 11 12 13 14 syl112anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T U A
16 1 2 4 hlatlej1 K HL P A U A P ˙ P ˙ U
17 8 9 15 16 syl3anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ P ˙ U
18 17 adantr K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T P ˙ P ˙ U
19 12 13 jca K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T Q A P Q
20 simp21 K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S A ¬ S ˙ W
21 simp22 K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T T A
22 simp3r K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T U ˙ S ˙ T
23 21 22 jca K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T T A U ˙ S ˙ T
24 1 2 3 4 5 6 cdleme11a K HL W H P A ¬ P ˙ W Q A P Q S A ¬ S ˙ W T A U ˙ S ˙ T S ˙ U = S ˙ T
25 10 11 19 20 23 24 syl122anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S ˙ U = S ˙ T
26 25 breq2d K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ U P ˙ S ˙ T
27 simp21l K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S A
28 1 2 3 4 5 6 cdleme0b K HL W H P A ¬ P ˙ W Q A U P
29 10 11 12 28 syl3anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T U P
30 29 necomd K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P U
31 1 2 4 hlatexch2 K HL P A S A U A P U P ˙ S ˙ U S ˙ P ˙ U
32 8 9 27 15 30 31 syl131anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ U S ˙ P ˙ U
33 26 32 sylbird K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ P ˙ U
34 33 imp K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ P ˙ U
35 1 2 4 hlatlej2 K HL P A Q A Q ˙ P ˙ Q
36 8 9 12 35 syl3anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T Q ˙ P ˙ Q
37 1 2 3 4 5 6 cdleme0cp K HL W H P A ¬ P ˙ W Q A P ˙ U = P ˙ Q
38 10 11 12 37 syl12anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ U = P ˙ Q
39 36 38 breqtrrd K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T Q ˙ P ˙ U
40 39 adantr K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T Q ˙ P ˙ U
41 8 hllatd K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T K Lat
42 eqid Base K = Base K
43 42 4 atbase S A S Base K
44 27 43 syl K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S Base K
45 42 4 atbase Q A Q Base K
46 12 45 syl K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T Q Base K
47 42 2 4 hlatjcl K HL P A U A P ˙ U Base K
48 8 9 15 47 syl3anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ U Base K
49 42 1 2 latjle12 K Lat S Base K Q Base K P ˙ U Base K S ˙ P ˙ U Q ˙ P ˙ U S ˙ Q ˙ P ˙ U
50 41 44 46 48 49 syl13anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S ˙ P ˙ U Q ˙ P ˙ U S ˙ Q ˙ P ˙ U
51 50 adantr K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ P ˙ U Q ˙ P ˙ U S ˙ Q ˙ P ˙ U
52 34 40 51 mpbi2and K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ Q ˙ P ˙ U
53 42 4 atbase P A P Base K
54 9 53 syl K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P Base K
55 42 1 2 latnlej1r K Lat S Base K P Base K Q Base K ¬ S ˙ P ˙ Q S Q
56 41 44 54 46 7 55 syl131anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S Q
57 1 2 4 ps-1 K HL S A Q A S Q P A U A S ˙ Q ˙ P ˙ U S ˙ Q = P ˙ U
58 8 27 12 56 9 15 57 syl132anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T S ˙ Q ˙ P ˙ U S ˙ Q = P ˙ U
59 58 adantr K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ Q ˙ P ˙ U S ˙ Q = P ˙ U
60 52 59 mpbid K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ Q = P ˙ U
61 18 60 breqtrrd K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T P ˙ S ˙ Q
62 61 ex K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T P ˙ S ˙ Q
63 1 2 4 hlatexch2 K HL P A S A Q A P Q P ˙ S ˙ Q S ˙ P ˙ Q
64 8 9 27 12 13 63 syl131anc K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ Q S ˙ P ˙ Q
65 62 64 syld K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T P ˙ S ˙ T S ˙ P ˙ Q
66 7 65 mtod K HL W H P A ¬ P ˙ W Q A S A ¬ S ˙ W T A P Q ¬ S ˙ P ˙ Q U ˙ S ˙ T ¬ P ˙ S ˙ T