Metamath Proof Explorer


Theorem cdleme23c

Description: Part of proof of Lemma E in Crawley p. 113, 4th paragraph, 6th line on p. 115. (Contributed by NM, 8-Dec-2012)

Ref Expression
Hypotheses cdleme23.b B = Base K
cdleme23.l ˙ = K
cdleme23.j ˙ = join K
cdleme23.m ˙ = meet K
cdleme23.a A = Atoms K
cdleme23.h H = LHyp K
cdleme23.v V = S ˙ T ˙ X ˙ W
Assertion cdleme23c K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ T ˙ V

Proof

Step Hyp Ref Expression
1 cdleme23.b B = Base K
2 cdleme23.l ˙ = K
3 cdleme23.j ˙ = join K
4 cdleme23.m ˙ = meet K
5 cdleme23.a A = Atoms K
6 cdleme23.h H = LHyp K
7 cdleme23.v V = S ˙ T ˙ X ˙ W
8 simp11l K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X K HL
9 8 hllatd K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X K Lat
10 simp12l K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S A
11 1 5 atbase S A S B
12 10 11 syl K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S B
13 simp13l K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T A
14 1 5 atbase T A T B
15 13 14 syl K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T B
16 1 2 3 latlej1 K Lat S B T B S ˙ S ˙ T
17 9 12 15 16 syl3anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ S ˙ T
18 simp2l K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X X B
19 simp11r K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X W H
20 1 6 lhpbase W H W B
21 19 20 syl K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X W B
22 1 4 latmcl K Lat X B W B X ˙ W B
23 9 18 21 22 syl3anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X X ˙ W B
24 1 2 3 latlej1 K Lat S B X ˙ W B S ˙ S ˙ X ˙ W
25 9 12 23 24 syl3anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ S ˙ X ˙ W
26 simp32 K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ X ˙ W = X
27 simp33 K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T ˙ X ˙ W = X
28 26 27 eqtr4d K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ X ˙ W = T ˙ X ˙ W
29 25 28 breqtrd K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ T ˙ X ˙ W
30 1 3 5 hlatjcl K HL S A T A S ˙ T B
31 8 10 13 30 syl3anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ T B
32 1 3 latjcl K Lat T B X ˙ W B T ˙ X ˙ W B
33 9 15 23 32 syl3anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T ˙ X ˙ W B
34 1 2 4 latlem12 K Lat S B S ˙ T B T ˙ X ˙ W B S ˙ S ˙ T S ˙ T ˙ X ˙ W S ˙ S ˙ T ˙ T ˙ X ˙ W
35 9 12 31 33 34 syl13anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ S ˙ T S ˙ T ˙ X ˙ W S ˙ S ˙ T ˙ T ˙ X ˙ W
36 17 29 35 mpbi2and K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ S ˙ T ˙ T ˙ X ˙ W
37 7 oveq2i T ˙ V = T ˙ S ˙ T ˙ X ˙ W
38 1 2 3 latlej2 K Lat S B T B T ˙ S ˙ T
39 9 12 15 38 syl3anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T ˙ S ˙ T
40 1 2 3 4 5 atmod3i1 K HL T A S ˙ T B X ˙ W B T ˙ S ˙ T T ˙ S ˙ T ˙ X ˙ W = S ˙ T ˙ T ˙ X ˙ W
41 8 13 31 23 39 40 syl131anc K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T ˙ S ˙ T ˙ X ˙ W = S ˙ T ˙ T ˙ X ˙ W
42 37 41 eqtrid K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X T ˙ V = S ˙ T ˙ T ˙ X ˙ W
43 36 42 breqtrrd K HL W H S A ¬ S ˙ W T A ¬ T ˙ W X B ¬ X ˙ W S T S ˙ X ˙ W = X T ˙ X ˙ W = X S ˙ T ˙ V