Metamath Proof Explorer


Theorem cdlemm10N

Description: The image of the map G is the entire one-dimensional subspace ( IV ) . Remark after Lemma M of Crawley p. 121 line 23. (Contributed by NM, 24-Nov-2013) (New usage is discouraged.)

Ref Expression
Hypotheses cdlemm10.l ⊢ ≤ ˙ = ≤ K
cdlemm10.j ⊢ ∨ ˙ = join ⁡ K
cdlemm10.a ⊢ A = Atoms ⁡ K
cdlemm10.h ⊢ H = LHyp ⁡ K
cdlemm10.t ⊢ T = LTrn ⁡ K ⁡ W
cdlemm10.r ⊢ R = trL ⁡ K ⁡ W
cdlemm10.i ⊢ I = DIsoA ⁡ K ⁡ W
cdlemm10.c ⊢ C = r ∈ A | r ≤ ˙ P ∨ ˙ V ∧ ¬ r ≤ ˙ W
cdlemm10.f ⊢ F = ι f ∈ T | f ⁡ P = s
cdlemm10.g ⊢ G = q ∈ C ⟼ ι f ∈ T | f ⁡ P = q
Assertion cdlemm10N ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ran ⁡ G = I ⁡ V

Proof

Step Hyp Ref Expression
1 cdlemm10.l ⊢ ≤ ˙ = ≤ K
2 cdlemm10.j ⊢ ∨ ˙ = join ⁡ K
3 cdlemm10.a ⊢ A = Atoms ⁡ K
4 cdlemm10.h ⊢ H = LHyp ⁡ K
5 cdlemm10.t ⊢ T = LTrn ⁡ K ⁡ W
6 cdlemm10.r ⊢ R = trL ⁡ K ⁡ W
7 cdlemm10.i ⊢ I = DIsoA ⁡ K ⁡ W
8 cdlemm10.c ⊢ C = r ∈ A | r ≤ ˙ P ∨ ˙ V ∧ ¬ r ≤ ˙ W
9 cdlemm10.f ⊢ F = ι f ∈ T | f ⁡ P = s
10 cdlemm10.g ⊢ G = q ∈ C ⟼ ι f ∈ T | f ⁡ P = q
11 riotaex ⊢ ι f ∈ T | f ⁡ P = q ∈ V
12 11 10 fnmpti ⊢ G Fn C
13 fvelrnb ⊢ G Fn C → g ∈ ran ⁡ G ↔ ∃ s ∈ C G ⁡ s = g
14 12 13 ax-mp ⊢ g ∈ ran ⁡ G ↔ ∃ s ∈ C G ⁡ s = g
15 eqeq2 ⊢ q = s → f ⁡ P = q ↔ f ⁡ P = s
16 15 riotabidv ⊢ q = s → ι f ∈ T | f ⁡ P = q = ι f ∈ T | f ⁡ P = s
17 riotaex ⊢ ι f ∈ T | f ⁡ P = s ∈ V
18 16 10 17 fvmpt ⊢ s ∈ C → G ⁡ s = ι f ∈ T | f ⁡ P = s
19 18 9 eqtr4di ⊢ s ∈ C → G ⁡ s = F
20 19 adantl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ C → G ⁡ s = F
21 20 eqeq1d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ C → G ⁡ s = g ↔ F = g
22 21 rexbidva ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ∃ s ∈ C G ⁡ s = g ↔ ∃ s ∈ C F = g
23 simpl1 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → K ∈ HL ∧ W ∈ H
24 simprl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ∈ T
25 simpl2l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∈ A
26 1 3 4 5 ltrnat ⊢ K ∈ HL ∧ W ∈ H ∧ g ∈ T ∧ P ∈ A → g ⁡ P ∈ A
27 23 24 25 26 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ⁡ P ∈ A
28 eqid ⊢ Base K = Base K
29 simpl1l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → K ∈ HL
30 29 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → K ∈ Lat
31 28 3 atbase ⊢ P ∈ A → P ∈ Base K
32 25 31 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∈ Base K
33 28 4 5 ltrncl ⊢ K ∈ HL ∧ W ∈ H ∧ g ∈ T ∧ P ∈ Base K → g ⁡ P ∈ Base K
34 23 24 32 33 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ⁡ P ∈ Base K
35 28 2 latjcl ⊢ K ∈ Lat ∧ P ∈ Base K ∧ g ⁡ P ∈ Base K → P ∨ ˙ g ⁡ P ∈ Base K
36 30 32 34 35 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∨ ˙ g ⁡ P ∈ Base K
37 simpl3l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → V ∈ A
38 28 2 3 hlatjcl ⊢ K ∈ HL ∧ P ∈ A ∧ V ∈ A → P ∨ ˙ V ∈ Base K
39 29 25 37 38 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∨ ˙ V ∈ Base K
40 28 1 2 latlej2 ⊢ K ∈ Lat ∧ P ∈ Base K ∧ g ⁡ P ∈ Base K → g ⁡ P ≤ ˙ P ∨ ˙ g ⁡ P
41 30 32 34 40 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ⁡ P ≤ ˙ P ∨ ˙ g ⁡ P
42 simpl2 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∈ A ∧ ¬ P ≤ ˙ W
43 1 2 3 4 5 6 trljat1 ⊢ K ∈ HL ∧ W ∈ H ∧ g ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W → P ∨ ˙ R ⁡ g = P ∨ ˙ g ⁡ P
44 23 24 42 43 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∨ ˙ R ⁡ g = P ∨ ˙ g ⁡ P
45 simprr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → R ⁡ g ≤ ˙ V
46 28 4 5 6 trlcl ⊢ K ∈ HL ∧ W ∈ H ∧ g ∈ T → R ⁡ g ∈ Base K
47 23 24 46 syl2anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → R ⁡ g ∈ Base K
48 28 3 atbase ⊢ V ∈ A → V ∈ Base K
49 37 48 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → V ∈ Base K
50 28 1 2 latjlej2 ⊢ K ∈ Lat ∧ R ⁡ g ∈ Base K ∧ V ∈ Base K ∧ P ∈ Base K → R ⁡ g ≤ ˙ V → P ∨ ˙ R ⁡ g ≤ ˙ P ∨ ˙ V
51 30 47 49 32 50 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → R ⁡ g ≤ ˙ V → P ∨ ˙ R ⁡ g ≤ ˙ P ∨ ˙ V
52 45 51 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∨ ˙ R ⁡ g ≤ ˙ P ∨ ˙ V
53 44 52 eqbrtrrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → P ∨ ˙ g ⁡ P ≤ ˙ P ∨ ˙ V
54 28 1 30 34 36 39 41 53 lattrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ⁡ P ≤ ˙ P ∨ ˙ V
55 1 3 4 5 ltrnel ⊢ K ∈ HL ∧ W ∈ H ∧ g ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W → g ⁡ P ∈ A ∧ ¬ g ⁡ P ≤ ˙ W
56 55 simprd ⊢ K ∈ HL ∧ W ∈ H ∧ g ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W → ¬ g ⁡ P ≤ ˙ W
57 23 24 42 56 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → ¬ g ⁡ P ≤ ˙ W
58 54 57 jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ⁡ P ≤ ˙ P ∨ ˙ V ∧ ¬ g ⁡ P ≤ ˙ W
59 breq1 ⊢ r = g ⁡ P → r ≤ ˙ P ∨ ˙ V ↔ g ⁡ P ≤ ˙ P ∨ ˙ V
60 breq1 ⊢ r = g ⁡ P → r ≤ ˙ W ↔ g ⁡ P ≤ ˙ W
61 60 notbid ⊢ r = g ⁡ P → ¬ r ≤ ˙ W ↔ ¬ g ⁡ P ≤ ˙ W
62 59 61 anbi12d ⊢ r = g ⁡ P → r ≤ ˙ P ∨ ˙ V ∧ ¬ r ≤ ˙ W ↔ g ⁡ P ≤ ˙ P ∨ ˙ V ∧ ¬ g ⁡ P ≤ ˙ W
63 62 8 elrab2 ⊢ g ⁡ P ∈ C ↔ g ⁡ P ∈ A ∧ g ⁡ P ≤ ˙ P ∨ ˙ V ∧ ¬ g ⁡ P ≤ ˙ W
64 27 58 63 sylanbrc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g ⁡ P ∈ C
65 1 3 4 5 cdlemeiota ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ g ∈ T → g = ι f ∈ T | f ⁡ P = g ⁡ P
66 23 42 24 65 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → g = ι f ∈ T | f ⁡ P = g ⁡ P
67 66 eqcomd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → ι f ∈ T | f ⁡ P = g ⁡ P = g
68 eqeq2 ⊢ s = g ⁡ P → f ⁡ P = s ↔ f ⁡ P = g ⁡ P
69 68 riotabidv ⊢ s = g ⁡ P → ι f ∈ T | f ⁡ P = s = ι f ∈ T | f ⁡ P = g ⁡ P
70 9 69 eqtrid ⊢ s = g ⁡ P → F = ι f ∈ T | f ⁡ P = g ⁡ P
71 70 eqeq1d ⊢ s = g ⁡ P → F = g ↔ ι f ∈ T | f ⁡ P = g ⁡ P = g
72 71 rspcev ⊢ g ⁡ P ∈ C ∧ ι f ∈ T | f ⁡ P = g ⁡ P = g → ∃ s ∈ C F = g
73 64 67 72 syl2anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ g ∈ T ∧ R ⁡ g ≤ ˙ V → ∃ s ∈ C F = g
74 73 ex ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → g ∈ T ∧ R ⁡ g ≤ ˙ V → ∃ s ∈ C F = g
75 breq1 ⊢ r = s → r ≤ ˙ P ∨ ˙ V ↔ s ≤ ˙ P ∨ ˙ V
76 breq1 ⊢ r = s → r ≤ ˙ W ↔ s ≤ ˙ W
77 76 notbid ⊢ r = s → ¬ r ≤ ˙ W ↔ ¬ s ≤ ˙ W
78 75 77 anbi12d ⊢ r = s → r ≤ ˙ P ∨ ˙ V ∧ ¬ r ≤ ˙ W ↔ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W
79 78 8 elrab2 ⊢ s ∈ C ↔ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W
80 simpl1 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → K ∈ HL ∧ W ∈ H
81 simpl2l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∈ A
82 simpl2r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → ¬ P ≤ ˙ W
83 simprl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → s ∈ A
84 simprrr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → ¬ s ≤ ˙ W
85 1 3 4 5 9 ltrniotacl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → F ∈ T
86 1 3 4 5 9 ltrniotaval ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → F ⁡ P = s
87 85 86 jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → F ∈ T ∧ F ⁡ P = s
88 80 81 82 83 84 87 syl122anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → F ∈ T ∧ F ⁡ P = s
89 simp3l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → F ∈ T
90 simp11 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → K ∈ HL ∧ W ∈ H
91 simp12 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → P ∈ A ∧ ¬ P ≤ ˙ W
92 eqid ⊢ meet ⁡ K = meet ⁡ K
93 1 2 92 3 4 5 6 trlval2 ⊢ K ∈ HL ∧ W ∈ H ∧ F ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W → R ⁡ F = P ∨ ˙ F ⁡ P meet ⁡ K W
94 90 89 91 93 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → R ⁡ F = P ∨ ˙ F ⁡ P meet ⁡ K W
95 simp3r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → F ⁡ P = s
96 95 oveq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → P ∨ ˙ F ⁡ P = P ∨ ˙ s
97 96 oveq1d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → P ∨ ˙ F ⁡ P meet ⁡ K W = P ∨ ˙ s meet ⁡ K W
98 94 97 eqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → R ⁡ F = P ∨ ˙ s meet ⁡ K W
99 simpl1l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → K ∈ HL
100 simpl3l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → V ∈ A
101 1 2 3 hlatlej1 ⊢ K ∈ HL ∧ P ∈ A ∧ V ∈ A → P ≤ ˙ P ∨ ˙ V
102 99 81 100 101 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ≤ ˙ P ∨ ˙ V
103 simprrl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → s ≤ ˙ P ∨ ˙ V
104 99 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → K ∈ Lat
105 81 31 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∈ Base K
106 28 3 atbase ⊢ s ∈ A → s ∈ Base K
107 106 ad2antrl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → s ∈ Base K
108 99 81 100 38 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ V ∈ Base K
109 28 1 2 latjle12 ⊢ K ∈ Lat ∧ P ∈ Base K ∧ s ∈ Base K ∧ P ∨ ˙ V ∈ Base K → P ≤ ˙ P ∨ ˙ V ∧ s ≤ ˙ P ∨ ˙ V ↔ P ∨ ˙ s ≤ ˙ P ∨ ˙ V
110 104 105 107 108 109 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ≤ ˙ P ∨ ˙ V ∧ s ≤ ˙ P ∨ ˙ V ↔ P ∨ ˙ s ≤ ˙ P ∨ ˙ V
111 102 103 110 mpbi2and ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ s ≤ ˙ P ∨ ˙ V
112 28 2 3 hlatjcl ⊢ K ∈ HL ∧ P ∈ A ∧ s ∈ A → P ∨ ˙ s ∈ Base K
113 99 81 83 112 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ s ∈ Base K
114 simpl1r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → W ∈ H
115 28 4 lhpbase ⊢ W ∈ H → W ∈ Base K
116 114 115 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → W ∈ Base K
117 28 1 92 latmlem1 ⊢ K ∈ Lat ∧ P ∨ ˙ s ∈ Base K ∧ P ∨ ˙ V ∈ Base K ∧ W ∈ Base K → P ∨ ˙ s ≤ ˙ P ∨ ˙ V → P ∨ ˙ s meet ⁡ K W ≤ ˙ P ∨ ˙ V meet ⁡ K W
118 104 113 108 116 117 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ s ≤ ˙ P ∨ ˙ V → P ∨ ˙ s meet ⁡ K W ≤ ˙ P ∨ ˙ V meet ⁡ K W
119 111 118 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ s meet ⁡ K W ≤ ˙ P ∨ ˙ V meet ⁡ K W
120 1 2 92 3 4 lhpat4N ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → P ∨ ˙ V meet ⁡ K W = V
121 120 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ V meet ⁡ K W = V
122 119 121 breqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → P ∨ ˙ s meet ⁡ K W ≤ ˙ V
123 122 3adant3 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → P ∨ ˙ s meet ⁡ K W ≤ ˙ V
124 98 123 eqbrtrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → R ⁡ F ≤ ˙ V
125 89 124 jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W ∧ F ∈ T ∧ F ⁡ P = s → F ∈ T ∧ R ⁡ F ≤ ˙ V
126 88 125 mpd3an3 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ A ∧ s ≤ ˙ P ∨ ˙ V ∧ ¬ s ≤ ˙ W → F ∈ T ∧ R ⁡ F ≤ ˙ V
127 79 126 sylan2b ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W ∧ s ∈ C → F ∈ T ∧ R ⁡ F ≤ ˙ V
128 127 ex ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → s ∈ C → F ∈ T ∧ R ⁡ F ≤ ˙ V
129 eleq1 ⊢ F = g → F ∈ T ↔ g ∈ T
130 fveq2 ⊢ F = g → R ⁡ F = R ⁡ g
131 130 breq1d ⊢ F = g → R ⁡ F ≤ ˙ V ↔ R ⁡ g ≤ ˙ V
132 129 131 anbi12d ⊢ F = g → F ∈ T ∧ R ⁡ F ≤ ˙ V ↔ g ∈ T ∧ R ⁡ g ≤ ˙ V
133 132 biimpcd ⊢ F ∈ T ∧ R ⁡ F ≤ ˙ V → F = g → g ∈ T ∧ R ⁡ g ≤ ˙ V
134 128 133 syl6 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → s ∈ C → F = g → g ∈ T ∧ R ⁡ g ≤ ˙ V
135 134 rexlimdv ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ∃ s ∈ C F = g → g ∈ T ∧ R ⁡ g ≤ ˙ V
136 74 135 impbid ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → g ∈ T ∧ R ⁡ g ≤ ˙ V ↔ ∃ s ∈ C F = g
137 22 136 bitr4d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ∃ s ∈ C G ⁡ s = g ↔ g ∈ T ∧ R ⁡ g ≤ ˙ V
138 fveq2 ⊢ f = g → R ⁡ f = R ⁡ g
139 138 breq1d ⊢ f = g → R ⁡ f ≤ ˙ V ↔ R ⁡ g ≤ ˙ V
140 139 elrab ⊢ g ∈ f ∈ T | R ⁡ f ≤ ˙ V ↔ g ∈ T ∧ R ⁡ g ≤ ˙ V
141 137 140 bitr4di ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ∃ s ∈ C G ⁡ s = g ↔ g ∈ f ∈ T | R ⁡ f ≤ ˙ V
142 simp1l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → K ∈ HL
143 simp1r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → W ∈ H
144 simp3l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → V ∈ A
145 144 48 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → V ∈ Base K
146 simp3r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → V ≤ ˙ W
147 28 1 4 5 6 7 diaval ⊢ K ∈ HL ∧ W ∈ H ∧ V ∈ Base K ∧ V ≤ ˙ W → I ⁡ V = f ∈ T | R ⁡ f ≤ ˙ V
148 142 143 145 146 147 syl22anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → I ⁡ V = f ∈ T | R ⁡ f ≤ ˙ V
149 148 eleq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → g ∈ I ⁡ V ↔ g ∈ f ∈ T | R ⁡ f ≤ ˙ V
150 141 149 bitr4d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ∃ s ∈ C G ⁡ s = g ↔ g ∈ I ⁡ V
151 14 150 bitrid ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → g ∈ ran ⁡ G ↔ g ∈ I ⁡ V
152 151 eqrdv ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ V ∈ A ∧ V ≤ ˙ W → ran ⁡ G = I ⁡ V