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

Theorem cdlemc5 34148
Description: Lemma for cdlemc 34150. (Contributed by NM, 26-May-2012.)
Hypotheses
Ref Expression
cdlemc3.l  |-  .<_  =  ( le `  K )
cdlemc3.j  |-  .\/  =  ( join `  K )
cdlemc3.m  |-  ./\  =  ( meet `  K )
cdlemc3.a  |-  A  =  ( Atoms `  K )
cdlemc3.h  |-  H  =  ( LHyp `  K
)
cdlemc3.t  |-  T  =  ( ( LTrn `  K
) `  W )
cdlemc3.r  |-  R  =  ( ( trL `  K
) `  W )
Assertion
Ref Expression
cdlemc5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  =  ( ( Q  .\/  ( R `
 F ) ) 
./\  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) )

Proof of Theorem cdlemc5
StepHypRef Expression
1 simp1l 1012 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  K  e.  HL )
2 simp23l 1109 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  Q  e.  A )
3 simp1 988 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( K  e.  HL  /\  W  e.  H ) )
4 simp21 1021 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  F  e.  T )
5 cdlemc3.l . . . . . . 7  |-  .<_  =  ( le `  K )
6 cdlemc3.a . . . . . . 7  |-  A  =  ( Atoms `  K )
7 cdlemc3.h . . . . . . 7  |-  H  =  ( LHyp `  K
)
8 cdlemc3.t . . . . . . 7  |-  T  =  ( ( LTrn `  K
) `  W )
95, 6, 7, 8ltrnat 34093 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  Q  e.  A
)  ->  ( F `  Q )  e.  A
)
103, 4, 2, 9syl3anc 1219 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  e.  A )
11 cdlemc3.j . . . . . 6  |-  .\/  =  ( join `  K )
125, 11, 6hlatlej2 33329 . . . . 5  |-  ( ( K  e.  HL  /\  Q  e.  A  /\  ( F `  Q )  e.  A )  -> 
( F `  Q
)  .<_  ( Q  .\/  ( F `  Q ) ) )
131, 2, 10, 12syl3anc 1219 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  .<_  ( Q  .\/  ( F `  Q ) ) )
14 simp23 1023 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( Q  e.  A  /\  -.  Q  .<_  W ) )
15 cdlemc3.r . . . . . 6  |-  R  =  ( ( trL `  K
) `  W )
165, 11, 6, 7, 8, 15trljat1 34119 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  ->  ( Q  .\/  ( R `  F
) )  =  ( Q  .\/  ( F `
 Q ) ) )
173, 4, 14, 16syl3anc 1219 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( Q  .\/  ( R `  F )
)  =  ( Q 
.\/  ( F `  Q ) ) )
1813, 17breqtrrd 4419 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  .<_  ( Q  .\/  ( R `  F ) ) )
19 simp22 1022 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( P  e.  A  /\  -.  P  .<_  W ) )
20 cdlemc3.m . . . . 5  |-  ./\  =  ( meet `  K )
215, 11, 20, 6, 7, 8cdlemc2 34145 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  ( ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) ) )  ->  ( F `  Q )  .<_  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
) )
223, 4, 19, 14, 21syl112anc 1223 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  .<_  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )
23 hllat 33317 . . . . 5  |-  ( K  e.  HL  ->  K  e.  Lat )
241, 23syl 16 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  K  e.  Lat )
25 eqid 2451 . . . . . . 7  |-  ( Base `  K )  =  (
Base `  K )
2625, 6atbase 33243 . . . . . 6  |-  ( Q  e.  A  ->  Q  e.  ( Base `  K
) )
272, 26syl 16 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  Q  e.  ( Base `  K ) )
2825, 7, 8ltrncl 34078 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  Q  e.  ( Base `  K ) )  ->  ( F `  Q )  e.  (
Base `  K )
)
293, 4, 27, 28syl3anc 1219 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  e.  ( Base `  K ) )
3025, 7, 8, 15trlcl 34117 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T
)  ->  ( R `  F )  e.  (
Base `  K )
)
313, 4, 30syl2anc 661 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( R `  F
)  e.  ( Base `  K ) )
3225, 11latjcl 15332 . . . . 5  |-  ( ( K  e.  Lat  /\  Q  e.  ( Base `  K )  /\  ( R `  F )  e.  ( Base `  K
) )  ->  ( Q  .\/  ( R `  F ) )  e.  ( Base `  K
) )
3324, 27, 31, 32syl3anc 1219 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( Q  .\/  ( R `  F )
)  e.  ( Base `  K ) )
34 simp22l 1107 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  P  e.  A )
3525, 6atbase 33243 . . . . . . 7  |-  ( P  e.  A  ->  P  e.  ( Base `  K
) )
3634, 35syl 16 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  P  e.  ( Base `  K ) )
3725, 7, 8ltrncl 34078 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  P  e.  ( Base `  K ) )  ->  ( F `  P )  e.  (
Base `  K )
)
383, 4, 36, 37syl3anc 1219 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  P
)  e.  ( Base `  K ) )
3925, 11, 6hlatjcl 33320 . . . . . . 7  |-  ( ( K  e.  HL  /\  P  e.  A  /\  Q  e.  A )  ->  ( P  .\/  Q
)  e.  ( Base `  K ) )
401, 34, 2, 39syl3anc 1219 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( P  .\/  Q
)  e.  ( Base `  K ) )
41 simp1r 1013 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  W  e.  H )
4225, 7lhpbase 33951 . . . . . . 7  |-  ( W  e.  H  ->  W  e.  ( Base `  K
) )
4341, 42syl 16 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  W  e.  ( Base `  K ) )
4425, 20latmcl 15333 . . . . . 6  |-  ( ( K  e.  Lat  /\  ( P  .\/  Q )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( P  .\/  Q )  ./\  W )  e.  ( Base `  K ) )
4524, 40, 43, 44syl3anc 1219 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( P  .\/  Q )  ./\  W )  e.  ( Base `  K
) )
4625, 11latjcl 15332 . . . . 5  |-  ( ( K  e.  Lat  /\  ( F `  P )  e.  ( Base `  K
)  /\  ( ( P  .\/  Q )  ./\  W )  e.  ( Base `  K ) )  -> 
( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
)  e.  ( Base `  K ) )
4724, 38, 45, 46syl3anc 1219 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
)  e.  ( Base `  K ) )
4825, 5, 20latlem12 15359 . . . 4  |-  ( ( K  e.  Lat  /\  ( ( F `  Q )  e.  (
Base `  K )  /\  ( Q  .\/  ( R `  F )
)  e.  ( Base `  K )  /\  (
( F `  P
)  .\/  ( ( P  .\/  Q )  ./\  W ) )  e.  (
Base `  K )
) )  ->  (
( ( F `  Q )  .<_  ( Q 
.\/  ( R `  F ) )  /\  ( F `  Q ) 
.<_  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
) )  <->  ( F `  Q )  .<_  ( ( Q  .\/  ( R `
 F ) ) 
./\  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) ) )
4924, 29, 33, 47, 48syl13anc 1221 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( ( F `
 Q )  .<_  ( Q  .\/  ( R `
 F ) )  /\  ( F `  Q )  .<_  ( ( F `  P ) 
.\/  ( ( P 
.\/  Q )  ./\  W ) ) )  <->  ( F `  Q )  .<_  ( ( Q  .\/  ( R `
 F ) ) 
./\  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) ) )
5018, 22, 49mpbi2and 912 . 2  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  .<_  ( ( Q 
.\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
) ) )
51 hlatl 33314 . . . 4  |-  ( K  e.  HL  ->  K  e.  AtLat )
521, 51syl 16 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  K  e.  AtLat )
53 simp3r 1017 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  P
)  =/=  P )
545, 6, 7, 8, 15trlat 34122 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( F  e.  T  /\  ( F `  P )  =/=  P ) )  ->  ( R `  F )  e.  A
)
553, 19, 4, 53, 54syl112anc 1223 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( R `  F
)  e.  A )
565, 7, 8, 15trlle 34137 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T
)  ->  ( R `  F )  .<_  W )
573, 4, 56syl2anc 661 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( R `  F
)  .<_  W )
58 simp23r 1110 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  -.  Q  .<_  W )
59 nbrne2 4411 . . . . . . 7  |-  ( ( ( R `  F
)  .<_  W  /\  -.  Q  .<_  W )  -> 
( R `  F
)  =/=  Q )
6059necomd 2719 . . . . . 6  |-  ( ( ( R `  F
)  .<_  W  /\  -.  Q  .<_  W )  ->  Q  =/=  ( R `  F ) )
6157, 58, 60syl2anc 661 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  Q  =/=  ( R `  F ) )
62 eqid 2451 . . . . . 6  |-  ( LLines `  K )  =  (
LLines `  K )
6311, 6, 62llni2 33465 . . . . 5  |-  ( ( ( K  e.  HL  /\  Q  e.  A  /\  ( R `  F )  e.  A )  /\  Q  =/=  ( R `  F ) )  -> 
( Q  .\/  ( R `  F )
)  e.  ( LLines `  K ) )
641, 2, 55, 61, 63syl31anc 1222 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( Q  .\/  ( R `  F )
)  e.  ( LLines `  K ) )
655, 6, 7, 8ltrnat 34093 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  P  e.  A
)  ->  ( F `  P )  e.  A
)
663, 4, 34, 65syl3anc 1219 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  P
)  e.  A )
675, 11, 6hlatlej1 33328 . . . . . . . 8  |-  ( ( K  e.  HL  /\  P  e.  A  /\  ( F `  P )  e.  A )  ->  P  .<_  ( P  .\/  ( F `  P ) ) )
681, 34, 66, 67syl3anc 1219 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  P  .<_  ( P  .\/  ( F `  P ) ) )
69 simp3l 1016 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  -.  Q  .<_  ( P 
.\/  ( F `  P ) ) )
70 nbrne2 4411 . . . . . . 7  |-  ( ( P  .<_  ( P  .\/  ( F `  P
) )  /\  -.  Q  .<_  ( P  .\/  ( F `  P ) ) )  ->  P  =/=  Q )
7168, 69, 70syl2anc 661 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  P  =/=  Q )
725, 11, 20, 6, 7lhpat 33996 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  P  =/=  Q ) )  ->  ( ( P 
.\/  Q )  ./\  W )  e.  A )
733, 19, 2, 71, 72syl112anc 1223 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( P  .\/  Q )  ./\  W )  e.  A )
7425, 5, 20latmle2 15358 . . . . . . 7  |-  ( ( K  e.  Lat  /\  ( P  .\/  Q )  e.  ( Base `  K
)  /\  W  e.  ( Base `  K )
)  ->  ( ( P  .\/  Q )  ./\  W )  .<_  W )
7524, 40, 43, 74syl3anc 1219 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( P  .\/  Q )  ./\  W )  .<_  W )
765, 6, 7, 8ltrnel 34092 . . . . . . . 8  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W ) )  ->  ( ( F `  P )  e.  A  /\  -.  ( F `  P )  .<_  W ) )
7776simprd 463 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W ) )  ->  -.  ( F `  P )  .<_  W )
783, 4, 19, 77syl3anc 1219 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  ->  -.  ( F `  P
)  .<_  W )
79 nbrne2 4411 . . . . . . 7  |-  ( ( ( ( P  .\/  Q )  ./\  W )  .<_  W  /\  -.  ( F `  P )  .<_  W )  ->  (
( P  .\/  Q
)  ./\  W )  =/=  ( F `  P
) )
8079necomd 2719 . . . . . 6  |-  ( ( ( ( P  .\/  Q )  ./\  W )  .<_  W  /\  -.  ( F `  P )  .<_  W )  ->  ( F `  P )  =/=  ( ( P  .\/  Q )  ./\  W )
)
8175, 78, 80syl2anc 661 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  P
)  =/=  ( ( P  .\/  Q ) 
./\  W ) )
8211, 6, 62llni2 33465 . . . . 5  |-  ( ( ( K  e.  HL  /\  ( F `  P
)  e.  A  /\  ( ( P  .\/  Q )  ./\  W )  e.  A )  /\  ( F `  P )  =/=  ( ( P  .\/  Q )  ./\  W )
)  ->  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
)  e.  ( LLines `  K ) )
831, 66, 73, 81, 82syl31anc 1222 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
)  e.  ( LLines `  K ) )
845, 11, 20, 6, 7, 8, 15cdlemc4 34147 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  -.  Q  .<_  ( P  .\/  ( F `  P )
) )  ->  ( Q  .\/  ( R `  F ) )  =/=  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
) )
85843adant3r 1216 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( Q  .\/  ( R `  F )
)  =/=  ( ( F `  P ) 
.\/  ( ( P 
.\/  Q )  ./\  W ) ) )
8625, 20latmcl 15333 . . . . . 6  |-  ( ( K  e.  Lat  /\  ( Q  .\/  ( R `
 F ) )  e.  ( Base `  K
)  /\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
)  e.  ( Base `  K ) )  -> 
( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  e.  (
Base `  K )
)
8724, 33, 47, 86syl3anc 1219 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  e.  (
Base `  K )
)
88 eqid 2451 . . . . . 6  |-  ( 0.
`  K )  =  ( 0. `  K
)
8925, 5, 88, 6atlen0 33264 . . . . 5  |-  ( ( ( K  e.  AtLat  /\  ( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  e.  (
Base `  K )  /\  ( F `  Q
)  e.  A )  /\  ( F `  Q )  .<_  ( ( Q  .\/  ( R `
 F ) ) 
./\  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) )  -> 
( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  =/=  ( 0. `  K ) )
9052, 87, 10, 50, 89syl31anc 1222 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  =/=  ( 0. `  K ) )
9120, 88, 6, 622llnmat 33477 . . . 4  |-  ( ( ( K  e.  HL  /\  ( Q  .\/  ( R `  F )
)  e.  ( LLines `  K )  /\  (
( F `  P
)  .\/  ( ( P  .\/  Q )  ./\  W ) )  e.  (
LLines `  K ) )  /\  ( ( Q 
.\/  ( R `  F ) )  =/=  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
)  /\  ( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
) )  =/=  ( 0. `  K ) ) )  ->  ( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  (
( P  .\/  Q
)  ./\  W )
) )  e.  A
)
921, 64, 83, 85, 90, 91syl32anc 1227 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  e.  A
)
935, 6atcmp 33265 . . 3  |-  ( ( K  e.  AtLat  /\  ( F `  Q )  e.  A  /\  (
( Q  .\/  ( R `  F )
)  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  e.  A
)  ->  ( ( F `  Q )  .<_  ( ( Q  .\/  ( R `  F ) )  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  <->  ( F `  Q )  =  ( ( Q  .\/  ( R `  F )
)  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) ) )
9452, 10, 92, 93syl3anc 1219 . 2  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( ( F `  Q )  .<_  ( ( Q  .\/  ( R `
 F ) ) 
./\  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) )  <->  ( F `  Q )  =  ( ( Q  .\/  ( R `  F )
)  ./\  ( ( F `  P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) ) )
9550, 94mpbid 210 1  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( F  e.  T  /\  ( P  e.  A  /\  -.  P  .<_  W )  /\  ( Q  e.  A  /\  -.  Q  .<_  W ) )  /\  ( -.  Q  .<_  ( P  .\/  ( F `  P
) )  /\  ( F `  P )  =/=  P ) )  -> 
( F `  Q
)  =  ( ( Q  .\/  ( R `
 F ) ) 
./\  ( ( F `
 P )  .\/  ( ( P  .\/  Q )  ./\  W )
) ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 184    /\ wa 369    /\ w3a 965    = wceq 1370    e. wcel 1758    =/= wne 2644   class class class wbr 4393   ` cfv 5519  (class class class)co 6193   Basecbs 14285   lecple 14356   joincjn 15225   meetcmee 15226   0.cp0 15318   Latclat 15326   Atomscatm 33217   AtLatcal 33218   HLchlt 33304   LLinesclln 33444   LHypclh 33937   LTrncltrn 34054   trLctrl 34111
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-8 1760  ax-9 1762  ax-10 1777  ax-11 1782  ax-12 1794  ax-13 1952  ax-ext 2430  ax-rep 4504  ax-sep 4514  ax-nul 4522  ax-pow 4571  ax-pr 4632  ax-un 6475
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3an 967  df-tru 1373  df-ex 1588  df-nf 1591  df-sb 1703  df-eu 2264  df-mo 2265  df-clab 2437  df-cleq 2443  df-clel 2446  df-nfc 2601  df-ne 2646  df-ral 2800  df-rex 2801  df-reu 2802  df-rab 2804  df-v 3073  df-sbc 3288  df-csb 3390  df-dif 3432  df-un 3434  df-in 3436  df-ss 3443  df-nul 3739  df-if 3893  df-pw 3963  df-sn 3979  df-pr 3981  df-op 3985  df-uni 4193  df-iun 4274  df-iin 4275  df-br 4394  df-opab 4452  df-mpt 4453  df-id 4737  df-xp 4947  df-rel 4948  df-cnv 4949  df-co 4950  df-dm 4951  df-rn 4952  df-res 4953  df-ima 4954  df-iota 5482  df-fun 5521  df-fn 5522  df-f 5523  df-f1 5524  df-fo 5525  df-f1o 5526  df-fv 5527  df-riota 6154  df-ov 6196  df-oprab 6197  df-mpt2 6198  df-1st 6680  df-2nd 6681  df-map 7319  df-poset 15227  df-plt 15239  df-lub 15255  df-glb 15256  df-join 15257  df-meet 15258  df-p0 15320  df-p1 15321  df-lat 15327  df-clat 15389  df-oposet 33130  df-ol 33132  df-oml 33133  df-covers 33220  df-ats 33221  df-atl 33252  df-cvlat 33276  df-hlat 33305  df-llines 33451  df-psubsp 33456  df-pmap 33457  df-padd 33749  df-lhyp 33941  df-laut 33942  df-ldil 34057  df-ltrn 34058  df-trl 34112
This theorem is referenced by:  cdlemc  34150
  Copyright terms: Public domain W3C validator