Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  cdleme3h Structured version   Unicode version

Theorem cdleme3h 33266
Description: Part of proof of Lemma E in [Crawley] p. 113. Lemma leading to cdleme3fa 33267 and cdleme3 33268. (Contributed by NM, 6-Jun-2012.)
Hypotheses
Ref Expression
cdleme1.l  |-  .<_  =  ( le `  K )
cdleme1.j  |-  .\/  =  ( join `  K )
cdleme1.m  |-  ./\  =  ( meet `  K )
cdleme1.a  |-  A  =  ( Atoms `  K )
cdleme1.h  |-  H  =  ( LHyp `  K
)
cdleme1.u  |-  U  =  ( ( P  .\/  Q )  ./\  W )
cdleme1.f  |-  F  =  ( ( R  .\/  U )  ./\  ( Q  .\/  ( ( P  .\/  R )  ./\  W )
) )
cdleme3.3  |-  V  =  ( ( P  .\/  R )  ./\  W )
Assertion
Ref Expression
cdleme3h  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  F  e.  A )

Proof of Theorem cdleme3h
StepHypRef Expression
1 cdleme1.l . . 3  |-  .<_  =  ( le `  K )
2 cdleme1.j . . 3  |-  .\/  =  ( join `  K )
3 cdleme1.m . . 3  |-  ./\  =  ( meet `  K )
4 cdleme1.a . . 3  |-  A  =  ( Atoms `  K )
5 cdleme1.h . . 3  |-  H  =  ( LHyp `  K
)
6 cdleme1.u . . 3  |-  U  =  ( ( P  .\/  Q )  ./\  W )
7 cdleme1.f . . 3  |-  F  =  ( ( R  .\/  U )  ./\  ( Q  .\/  ( ( P  .\/  R )  ./\  W )
) )
8 cdleme3.3 . . 3  |-  V  =  ( ( P  .\/  R )  ./\  W )
91, 2, 3, 4, 5, 6, 7, 8cdleme3d 33262 . 2  |-  F  =  ( ( R  .\/  U )  ./\  ( Q  .\/  V ) )
10 simp1l 1023 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  K  e.  HL )
11 simp23l 1120 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  R  e.  A )
12 simp1 999 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( K  e.  HL  /\  W  e.  H ) )
13 simp21 1032 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( P  e.  A  /\  -.  P  .<_  W ) )
14 simp22l 1118 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  Q  e.  A )
15 simp3l 1027 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  P  =/=  Q )
161, 2, 3, 4, 5, 6lhpat2 33075 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  P  =/=  Q ) )  ->  U  e.  A
)
1712, 13, 14, 15, 16syl112anc 1236 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  U  e.  A )
18 eqid 2404 . . . . 5  |-  ( Base `  K )  =  (
Base `  K )
1918, 2, 4hlatjcl 32397 . . . 4  |-  ( ( K  e.  HL  /\  R  e.  A  /\  U  e.  A )  ->  ( R  .\/  U
)  e.  ( Base `  K ) )
2010, 11, 17, 19syl3anc 1232 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .\/  U )  e.  (
Base `  K )
)
21 simp3r 1028 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  -.  R  .<_  ( P  .\/  Q
) )
2211, 21jca 532 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  e.  A  /\  -.  R  .<_  ( P  .\/  Q
) ) )
231, 2, 3, 4, 5, 6, 7, 8cdleme3e 33263 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  Q  e.  A  /\  ( R  e.  A  /\  -.  R  .<_  ( P 
.\/  Q ) ) ) )  ->  V  e.  A )
2412, 13, 14, 22, 23syl13anc 1234 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  V  e.  A )
2518, 2, 4hlatjcl 32397 . . . 4  |-  ( ( K  e.  HL  /\  Q  e.  A  /\  V  e.  A )  ->  ( Q  .\/  V
)  e.  ( Base `  K ) )
2610, 14, 24, 25syl3anc 1232 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( Q  .\/  V )  e.  (
Base `  K )
)
27 hllat 32394 . . . . 5  |-  ( K  e.  HL  ->  K  e.  Lat )
2810, 27syl 17 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  K  e.  Lat )
29 simp21l 1116 . . . . . . . . 9  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  P  e.  A )
3018, 2, 4hlatjcl 32397 . . . . . . . . 9  |-  ( ( K  e.  HL  /\  P  e.  A  /\  Q  e.  A )  ->  ( P  .\/  Q
)  e.  ( Base `  K ) )
3110, 29, 14, 30syl3anc 1232 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( P  .\/  Q )  e.  (
Base `  K )
)
32 simp1r 1024 . . . . . . . . 9  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  W  e.  H )
3318, 5lhpbase 33028 . . . . . . . . 9  |-  ( W  e.  H  ->  W  e.  ( Base `  K
) )
3432, 33syl 17 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  W  e.  ( Base `  K )
)
3518, 1, 3latmle2 16033 . . . . . . . 8  |-  ( ( K  e.  Lat  /\  ( P  .\/  Q )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( P  .\/  Q )  ./\  W )  .<_  W )
3628, 31, 34, 35syl3anc 1232 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( P  .\/  Q )  ./\  W )  .<_  W )
376, 36syl5eqbr 4430 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  U  .<_  W )
38 simp23r 1121 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  -.  R  .<_  W )
39 nbrne2 4415 . . . . . 6  |-  ( ( U  .<_  W  /\  -.  R  .<_  W )  ->  U  =/=  R
)
4037, 38, 39syl2anc 661 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  U  =/=  R )
4140necomd 2676 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  R  =/=  U )
42 eqid 2404 . . . . 5  |-  ( Lines `  K )  =  (
Lines `  K )
43 eqid 2404 . . . . 5  |-  ( pmap `  K )  =  (
pmap `  K )
442, 4, 42, 43linepmap 32805 . . . 4  |-  ( ( ( K  e.  Lat  /\  R  e.  A  /\  U  e.  A )  /\  R  =/=  U
)  ->  ( ( pmap `  K ) `  ( R  .\/  U ) )  e.  ( Lines `  K ) )
4528, 11, 17, 41, 44syl31anc 1235 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( pmap `  K ) `  ( R  .\/  U ) )  e.  ( Lines `  K ) )
4618, 2, 4hlatjcl 32397 . . . . . . . . 9  |-  ( ( K  e.  HL  /\  P  e.  A  /\  R  e.  A )  ->  ( P  .\/  R
)  e.  ( Base `  K ) )
4710, 29, 11, 46syl3anc 1232 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( P  .\/  R )  e.  (
Base `  K )
)
4818, 1, 3latmle2 16033 . . . . . . . 8  |-  ( ( K  e.  Lat  /\  ( P  .\/  R )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( P  .\/  R )  ./\  W )  .<_  W )
4928, 47, 34, 48syl3anc 1232 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( P  .\/  R )  ./\  W )  .<_  W )
508, 49syl5eqbr 4430 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  V  .<_  W )
51 simp22r 1119 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  -.  Q  .<_  W )
52 nbrne2 4415 . . . . . 6  |-  ( ( V  .<_  W  /\  -.  Q  .<_  W )  ->  V  =/=  Q
)
5350, 51, 52syl2anc 661 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  V  =/=  Q )
5453necomd 2676 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  Q  =/=  V )
552, 4, 42, 43linepmap 32805 . . . 4  |-  ( ( ( K  e.  Lat  /\  Q  e.  A  /\  V  e.  A )  /\  Q  =/=  V
)  ->  ( ( pmap `  K ) `  ( Q  .\/  V ) )  e.  ( Lines `  K ) )
5628, 14, 24, 54, 55syl31anc 1235 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( pmap `  K ) `  ( Q  .\/  V ) )  e.  ( Lines `  K ) )
571, 2, 4hlatlej1 32405 . . . . 5  |-  ( ( K  e.  HL  /\  R  e.  A  /\  U  e.  A )  ->  R  .<_  ( R  .\/  U ) )
5810, 11, 17, 57syl3anc 1232 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  R  .<_  ( R  .\/  U ) )
59 nbrne2 4415 . . . . . . . . 9  |-  ( ( V  .<_  W  /\  -.  R  .<_  W )  ->  V  =/=  R
)
6050, 38, 59syl2anc 661 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  V  =/=  R )
6160necomd 2676 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  R  =/=  V )
621, 2, 4hlatexch2 32426 . . . . . . 7  |-  ( ( K  e.  HL  /\  ( R  e.  A  /\  Q  e.  A  /\  V  e.  A
)  /\  R  =/=  V )  ->  ( R  .<_  ( Q  .\/  V
)  ->  Q  .<_  ( R  .\/  V ) ) )
6310, 11, 14, 24, 61, 62syl131anc 1245 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .<_  ( Q  .\/  V
)  ->  Q  .<_  ( R  .\/  V ) ) )
648oveq2i 6291 . . . . . . . 8  |-  ( R 
.\/  V )  =  ( R  .\/  (
( P  .\/  R
)  ./\  W )
)
651, 2, 4hlatlej2 32406 . . . . . . . . . 10  |-  ( ( K  e.  HL  /\  P  e.  A  /\  R  e.  A )  ->  R  .<_  ( P  .\/  R ) )
6610, 29, 11, 65syl3anc 1232 . . . . . . . . 9  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  R  .<_  ( P  .\/  R ) )
6718, 1, 3latmle1 16032 . . . . . . . . . 10  |-  ( ( K  e.  Lat  /\  ( P  .\/  R )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( P  .\/  R )  ./\  W )  .<_  ( P  .\/  R ) )
6828, 47, 34, 67syl3anc 1232 . . . . . . . . 9  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( P  .\/  R )  ./\  W )  .<_  ( P  .\/  R ) )
6918, 4atbase 32320 . . . . . . . . . . 11  |-  ( R  e.  A  ->  R  e.  ( Base `  K
) )
7011, 69syl 17 . . . . . . . . . 10  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  R  e.  ( Base `  K )
)
7118, 3latmcl 16008 . . . . . . . . . . 11  |-  ( ( K  e.  Lat  /\  ( P  .\/  R )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( P  .\/  R )  ./\  W )  e.  ( Base `  K ) )
7228, 47, 34, 71syl3anc 1232 . . . . . . . . . 10  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( P  .\/  R )  ./\  W )  e.  ( Base `  K ) )
7318, 1, 2latjle12 16018 . . . . . . . . . 10  |-  ( ( K  e.  Lat  /\  ( R  e.  ( Base `  K )  /\  ( ( P  .\/  R )  ./\  W )  e.  ( Base `  K
)  /\  ( P  .\/  R )  e.  (
Base `  K )
) )  ->  (
( R  .<_  ( P 
.\/  R )  /\  ( ( P  .\/  R )  ./\  W )  .<_  ( P  .\/  R
) )  <->  ( R  .\/  ( ( P  .\/  R )  ./\  W )
)  .<_  ( P  .\/  R ) ) )
7428, 70, 72, 47, 73syl13anc 1234 . . . . . . . . 9  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( R  .<_  ( P  .\/  R )  /\  ( ( P  .\/  R ) 
./\  W )  .<_  ( P  .\/  R ) )  <->  ( R  .\/  ( ( P  .\/  R )  ./\  W )
)  .<_  ( P  .\/  R ) ) )
7566, 68, 74mpbi2and 924 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .\/  ( ( P  .\/  R )  ./\  W )
)  .<_  ( P  .\/  R ) )
7664, 75syl5eqbr 4430 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .\/  V )  .<_  ( P 
.\/  R ) )
7718, 4atbase 32320 . . . . . . . . 9  |-  ( Q  e.  A  ->  Q  e.  ( Base `  K
) )
7814, 77syl 17 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  Q  e.  ( Base `  K )
)
7918, 2, 4hlatjcl 32397 . . . . . . . . 9  |-  ( ( K  e.  HL  /\  R  e.  A  /\  V  e.  A )  ->  ( R  .\/  V
)  e.  ( Base `  K ) )
8010, 11, 24, 79syl3anc 1232 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .\/  V )  e.  (
Base `  K )
)
8118, 1lattr 16012 . . . . . . . 8  |-  ( ( K  e.  Lat  /\  ( Q  e.  ( Base `  K )  /\  ( R  .\/  V )  e.  ( Base `  K
)  /\  ( P  .\/  R )  e.  (
Base `  K )
) )  ->  (
( Q  .<_  ( R 
.\/  V )  /\  ( R  .\/  V ) 
.<_  ( P  .\/  R
) )  ->  Q  .<_  ( P  .\/  R
) ) )
8228, 78, 80, 47, 81syl13anc 1234 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( Q  .<_  ( R  .\/  V )  /\  ( R 
.\/  V )  .<_  ( P  .\/  R ) )  ->  Q  .<_  ( P  .\/  R ) ) )
8376, 82mpan2d 674 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( Q  .<_  ( R  .\/  V
)  ->  Q  .<_  ( P  .\/  R ) ) )
8415necomd 2676 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  Q  =/=  P )
851, 2, 4hlatexch1 32425 . . . . . . 7  |-  ( ( K  e.  HL  /\  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A
)  /\  Q  =/=  P )  ->  ( Q  .<_  ( P  .\/  R
)  ->  R  .<_  ( P  .\/  Q ) ) )
8610, 14, 11, 29, 84, 85syl131anc 1245 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( Q  .<_  ( P  .\/  R
)  ->  R  .<_  ( P  .\/  Q ) ) )
8763, 83, 863syld 56 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .<_  ( Q  .\/  V
)  ->  R  .<_  ( P  .\/  Q ) ) )
8821, 87mtod 179 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  -.  R  .<_  ( Q  .\/  V
) )
89 nbrne1 4414 . . . 4  |-  ( ( R  .<_  ( R  .\/  U )  /\  -.  R  .<_  ( Q  .\/  V ) )  ->  ( R  .\/  U )  =/=  ( Q  .\/  V
) )
9058, 88, 89syl2anc 661 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  .\/  U )  =/=  ( Q  .\/  V ) )
9114, 15jca 532 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( Q  e.  A  /\  P  =/= 
Q ) )
92 simp23 1034 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( R  e.  A  /\  -.  R  .<_  W ) )
93 eqid 2404 . . . . . 6  |-  ( 0.
`  K )  =  ( 0. `  K
)
941, 2, 3, 4, 5, 6, 7, 93cdleme3c 33261 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  P  =/=  Q
)  /\  ( R  e.  A  /\  -.  R  .<_  W ) ) )  ->  F  =/=  ( 0. `  K ) )
9512, 13, 91, 92, 94syl13anc 1234 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  F  =/=  ( 0. `  K ) )
969, 95syl5eqner 2706 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( R  .\/  U )  ./\  ( Q  .\/  V ) )  =/=  ( 0.
`  K ) )
9718, 3, 93, 4, 42, 432lnat 32814 . . 3  |-  ( ( ( K  e.  HL  /\  ( R  .\/  U
)  e.  ( Base `  K )  /\  ( Q  .\/  V )  e.  ( Base `  K
) )  /\  (
( ( pmap `  K
) `  ( R  .\/  U ) )  e.  ( Lines `  K )  /\  ( ( pmap `  K
) `  ( Q  .\/  V ) )  e.  ( Lines `  K )
)  /\  ( ( R  .\/  U )  =/=  ( Q  .\/  V
)  /\  ( ( R  .\/  U )  ./\  ( Q  .\/  V ) )  =/=  ( 0.
`  K ) ) )  ->  ( ( R  .\/  U )  ./\  ( Q  .\/  V ) )  e.  A )
9810, 20, 26, 45, 56, 90, 96, 97syl322anc 1260 . 2  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  ( ( R  .\/  U )  ./\  ( Q  .\/  V ) )  e.  A )
999, 98syl5eqel 2496 1  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  R  .<_  ( P 
.\/  Q ) ) )  ->  F  e.  A )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 186    /\ wa 369    /\ w3a 976    = wceq 1407    e. wcel 1844    =/= wne 2600   class class class wbr 4397   ` cfv 5571  (class class class)co 6280   Basecbs 14843   lecple 14918   joincjn 15899   meetcmee 15900   0.cp0 15993   Latclat 16001   Atomscatm 32294   HLchlt 32381   Linesclines 32524   pmapcpmap 32527   LHypclh 33014
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1641  ax-4 1654  ax-5 1727  ax-6 1773  ax-7 1816  ax-8 1846  ax-9 1848  ax-10 1863  ax-11 1868  ax-12 1880  ax-13 2028  ax-ext 2382  ax-rep 4509  ax-sep 4519  ax-nul 4527  ax-pow 4574  ax-pr 4632  ax-un 6576
This theorem depends on definitions:  df-bi 187  df-or 370  df-an 371  df-3an 978  df-tru 1410  df-ex 1636  df-nf 1640  df-sb 1766  df-eu 2244  df-mo 2245  df-clab 2390  df-cleq 2396  df-clel 2399  df-nfc 2554  df-ne 2602  df-ral 2761  df-rex 2762  df-reu 2763  df-rab 2765  df-v 3063  df-sbc 3280  df-csb 3376  df-dif 3419  df-un 3421  df-in 3423  df-ss 3430  df-nul 3741  df-if 3888  df-pw 3959  df-sn 3975  df-pr 3977  df-op 3981  df-uni 4194  df-iun 4275  df-iin 4276  df-br 4398  df-opab 4456  df-mpt 4457  df-id 4740  df-xp 4831  df-rel 4832  df-cnv 4833  df-co 4834  df-dm 4835  df-rn 4836  df-res 4837  df-ima 4838  df-iota 5535  df-fun 5573  df-fn 5574  df-f 5575  df-f1 5576  df-fo 5577  df-f1o 5578  df-fv 5579  df-riota 6242  df-ov 6283  df-oprab 6284  df-mpt2 6285  df-1st 6786  df-2nd 6787  df-preset 15883  df-poset 15901  df-plt 15914  df-lub 15930  df-glb 15931  df-join 15932  df-meet 15933  df-p0 15995  df-p1 15996  df-lat 16002  df-clat 16064  df-oposet 32207  df-ol 32209  df-oml 32210  df-covers 32297  df-ats 32298  df-atl 32329  df-cvlat 32353  df-hlat 32382  df-lines 32531  df-psubsp 32533  df-pmap 32534  df-padd 32826  df-lhyp 33018
This theorem is referenced by:  cdleme3fa  33267
  Copyright terms: Public domain W3C validator