Metamath Proof Explorer


Theorem dihord2pre2

Description: Part of proof after Lemma N of Crawley p. 122. Reverse ordering property. (Contributed by NM, 4-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
dihord2c.t ⊢ T = LTrn ⁡ K ⁡ W
dihord2c.r ⊢ R = trL ⁡ K ⁡ W
dihord2c.o ⊢ O = h ∈ T ⟼ I ↾ B
dihord2.p ⊢ P = oc ⁡ K ⁡ W
dihord2.e ⊢ E = TEndo ⁡ K ⁡ W
dihord2.d ⊢ + ˙ = + U
dihord2.g ⊢ G = ι h ∈ T | h ⁡ P = N
Assertion dihord2pre2 ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Q ∨ ˙ X ∧ ˙ W ≤ ˙ N ∨ ˙ 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 dihord2c.t ⊢ T = LTrn ⁡ K ⁡ W
12 dihord2c.r ⊢ R = trL ⁡ K ⁡ W
13 dihord2c.o ⊢ O = h ∈ T ⟼ I ↾ B
14 dihord2.p ⊢ P = oc ⁡ K ⁡ W
15 dihord2.e ⊢ E = TEndo ⁡ K ⁡ W
16 dihord2.d ⊢ + ˙ = + U
17 dihord2.g ⊢ G = ι h ∈ T | h ⁡ P = N
18 1 2 3 4 5 6 7 8 9 10 dihord2a ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Q ≤ ˙ N ∨ ˙ Y ∧ ˙ W
19 simp11l ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → K ∈ HL
20 19 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → K ∈ Lat
21 simp2l ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → X ∈ B
22 simp11r ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → W ∈ H
23 1 6 lhpbase ⊢ W ∈ H → W ∈ B
24 22 23 syl ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → W ∈ B
25 1 4 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ W ∈ B → X ∧ ˙ W ∈ B
26 20 21 24 25 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → X ∧ ˙ W ∈ B
27 simp2r ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Y ∈ B
28 1 4 latmcl ⊢ K ∈ Lat ∧ Y ∈ B ∧ W ∈ B → Y ∧ ˙ W ∈ B
29 20 27 24 28 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Y ∧ ˙ W ∈ B
30 simp13l ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → N ∈ A
31 1 5 atbase ⊢ N ∈ A → N ∈ B
32 30 31 syl ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → N ∈ B
33 1 3 latjcl ⊢ K ∈ Lat ∧ N ∈ B ∧ Y ∧ ˙ W ∈ B → N ∨ ˙ Y ∧ ˙ W ∈ B
34 20 32 29 33 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → N ∨ ˙ Y ∧ ˙ W ∈ B
35 simp33 ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W
36 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 dihord2pre ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → X ∧ ˙ W ≤ ˙ Y ∧ ˙ W
37 35 36 syld3an3 ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → X ∧ ˙ W ≤ ˙ Y ∧ ˙ W
38 1 2 3 latlej2 ⊢ K ∈ Lat ∧ N ∈ B ∧ Y ∧ ˙ W ∈ B → Y ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W
39 20 32 29 38 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Y ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W
40 1 2 20 26 29 34 37 39 lattrd ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → X ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W
41 simp12l ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Q ∈ A
42 1 5 atbase ⊢ Q ∈ A → Q ∈ B
43 41 42 syl ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Q ∈ B
44 1 2 3 latjle12 ⊢ K ∈ Lat ∧ Q ∈ B ∧ X ∧ ˙ W ∈ B ∧ N ∨ ˙ Y ∧ ˙ W ∈ B → Q ≤ ˙ N ∨ ˙ Y ∧ ˙ W ∧ X ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W ↔ Q ∨ ˙ X ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W
45 20 43 26 34 44 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Q ≤ ˙ N ∨ ˙ Y ∧ ˙ W ∧ X ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W ↔ Q ∨ ˙ X ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W
46 18 40 45 mpbi2and ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W ∧ X ∈ B ∧ Y ∈ B ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ N ∨ ˙ Y ∧ ˙ W = Y ∧ J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W → Q ∨ ˙ X ∧ ˙ W ≤ ˙ N ∨ ˙ Y ∧ ˙ W