Metamath Proof Explorer


Theorem cdlemn2

Description: Part of proof of Lemma N of Crawley p. 121 line 30. (Contributed by NM, 21-Feb-2014)

Ref Expression
Hypotheses cdlemn2.b B = Base K
cdlemn2.l ˙ = K
cdlemn2.j ˙ = join K
cdlemn2.a A = Atoms K
cdlemn2.h H = LHyp K
cdlemn2.t T = LTrn K W
cdlemn2.r R = trL K W
cdlemn2.f F = ι h T | h Q = S
Assertion cdlemn2 K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X R F ˙ X

Proof

Step Hyp Ref Expression
1 cdlemn2.b B = Base K
2 cdlemn2.l ˙ = K
3 cdlemn2.j ˙ = join K
4 cdlemn2.a A = Atoms K
5 cdlemn2.h H = LHyp K
6 cdlemn2.t T = LTrn K W
7 cdlemn2.r R = trL K W
8 cdlemn2.f F = ι h T | h Q = S
9 simp1 K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X K HL W H
10 simp21 K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q A ¬ Q ˙ W
11 simp22 K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X S A ¬ S ˙ W
12 2 4 5 6 8 ltrniotacl K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W F T
13 9 10 11 12 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X F T
14 eqid meet K = meet K
15 2 3 14 4 5 6 7 trlval2 K HL W H F T Q A ¬ Q ˙ W R F = Q ˙ F Q meet K W
16 9 13 10 15 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X R F = Q ˙ F Q meet K W
17 2 4 5 6 8 ltrniotaval K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W F Q = S
18 9 10 11 17 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X F Q = S
19 18 oveq2d K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ F Q = Q ˙ S
20 19 oveq1d K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ F Q meet K W = Q ˙ S meet K W
21 16 20 eqtrd K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X R F = Q ˙ S meet K W
22 simp1l K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X K HL
23 22 hllatd K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X K Lat
24 simp21l K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q A
25 1 4 atbase Q A Q B
26 24 25 syl K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q B
27 simp23l K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X X B
28 1 2 3 latlej1 K Lat Q B X B Q ˙ Q ˙ X
29 23 26 27 28 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ Q ˙ X
30 simp3 K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X S ˙ Q ˙ X
31 simp22l K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X S A
32 1 4 atbase S A S B
33 31 32 syl K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X S B
34 1 3 latjcl K Lat Q B X B Q ˙ X B
35 23 26 27 34 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ X B
36 1 2 3 latjle12 K Lat Q B S B Q ˙ X B Q ˙ Q ˙ X S ˙ Q ˙ X Q ˙ S ˙ Q ˙ X
37 23 26 33 35 36 syl13anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ Q ˙ X S ˙ Q ˙ X Q ˙ S ˙ Q ˙ X
38 29 30 37 mpbi2and K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ S ˙ Q ˙ X
39 1 3 4 hlatjcl K HL Q A S A Q ˙ S B
40 22 24 31 39 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ S B
41 simp1r K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X W H
42 1 5 lhpbase W H W B
43 41 42 syl K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X W B
44 1 2 14 latmlem1 K Lat Q ˙ S B Q ˙ X B W B Q ˙ S ˙ Q ˙ X Q ˙ S meet K W ˙ Q ˙ X meet K W
45 23 40 35 43 44 syl13anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ S ˙ Q ˙ X Q ˙ S meet K W ˙ Q ˙ X meet K W
46 38 45 mpd K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ S meet K W ˙ Q ˙ X meet K W
47 21 46 eqbrtrd K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X R F ˙ Q ˙ X meet K W
48 simp23 K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X X B X ˙ W
49 1 2 3 14 4 5 lhple K HL W H Q A ¬ Q ˙ W X B X ˙ W Q ˙ X meet K W = X
50 9 10 48 49 syl3anc K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X Q ˙ X meet K W = X
51 47 50 breqtrd K HL W H Q A ¬ Q ˙ W S A ¬ S ˙ W X B X ˙ W S ˙ Q ˙ X R F ˙ X