Metamath Proof Explorer


Theorem dihord2a

Description: Part of proof after Lemma N of Crawley p. 122. Reverse ordering property. (Contributed by NM, 3-Mar-2014)

Ref Expression
Hypotheses dihjust.b B = Base K
dihjust.l ˙ = K
dihjust.j ˙ = join K
dihjust.m ˙ = meet K
dihjust.a A = Atoms K
dihjust.h H = LHyp K
dihjust.i I = DIsoB K W
dihjust.J J = DIsoC K W
dihjust.u U = DVecH K W
dihjust.s ˙ = LSSum U
Assertion dihord2a K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Q ˙ R ˙ Y ˙ W

Proof

Step Hyp Ref Expression
1 dihjust.b B = Base K
2 dihjust.l ˙ = K
3 dihjust.j ˙ = join K
4 dihjust.m ˙ = meet K
5 dihjust.a A = Atoms K
6 dihjust.h H = LHyp K
7 dihjust.i I = DIsoB K W
8 dihjust.J J = DIsoC K W
9 dihjust.u U = DVecH K W
10 dihjust.s ˙ = LSSum U
11 simp11 K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W K HL W H
12 6 9 11 dvhlmod K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W U LMod
13 eqid LSubSp U = LSubSp U
14 13 lsssssubg U LMod LSubSp U SubGrp U
15 12 14 syl K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W LSubSp U SubGrp U
16 simp12 K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Q A ¬ Q ˙ W
17 2 5 6 9 8 13 diclss K HL W H Q A ¬ Q ˙ W J Q LSubSp U
18 11 16 17 syl2anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W J Q LSubSp U
19 15 18 sseldd K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W J Q SubGrp U
20 simp11l K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W K HL
21 20 hllatd K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W K Lat
22 simp2l K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W X B
23 simp11r K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W W H
24 1 6 lhpbase W H W B
25 23 24 syl K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W W B
26 1 4 latmcl K Lat X B W B X ˙ W B
27 21 22 25 26 syl3anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W X ˙ W B
28 1 2 4 latmle2 K Lat X B W B X ˙ W ˙ W
29 21 22 25 28 syl3anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W X ˙ W ˙ W
30 1 2 6 9 7 13 diblss K HL W H X ˙ W B X ˙ W ˙ W I X ˙ W LSubSp U
31 11 27 29 30 syl12anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W I X ˙ W LSubSp U
32 15 31 sseldd K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W I X ˙ W SubGrp U
33 10 lsmub1 J Q SubGrp U I X ˙ W SubGrp U J Q J Q ˙ I X ˙ W
34 19 32 33 syl2anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W J Q J Q ˙ I X ˙ W
35 simp33 K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W J Q ˙ I X ˙ W J R ˙ I Y ˙ W
36 34 35 sstrd K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W J Q J R ˙ I Y ˙ W
37 simp13 K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W R A ¬ R ˙ W
38 simp2r K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Y B
39 1 4 latmcl K Lat Y B W B Y ˙ W B
40 21 38 25 39 syl3anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Y ˙ W B
41 1 2 4 latmle2 K Lat Y B W B Y ˙ W ˙ W
42 21 38 25 41 syl3anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Y ˙ W ˙ W
43 40 42 jca K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Y ˙ W B Y ˙ W ˙ W
44 1 2 3 5 6 7 8 9 10 cdlemn K HL W H R A ¬ R ˙ W Q A ¬ Q ˙ W Y ˙ W B Y ˙ W ˙ W Q ˙ R ˙ Y ˙ W J Q J R ˙ I Y ˙ W
45 11 37 16 43 44 syl13anc K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Q ˙ R ˙ Y ˙ W J Q J R ˙ I Y ˙ W
46 36 45 mpbird K HL W H Q A ¬ Q ˙ W R A ¬ R ˙ W X B Y B Q ˙ X ˙ W = X R ˙ Y ˙ W = Y J Q ˙ I X ˙ W J R ˙ I Y ˙ W Q ˙ R ˙ Y ˙ W