Metamath Proof Explorer


Theorem dihord11c

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
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 dihord11c ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → ∃ y ∈ J ⁡ N ∃ z ∈ I ⁡ Y ∧ ˙ W f O = y + ˙ z

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 simp1 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ N ∈ A ∧ ¬ N ≤ ˙ W
19 simp2 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → X ∈ B ∧ Y ∈ B
20 simp31 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → J ⁡ Q ⊕ ˙ I ⁡ X ∧ ˙ W ⊆ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W
21 simp32 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → f ∈ T
22 simp33 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → R ⁡ f ≤ ˙ X ∧ ˙ W
23 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 dihord11b ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → f O ∈ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W
24 18 19 20 21 22 23 syl32anc ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → f O ∈ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W
25 simp11 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → K ∈ HL ∧ W ∈ H
26 6 9 25 dvhlmod ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → U ∈ LMod
27 eqid ⊢ LSubSp ⁡ U = LSubSp ⁡ U
28 27 lsssssubg ⊢ U ∈ LMod → LSubSp ⁡ U ⊆ SubGrp ⁡ U
29 26 28 syl ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → LSubSp ⁡ U ⊆ SubGrp ⁡ U
30 simp13 ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → N ∈ A ∧ ¬ N ≤ ˙ W
31 2 5 6 9 8 27 diclss ⊢ K ∈ HL ∧ W ∈ H ∧ N ∈ A ∧ ¬ N ≤ ˙ W → J ⁡ N ∈ LSubSp ⁡ U
32 25 30 31 syl2anc ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → J ⁡ N ∈ LSubSp ⁡ U
33 29 32 sseldd ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → J ⁡ N ∈ SubGrp ⁡ U
34 simp11l ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → K ∈ HL
35 34 hllatd ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → K ∈ Lat
36 simp2r ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → Y ∈ B
37 simp11r ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → W ∈ H
38 1 6 lhpbase ⊢ W ∈ H → W ∈ B
39 37 38 syl ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → W ∈ B
40 1 4 latmcl ⊢ K ∈ Lat ∧ Y ∈ B ∧ W ∈ B → Y ∧ ˙ W ∈ B
41 35 36 39 40 syl3anc ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → Y ∧ ˙ W ∈ B
42 1 2 4 latmle2 ⊢ K ∈ Lat ∧ Y ∈ B ∧ W ∈ B → Y ∧ ˙ W ≤ ˙ W
43 35 36 39 42 syl3anc ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → Y ∧ ˙ W ≤ ˙ W
44 1 2 6 9 7 27 diblss ⊢ K ∈ HL ∧ W ∈ H ∧ Y ∧ ˙ W ∈ B ∧ Y ∧ ˙ W ≤ ˙ W → I ⁡ Y ∧ ˙ W ∈ LSubSp ⁡ U
45 25 41 43 44 syl12anc ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → I ⁡ Y ∧ ˙ W ∈ LSubSp ⁡ U
46 29 45 sseldd ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → I ⁡ Y ∧ ˙ W ∈ SubGrp ⁡ U
47 16 10 lsmelval ⊢ J ⁡ N ∈ SubGrp ⁡ U ∧ I ⁡ Y ∧ ˙ W ∈ SubGrp ⁡ U → f O ∈ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W ↔ ∃ y ∈ J ⁡ N ∃ z ∈ I ⁡ Y ∧ ˙ W f O = y + ˙ z
48 33 46 47 syl2anc ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → f O ∈ J ⁡ N ⊕ ˙ I ⁡ Y ∧ ˙ W ↔ ∃ y ∈ J ⁡ N ∃ z ∈ I ⁡ Y ∧ ˙ W f O = y + ˙ z
49 24 48 mpbid ⊢ 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 ∧ f ∈ T ∧ R ⁡ f ≤ ˙ X ∧ ˙ W → ∃ y ∈ J ⁡ N ∃ z ∈ I ⁡ Y ∧ ˙ W f O = y + ˙ z