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

Theorem cdleme7ga 29588
Description: Part of proof of Lemma E in [Crawley] p. 113. See cdleme7 29589. (Contributed by NM, 8-Jun-2012.)
Hypotheses
Ref Expression
cdleme4.l  |-  .<_  =  ( le `  K )
cdleme4.j  |-  .\/  =  ( join `  K )
cdleme4.m  |-  ./\  =  ( meet `  K )
cdleme4.a  |-  A  =  ( Atoms `  K )
cdleme4.h  |-  H  =  ( LHyp `  K
)
cdleme4.u  |-  U  =  ( ( P  .\/  Q )  ./\  W )
cdleme4.f  |-  F  =  ( ( S  .\/  U )  ./\  ( Q  .\/  ( ( P  .\/  S )  ./\  W )
) )
cdleme4.g  |-  G  =  ( ( P  .\/  Q )  ./\  ( F  .\/  ( ( R  .\/  S )  ./\  W )
) )
Assertion
Ref Expression
cdleme7ga  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  G  e.  A )

Proof of Theorem cdleme7ga
StepHypRef Expression
1 cdleme4.g . 2  |-  G  =  ( ( P  .\/  Q )  ./\  ( F  .\/  ( ( R  .\/  S )  ./\  W )
) )
2 simp11l 1071 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  K  e.  HL )
3 simp12l 1073 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  P  e.  A )
4 simp13l 1075 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  Q  e.  A )
5 eqid 2256 . . . . 5  |-  ( Base `  K )  =  (
Base `  K )
6 cdleme4.j . . . . 5  |-  .\/  =  ( join `  K )
7 cdleme4.a . . . . 5  |-  A  =  ( Atoms `  K )
85, 6, 7hlatjcl 28707 . . . 4  |-  ( ( K  e.  HL  /\  P  e.  A  /\  Q  e.  A )  ->  ( P  .\/  Q
)  e.  ( Base `  K ) )
92, 3, 4, 8syl3anc 1187 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( P  .\/  Q
)  e.  ( Base `  K ) )
10 simp11 990 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( K  e.  HL  /\  W  e.  H ) )
11 simp12 991 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( P  e.  A  /\  -.  P  .<_  W ) )
12 simp13 992 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( Q  e.  A  /\  -.  Q  .<_  W ) )
13 simp2r 987 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( S  e.  A  /\  -.  S  .<_  W ) )
14 simp31 996 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  P  =/=  Q )
15 simp33 998 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  -.  S  .<_  ( P 
.\/  Q ) )
16 cdleme4.l . . . . . 6  |-  .<_  =  ( le `  K )
17 cdleme4.m . . . . . 6  |-  ./\  =  ( meet `  K )
18 cdleme4.h . . . . . 6  |-  H  =  ( LHyp `  K
)
19 cdleme4.u . . . . . 6  |-  U  =  ( ( P  .\/  Q )  ./\  W )
20 cdleme4.f . . . . . 6  |-  F  =  ( ( S  .\/  U )  ./\  ( Q  .\/  ( ( P  .\/  S )  ./\  W )
) )
2116, 6, 17, 7, 18, 19, 20cdleme3fa 29576 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  S  .<_  ( P 
.\/  Q ) ) )  ->  F  e.  A )
2210, 11, 12, 13, 14, 15, 21syl132anc 1205 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  F  e.  A )
23 simp2l 986 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( R  e.  A  /\  -.  R  .<_  W ) )
24 simp2rl 1029 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  S  e.  A )
25 simp32 997 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  R  .<_  ( P  .\/  Q ) )
26 eqid 2256 . . . . . 6  |-  ( ( R  .\/  S ) 
./\  W )  =  ( ( R  .\/  S )  ./\  W )
2716, 6, 17, 7, 18, 19, 20, 1, 26cdleme7b 29584 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  ( P 
.\/  Q )  /\  R  .<_  ( P  .\/  Q ) ) )  -> 
( ( R  .\/  S )  ./\  W )  e.  A )
2810, 23, 24, 15, 25, 27syl113anc 1199 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( R  .\/  S )  ./\  W )  e.  A )
295, 6, 7hlatjcl 28707 . . . 4  |-  ( ( K  e.  HL  /\  F  e.  A  /\  ( ( R  .\/  S )  ./\  W )  e.  A )  ->  ( F  .\/  ( ( R 
.\/  S )  ./\  W ) )  e.  (
Base `  K )
)
302, 22, 28, 29syl3anc 1187 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( F  .\/  (
( R  .\/  S
)  ./\  W )
)  e.  ( Base `  K ) )
31 hllat 28704 . . . . 5  |-  ( K  e.  HL  ->  K  e.  Lat )
322, 31syl 17 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  K  e.  Lat )
33 eqid 2256 . . . . 5  |-  ( Lines `  K )  =  (
Lines `  K )
34 eqid 2256 . . . . 5  |-  ( pmap `  K )  =  (
pmap `  K )
356, 7, 33, 34linepmap 29115 . . . 4  |-  ( ( ( K  e.  Lat  /\  P  e.  A  /\  Q  e.  A )  /\  P  =/=  Q
)  ->  ( ( pmap `  K ) `  ( P  .\/  Q ) )  e.  ( Lines `  K ) )
3632, 3, 4, 14, 35syl31anc 1190 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( pmap `  K
) `  ( P  .\/  Q ) )  e.  ( Lines `  K )
)
37 simp2ll 1027 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  R  e.  A )
385, 6, 7hlatjcl 28707 . . . . . . 7  |-  ( ( K  e.  HL  /\  R  e.  A  /\  S  e.  A )  ->  ( R  .\/  S
)  e.  ( Base `  K ) )
392, 37, 24, 38syl3anc 1187 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( R  .\/  S
)  e.  ( Base `  K ) )
40 simp11r 1072 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  W  e.  H )
415, 18lhpbase 29338 . . . . . . 7  |-  ( W  e.  H  ->  W  e.  ( Base `  K
) )
4240, 41syl 17 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  W  e.  ( Base `  K ) )
435, 16, 17latmle2 14131 . . . . . 6  |-  ( ( K  e.  Lat  /\  ( R  .\/  S )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( R  .\/  S )  ./\  W )  .<_  W )
4432, 39, 42, 43syl3anc 1187 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( R  .\/  S )  ./\  W )  .<_  W )
4516, 6, 17, 7, 18, 19, 20cdleme3 29577 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  -.  S  .<_  ( P 
.\/  Q ) ) )  ->  -.  F  .<_  W )
4610, 11, 12, 13, 14, 15, 45syl132anc 1205 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  -.  F  .<_  W )
47 nbrne2 4001 . . . . . 6  |-  ( ( ( ( R  .\/  S )  ./\  W )  .<_  W  /\  -.  F  .<_  W )  ->  (
( R  .\/  S
)  ./\  W )  =/=  F )
4847necomd 2502 . . . . 5  |-  ( ( ( ( R  .\/  S )  ./\  W )  .<_  W  /\  -.  F  .<_  W )  ->  F  =/=  ( ( R  .\/  S )  ./\  W )
)
4944, 46, 48syl2anc 645 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  F  =/=  ( ( R 
.\/  S )  ./\  W ) )
506, 7, 33, 34linepmap 29115 . . . 4  |-  ( ( ( K  e.  Lat  /\  F  e.  A  /\  ( ( R  .\/  S )  ./\  W )  e.  A )  /\  F  =/=  ( ( R  .\/  S )  ./\  W )
)  ->  ( ( pmap `  K ) `  ( F  .\/  ( ( R  .\/  S ) 
./\  W ) ) )  e.  ( Lines `  K ) )
5132, 22, 28, 49, 50syl31anc 1190 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( pmap `  K
) `  ( F  .\/  ( ( R  .\/  S )  ./\  W )
) )  e.  (
Lines `  K ) )
525, 7atbase 28630 . . . . . 6  |-  ( F  e.  A  ->  F  e.  ( Base `  K
) )
5322, 52syl 17 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  F  e.  ( Base `  K ) )
545, 17latmcl 14105 . . . . . 6  |-  ( ( K  e.  Lat  /\  ( R  .\/  S )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( R  .\/  S )  ./\  W )  e.  ( Base `  K ) )
5532, 39, 42, 54syl3anc 1187 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( R  .\/  S )  ./\  W )  e.  ( Base `  K
) )
565, 16, 6latlej2 14115 . . . . 5  |-  ( ( K  e.  Lat  /\  F  e.  ( Base `  K )  /\  (
( R  .\/  S
)  ./\  W )  e.  ( Base `  K
) )  ->  (
( R  .\/  S
)  ./\  W )  .<_  ( F  .\/  (
( R  .\/  S
)  ./\  W )
) )
5732, 53, 55, 56syl3anc 1187 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( R  .\/  S )  ./\  W )  .<_  ( F  .\/  (
( R  .\/  S
)  ./\  W )
) )
5816, 6, 17, 7, 18, 19, 20, 1, 26cdleme7c 29585 . . . . . . . 8  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  Q  e.  A
)  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P 
.\/  Q )  /\  -.  S  .<_  ( P 
.\/  Q ) ) )  ->  U  =/=  ( ( R  .\/  S )  ./\  W )
)
5910, 11, 4, 23, 13, 14, 25, 15, 58syl323anc 1217 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  U  =/=  ( ( R 
.\/  S )  ./\  W ) )
6059necomd 2502 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( R  .\/  S )  ./\  W )  =/=  U )
61 hlatl 28701 . . . . . . . 8  |-  ( K  e.  HL  ->  K  e.  AtLat )
622, 61syl 17 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  K  e.  AtLat )
6316, 6, 17, 7, 18, 19lhpat2 29385 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  P  =/=  Q ) )  ->  U  e.  A
)
6410, 11, 4, 14, 63syl112anc 1191 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  U  e.  A )
6516, 7atncmp 28653 . . . . . . 7  |-  ( ( K  e.  AtLat  /\  (
( R  .\/  S
)  ./\  W )  e.  A  /\  U  e.  A )  ->  ( -.  ( ( R  .\/  S )  ./\  W )  .<_  U  <->  ( ( R 
.\/  S )  ./\  W )  =/=  U ) )
6662, 28, 64, 65syl3anc 1187 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( -.  ( ( R  .\/  S ) 
./\  W )  .<_  U 
<->  ( ( R  .\/  S )  ./\  W )  =/=  U ) )
6760, 66mpbird 225 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  -.  ( ( R  .\/  S )  ./\  W )  .<_  U )
685, 16, 17latlem12 14132 . . . . . . . . 9  |-  ( ( K  e.  Lat  /\  ( ( ( R 
.\/  S )  ./\  W )  e.  ( Base `  K )  /\  ( P  .\/  Q )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
) )  ->  (
( ( ( R 
.\/  S )  ./\  W )  .<_  ( P  .\/  Q )  /\  (
( R  .\/  S
)  ./\  W )  .<_  W )  <->  ( ( R  .\/  S )  ./\  W )  .<_  ( ( P  .\/  Q )  ./\  W ) ) )
6932, 55, 9, 42, 68syl13anc 1189 . . . . . . . 8  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( ( ( R  .\/  S ) 
./\  W )  .<_  ( P  .\/  Q )  /\  ( ( R 
.\/  S )  ./\  W )  .<_  W )  <->  ( ( R  .\/  S
)  ./\  W )  .<_  ( ( P  .\/  Q )  ./\  W )
) )
7069biimpd 200 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( ( ( R  .\/  S ) 
./\  W )  .<_  ( P  .\/  Q )  /\  ( ( R 
.\/  S )  ./\  W )  .<_  W )  ->  ( ( R  .\/  S )  ./\  W )  .<_  ( ( P  .\/  Q )  ./\  W )
) )
7144, 70mpan2d 658 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( ( R 
.\/  S )  ./\  W )  .<_  ( P  .\/  Q )  ->  (
( R  .\/  S
)  ./\  W )  .<_  ( ( P  .\/  Q )  ./\  W )
) )
7219breq2i 3991 . . . . . 6  |-  ( ( ( R  .\/  S
)  ./\  W )  .<_  U  <->  ( ( R 
.\/  S )  ./\  W )  .<_  ( ( P  .\/  Q )  ./\  W ) )
7371, 72syl6ibr 220 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( ( R 
.\/  S )  ./\  W )  .<_  ( P  .\/  Q )  ->  (
( R  .\/  S
)  ./\  W )  .<_  U ) )
7467, 73mtod 170 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  -.  ( ( R  .\/  S )  ./\  W )  .<_  ( P  .\/  Q
) )
75 nbrne1 4000 . . . . 5  |-  ( ( ( ( R  .\/  S )  ./\  W )  .<_  ( F  .\/  (
( R  .\/  S
)  ./\  W )
)  /\  -.  (
( R  .\/  S
)  ./\  W )  .<_  ( P  .\/  Q
) )  ->  ( F  .\/  ( ( R 
.\/  S )  ./\  W ) )  =/=  ( P  .\/  Q ) )
7675necomd 2502 . . . 4  |-  ( ( ( ( R  .\/  S )  ./\  W )  .<_  ( F  .\/  (
( R  .\/  S
)  ./\  W )
)  /\  -.  (
( R  .\/  S
)  ./\  W )  .<_  ( P  .\/  Q
) )  ->  ( P  .\/  Q )  =/=  ( F  .\/  (
( R  .\/  S
)  ./\  W )
) )
7757, 74, 76syl2anc 645 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( P  .\/  Q
)  =/=  ( F 
.\/  ( ( R 
.\/  S )  ./\  W ) ) )
7816, 6, 17, 7, 18, 19, 20, 1, 26cdleme7e 29587 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  G  =/=  ( 0. `  K ) )
791, 78syl5eqner 2444 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( P  .\/  Q )  ./\  ( F  .\/  ( ( R  .\/  S )  ./\  W )
) )  =/=  ( 0. `  K ) )
80 eqid 2256 . . . 4  |-  ( 0.
`  K )  =  ( 0. `  K
)
815, 17, 80, 7, 33, 342lnat 29124 . . 3  |-  ( ( ( K  e.  HL  /\  ( P  .\/  Q
)  e.  ( Base `  K )  /\  ( F  .\/  ( ( R 
.\/  S )  ./\  W ) )  e.  (
Base `  K )
)  /\  ( (
( pmap `  K ) `  ( P  .\/  Q
) )  e.  (
Lines `  K )  /\  ( ( pmap `  K
) `  ( F  .\/  ( ( R  .\/  S )  ./\  W )
) )  e.  (
Lines `  K ) )  /\  ( ( P 
.\/  Q )  =/=  ( F  .\/  (
( R  .\/  S
)  ./\  W )
)  /\  ( ( P  .\/  Q )  ./\  ( F  .\/  ( ( R  .\/  S ) 
./\  W ) ) )  =/=  ( 0.
`  K ) ) )  ->  ( ( P  .\/  Q )  ./\  ( F  .\/  ( ( R  .\/  S ) 
./\  W ) ) )  e.  A )
822, 9, 30, 36, 51, 77, 79, 81syl322anc 1215 . 2  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  -> 
( ( P  .\/  Q )  ./\  ( F  .\/  ( ( R  .\/  S )  ./\  W )
) )  e.  A
)
831, 82syl5eqel 2340 1  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( ( R  e.  A  /\  -.  R  .<_  W )  /\  ( S  e.  A  /\  -.  S  .<_  W ) )  /\  ( P  =/=  Q  /\  R  .<_  ( P  .\/  Q
)  /\  -.  S  .<_  ( P  .\/  Q
) ) )  ->  G  e.  A )
Colors of variables: wff set class
Syntax hints:   -. wn 5    -> wi 6    <-> wb 178    /\ wa 360    /\ w3a 939    = wceq 1619    e. wcel 1621    =/= wne 2419   class class class wbr 3983   ` cfv 4659  (class class class)co 5778   Basecbs 13096   lecple 13163   joincjn 14026   meetcmee 14027   0.cp0 14091   Latclat 14099   Atomscatm 28604   AtLatcal 28605   HLchlt 28691   Linesclines 28834   pmapcpmap 28837   LHypclh 29324
This theorem is referenced by:  cdleme7  29589  cdleme18c  29633  cdleme22f2  29687  cdlemefs32sn1aw  29754
This theorem was proved from axioms:  ax-1 7  ax-2 8  ax-3 9  ax-mp 10  ax-5 1533  ax-6 1534  ax-7 1535  ax-gen 1536  ax-8 1623  ax-11 1624  ax-13 1625  ax-14 1626  ax-17 1628  ax-12o 1664  ax-10 1678  ax-9 1684  ax-4 1692  ax-16 1927  ax-ext 2237  ax-rep 4091  ax-sep 4101  ax-nul 4109  ax-pow 4146  ax-pr 4172  ax-un 4470
This theorem depends on definitions:  df-bi 179  df-or 361  df-an 362  df-3an 941  df-tru 1315  df-ex 1538  df-nf 1540  df-sb 1884  df-eu 2121  df-mo 2122  df-clab 2243  df-cleq 2249  df-clel 2252  df-nfc 2381  df-ne 2421  df-nel 2422  df-ral 2521  df-rex 2522  df-reu 2523  df-rab 2525  df-v 2759  df-sbc 2953  df-csb 3043  df-dif 3116  df-un 3118  df-in 3120  df-ss 3127  df-nul 3417  df-if 3526  df-pw 3587  df-sn 3606  df-pr 3607  df-op 3609  df-uni 3788  df-iun 3867  df-iin 3868  df-br 3984  df-opab 4038  df-mpt 4039  df-id 4267  df-xp 4661  df-rel 4662  df-cnv 4663  df-co 4664  df-dm 4665  df-rn 4666  df-res 4667  df-ima 4668  df-fun 4669  df-fn 4670  df-f 4671  df-f1 4672  df-fo 4673  df-f1o 4674  df-fv 4675  df-ov 5781  df-oprab 5782  df-mpt2 5783  df-1st 6042  df-2nd 6043  df-iota 6211  df-undef 6250  df-riota 6258  df-poset 14028  df-plt 14040  df-lub 14056  df-glb 14057  df-join 14058  df-meet 14059  df-p0 14093  df-p1 14094  df-lat 14100  df-clat 14162  df-oposet 28517  df-ol 28519  df-oml 28520  df-covers 28607  df-ats 28608  df-atl 28639  df-cvlat 28663  df-hlat 28692  df-lines 28841  df-psubsp 28843  df-pmap 28844  df-padd 29136  df-lhyp 29328
  Copyright terms: Public domain W3C validator