Metamath Proof Explorer


Theorem cdleme36a

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

Ref Expression
Hypotheses cdleme36.b B = Base K
cdleme36.l ˙ = K
cdleme36.j ˙ = join K
cdleme36.m ˙ = meet K
cdleme36.a A = Atoms K
cdleme36.h H = LHyp K
cdleme36.u U = P ˙ Q ˙ W
cdleme36.e E = t ˙ U ˙ Q ˙ P ˙ t ˙ W
Assertion cdleme36a K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q ¬ R ˙ t ˙ E

Proof

Step Hyp Ref Expression
1 cdleme36.b B = Base K
2 cdleme36.l ˙ = K
3 cdleme36.j ˙ = join K
4 cdleme36.m ˙ = meet K
5 cdleme36.a A = Atoms K
6 cdleme36.h H = LHyp K
7 cdleme36.u U = P ˙ Q ˙ W
8 cdleme36.e E = t ˙ U ˙ Q ˙ P ˙ t ˙ W
9 simp3r K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q ¬ t ˙ P ˙ Q
10 simp11l K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q K HL
11 simp22l K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R A
12 simp3ll K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q t A
13 simp11 K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q K HL W H
14 simp12 K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q P A ¬ P ˙ W
15 simp13 K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q Q A
16 simp21 K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q P Q
17 2 3 4 5 6 7 cdleme0a K HL W H P A ¬ P ˙ W Q A P Q U A
18 13 14 15 16 17 syl112anc K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q U A
19 simp12l K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q P A
20 simp22 K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R A ¬ R ˙ W
21 2 3 4 5 6 7 cdleme0c K HL W H P A Q A R A ¬ R ˙ W U R
22 13 19 15 20 21 syl121anc K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q U R
23 22 necomd K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R U
24 2 3 5 hlatexch2 K HL R A t A U A R U R ˙ t ˙ U t ˙ R ˙ U
25 10 11 12 18 23 24 syl131anc K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R ˙ t ˙ U t ˙ R ˙ U
26 simp3l K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q t A ¬ t ˙ W
27 2 3 4 5 6 7 8 cdleme1 K HL W H P A Q A t A ¬ t ˙ W t ˙ E = t ˙ U
28 13 19 15 26 27 syl13anc K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q t ˙ E = t ˙ U
29 28 breq2d K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R ˙ t ˙ E R ˙ t ˙ U
30 simp23 K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R ˙ P ˙ Q
31 2 3 4 5 6 7 cdleme4 K HL W H P A Q A R A ¬ R ˙ W R ˙ P ˙ Q P ˙ Q = R ˙ U
32 13 19 15 20 30 31 syl131anc K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q P ˙ Q = R ˙ U
33 32 breq2d K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q t ˙ P ˙ Q t ˙ R ˙ U
34 25 29 33 3imtr4d K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q R ˙ t ˙ E t ˙ P ˙ Q
35 9 34 mtod K HL W H P A ¬ P ˙ W Q A P Q R A ¬ R ˙ W R ˙ P ˙ Q t A ¬ t ˙ W ¬ t ˙ P ˙ Q ¬ R ˙ t ˙ E