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

Theorem dalem59 29845
Description: Lemma for dath 29850. Analog of dalem57 29843 for  F. (Contributed by NM, 10-Aug-2012.)
Hypotheses
Ref Expression
dalem.ph  |-  ( ph  <->  ( ( ( K  e.  HL  /\  C  e.  ( Base `  K
) )  /\  ( P  e.  A  /\  Q  e.  A  /\  R  e.  A )  /\  ( S  e.  A  /\  T  e.  A  /\  U  e.  A
) )  /\  ( Y  e.  O  /\  Z  e.  O )  /\  ( ( -.  C  .<_  ( P  .\/  Q
)  /\  -.  C  .<_  ( Q  .\/  R
)  /\  -.  C  .<_  ( R  .\/  P
) )  /\  ( -.  C  .<_  ( S 
.\/  T )  /\  -.  C  .<_  ( T 
.\/  U )  /\  -.  C  .<_  ( U 
.\/  S ) )  /\  ( C  .<_  ( P  .\/  S )  /\  C  .<_  ( Q 
.\/  T )  /\  C  .<_  ( R  .\/  U ) ) ) ) )
dalem.l  |-  .<_  =  ( le `  K )
dalem.j  |-  .\/  =  ( join `  K )
dalem.a  |-  A  =  ( Atoms `  K )
dalem.ps  |-  ( ps  <->  ( ( c  e.  A  /\  d  e.  A
)  /\  -.  c  .<_  Y  /\  ( d  =/=  c  /\  -.  d  .<_  Y  /\  C  .<_  ( c  .\/  d
) ) ) )
dalem59.m  |-  ./\  =  ( meet `  K )
dalem59.o  |-  O  =  ( LPlanes `  K )
dalem59.y  |-  Y  =  ( ( P  .\/  Q )  .\/  R )
dalem59.z  |-  Z  =  ( ( S  .\/  T )  .\/  U )
dalem59.f  |-  F  =  ( ( R  .\/  P )  ./\  ( U  .\/  S ) )
dalem59.g  |-  G  =  ( ( c  .\/  P )  ./\  ( d  .\/  S ) )
dalem59.h  |-  H  =  ( ( c  .\/  Q )  ./\  ( d  .\/  T ) )
dalem59.i  |-  I  =  ( ( c  .\/  R )  ./\  ( d  .\/  U ) )
dalem59.b1  |-  B  =  ( ( ( G 
.\/  H )  .\/  I )  ./\  Y
)
Assertion
Ref Expression
dalem59  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  F  .<_  B )

Proof of Theorem dalem59
StepHypRef Expression
1 dalem.ph . . . . 5  |-  ( ph  <->  ( ( ( K  e.  HL  /\  C  e.  ( Base `  K
) )  /\  ( P  e.  A  /\  Q  e.  A  /\  R  e.  A )  /\  ( S  e.  A  /\  T  e.  A  /\  U  e.  A
) )  /\  ( Y  e.  O  /\  Z  e.  O )  /\  ( ( -.  C  .<_  ( P  .\/  Q
)  /\  -.  C  .<_  ( Q  .\/  R
)  /\  -.  C  .<_  ( R  .\/  P
) )  /\  ( -.  C  .<_  ( S 
.\/  T )  /\  -.  C  .<_  ( T 
.\/  U )  /\  -.  C  .<_  ( U 
.\/  S ) )  /\  ( C  .<_  ( P  .\/  S )  /\  C  .<_  ( Q 
.\/  T )  /\  C  .<_  ( R  .\/  U ) ) ) ) )
2 dalem.l . . . . 5  |-  .<_  =  ( le `  K )
3 dalem.j . . . . 5  |-  .\/  =  ( join `  K )
4 dalem.a . . . . 5  |-  A  =  ( Atoms `  K )
5 dalem59.y . . . . 5  |-  Y  =  ( ( P  .\/  Q )  .\/  R )
6 dalem59.z . . . . 5  |-  Z  =  ( ( S  .\/  T )  .\/  U )
71, 2, 3, 4, 5, 6dalemrot 29771 . . . 4  |-  ( ph  ->  ( ( ( K  e.  HL  /\  C  e.  ( Base `  K
) )  /\  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A )  /\  ( T  e.  A  /\  U  e.  A  /\  S  e.  A
) )  /\  (
( ( Q  .\/  R )  .\/  P )  e.  O  /\  (
( T  .\/  U
)  .\/  S )  e.  O )  /\  (
( -.  C  .<_  ( Q  .\/  R )  /\  -.  C  .<_  ( R  .\/  P )  /\  -.  C  .<_  ( P  .\/  Q ) )  /\  ( -.  C  .<_  ( T  .\/  U )  /\  -.  C  .<_  ( U  .\/  S )  /\  -.  C  .<_  ( S  .\/  T
) )  /\  ( C  .<_  ( Q  .\/  T )  /\  C  .<_  ( R  .\/  U )  /\  C  .<_  ( P 
.\/  S ) ) ) ) )
873ad2ant1 978 . . 3  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( ( K  e.  HL  /\  C  e.  ( Base `  K
) )  /\  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A )  /\  ( T  e.  A  /\  U  e.  A  /\  S  e.  A
) )  /\  (
( ( Q  .\/  R )  .\/  P )  e.  O  /\  (
( T  .\/  U
)  .\/  S )  e.  O )  /\  (
( -.  C  .<_  ( Q  .\/  R )  /\  -.  C  .<_  ( R  .\/  P )  /\  -.  C  .<_  ( P  .\/  Q ) )  /\  ( -.  C  .<_  ( T  .\/  U )  /\  -.  C  .<_  ( U  .\/  S )  /\  -.  C  .<_  ( S  .\/  T
) )  /\  ( C  .<_  ( Q  .\/  T )  /\  C  .<_  ( R  .\/  U )  /\  C  .<_  ( P 
.\/  S ) ) ) ) )
91, 2, 3, 4, 5, 6dalemrotyz 29772 . . . 4  |-  ( (
ph  /\  Y  =  Z )  ->  (
( Q  .\/  R
)  .\/  P )  =  ( ( T 
.\/  U )  .\/  S ) )
1093adant3 977 . . 3  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( Q  .\/  R )  .\/  P )  =  ( ( T 
.\/  U )  .\/  S ) )
11 dalem.ps . . . . 5  |-  ( ps  <->  ( ( c  e.  A  /\  d  e.  A
)  /\  -.  c  .<_  Y  /\  ( d  =/=  c  /\  -.  d  .<_  Y  /\  C  .<_  ( c  .\/  d
) ) ) )
121, 2, 3, 4, 11, 5dalemrotps 29805 . . . 4  |-  ( (
ph  /\  ps )  ->  ( ( c  e.  A  /\  d  e.  A )  /\  -.  c  .<_  ( ( Q 
.\/  R )  .\/  P )  /\  ( d  =/=  c  /\  -.  d  .<_  ( ( Q 
.\/  R )  .\/  P )  /\  C  .<_  ( c  .\/  d ) ) ) )
13123adant2 976 . . 3  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( c  e.  A  /\  d  e.  A )  /\  -.  c  .<_  ( ( Q 
.\/  R )  .\/  P )  /\  ( d  =/=  c  /\  -.  d  .<_  ( ( Q 
.\/  R )  .\/  P )  /\  C  .<_  ( c  .\/  d ) ) ) )
14 biid 228 . . . 4  |-  ( ( ( ( K  e.  HL  /\  C  e.  ( Base `  K
) )  /\  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A )  /\  ( T  e.  A  /\  U  e.  A  /\  S  e.  A
) )  /\  (
( ( Q  .\/  R )  .\/  P )  e.  O  /\  (
( T  .\/  U
)  .\/  S )  e.  O )  /\  (
( -.  C  .<_  ( Q  .\/  R )  /\  -.  C  .<_  ( R  .\/  P )  /\  -.  C  .<_  ( P  .\/  Q ) )  /\  ( -.  C  .<_  ( T  .\/  U )  /\  -.  C  .<_  ( U  .\/  S )  /\  -.  C  .<_  ( S  .\/  T
) )  /\  ( C  .<_  ( Q  .\/  T )  /\  C  .<_  ( R  .\/  U )  /\  C  .<_  ( P 
.\/  S ) ) ) )  <->  ( (
( K  e.  HL  /\  C  e.  ( Base `  K ) )  /\  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A
)  /\  ( T  e.  A  /\  U  e.  A  /\  S  e.  A ) )  /\  ( ( ( Q 
.\/  R )  .\/  P )  e.  O  /\  ( ( T  .\/  U )  .\/  S )  e.  O )  /\  ( ( -.  C  .<_  ( Q  .\/  R
)  /\  -.  C  .<_  ( R  .\/  P
)  /\  -.  C  .<_  ( P  .\/  Q
) )  /\  ( -.  C  .<_  ( T 
.\/  U )  /\  -.  C  .<_  ( U 
.\/  S )  /\  -.  C  .<_  ( S 
.\/  T ) )  /\  ( C  .<_  ( Q  .\/  T )  /\  C  .<_  ( R 
.\/  U )  /\  C  .<_  ( P  .\/  S ) ) ) ) )
15 biid 228 . . . 4  |-  ( ( ( c  e.  A  /\  d  e.  A
)  /\  -.  c  .<_  ( ( Q  .\/  R )  .\/  P )  /\  ( d  =/=  c  /\  -.  d  .<_  ( ( Q  .\/  R )  .\/  P )  /\  C  .<_  ( c 
.\/  d ) ) )  <->  ( ( c  e.  A  /\  d  e.  A )  /\  -.  c  .<_  ( ( Q 
.\/  R )  .\/  P )  /\  ( d  =/=  c  /\  -.  d  .<_  ( ( Q 
.\/  R )  .\/  P )  /\  C  .<_  ( c  .\/  d ) ) ) )
16 dalem59.m . . . 4  |-  ./\  =  ( meet `  K )
17 dalem59.o . . . 4  |-  O  =  ( LPlanes `  K )
18 eqid 2387 . . . 4  |-  ( ( Q  .\/  R ) 
.\/  P )  =  ( ( Q  .\/  R )  .\/  P )
19 eqid 2387 . . . 4  |-  ( ( T  .\/  U ) 
.\/  S )  =  ( ( T  .\/  U )  .\/  S )
20 dalem59.f . . . 4  |-  F  =  ( ( R  .\/  P )  ./\  ( U  .\/  S ) )
21 dalem59.h . . . 4  |-  H  =  ( ( c  .\/  Q )  ./\  ( d  .\/  T ) )
22 dalem59.i . . . 4  |-  I  =  ( ( c  .\/  R )  ./\  ( d  .\/  U ) )
23 dalem59.g . . . 4  |-  G  =  ( ( c  .\/  P )  ./\  ( d  .\/  S ) )
24 eqid 2387 . . . 4  |-  ( ( ( H  .\/  I
)  .\/  G )  ./\  ( ( Q  .\/  R )  .\/  P ) )  =  ( ( ( H  .\/  I
)  .\/  G )  ./\  ( ( Q  .\/  R )  .\/  P ) )
2514, 2, 3, 4, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24dalem58 29844 . . 3  |-  ( ( ( ( ( K  e.  HL  /\  C  e.  ( Base `  K
) )  /\  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A )  /\  ( T  e.  A  /\  U  e.  A  /\  S  e.  A
) )  /\  (
( ( Q  .\/  R )  .\/  P )  e.  O  /\  (
( T  .\/  U
)  .\/  S )  e.  O )  /\  (
( -.  C  .<_  ( Q  .\/  R )  /\  -.  C  .<_  ( R  .\/  P )  /\  -.  C  .<_  ( P  .\/  Q ) )  /\  ( -.  C  .<_  ( T  .\/  U )  /\  -.  C  .<_  ( U  .\/  S )  /\  -.  C  .<_  ( S  .\/  T
) )  /\  ( C  .<_  ( Q  .\/  T )  /\  C  .<_  ( R  .\/  U )  /\  C  .<_  ( P 
.\/  S ) ) ) )  /\  (
( Q  .\/  R
)  .\/  P )  =  ( ( T 
.\/  U )  .\/  S )  /\  ( ( c  e.  A  /\  d  e.  A )  /\  -.  c  .<_  ( ( Q  .\/  R ) 
.\/  P )  /\  ( d  =/=  c  /\  -.  d  .<_  ( ( Q  .\/  R ) 
.\/  P )  /\  C  .<_  ( c  .\/  d ) ) ) )  ->  F  .<_  ( ( ( H  .\/  I )  .\/  G
)  ./\  ( ( Q  .\/  R )  .\/  P ) ) )
268, 10, 13, 25syl3anc 1184 . 2  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  F  .<_  ( ( ( H  .\/  I ) 
.\/  G )  ./\  ( ( Q  .\/  R )  .\/  P ) ) )
271dalemkehl 29737 . . . . . 6  |-  ( ph  ->  K  e.  HL )
28273ad2ant1 978 . . . . 5  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  K  e.  HL )
291, 2, 3, 4, 11, 16, 17, 5, 6, 21dalem29 29815 . . . . 5  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  H  e.  A )
301, 2, 3, 4, 11, 16, 17, 5, 6, 22dalem34 29820 . . . . 5  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  I  e.  A )
311, 2, 3, 4, 11, 16, 17, 5, 6, 23dalem23 29810 . . . . 5  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  G  e.  A )
323, 4hlatjrot 29487 . . . . 5  |-  ( ( K  e.  HL  /\  ( H  e.  A  /\  I  e.  A  /\  G  e.  A
) )  ->  (
( H  .\/  I
)  .\/  G )  =  ( ( G 
.\/  H )  .\/  I ) )
3328, 29, 30, 31, 32syl13anc 1186 . . . 4  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( H  .\/  I )  .\/  G
)  =  ( ( G  .\/  H ) 
.\/  I ) )
341, 3, 4dalemqrprot 29762 . . . . . 6  |-  ( ph  ->  ( ( Q  .\/  R )  .\/  P )  =  ( ( P 
.\/  Q )  .\/  R ) )
3534, 5syl6eqr 2437 . . . . 5  |-  ( ph  ->  ( ( Q  .\/  R )  .\/  P )  =  Y )
36353ad2ant1 978 . . . 4  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( Q  .\/  R )  .\/  P )  =  Y )
3733, 36oveq12d 6038 . . 3  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( ( H 
.\/  I )  .\/  G )  ./\  ( ( Q  .\/  R )  .\/  P ) )  =  ( ( ( G  .\/  H )  .\/  I ) 
./\  Y ) )
38 dalem59.b1 . . 3  |-  B  =  ( ( ( G 
.\/  H )  .\/  I )  ./\  Y
)
3937, 38syl6eqr 2437 . 2  |-  ( (
ph  /\  Y  =  Z  /\  ps )  -> 
( ( ( H 
.\/  I )  .\/  G )  ./\  ( ( Q  .\/  R )  .\/  P ) )  =  B )
4026, 39breqtrd 4177 1  |-  ( (
ph  /\  Y  =  Z  /\  ps )  ->  F  .<_  B )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 177    /\ wa 359    /\ w3a 936    = wceq 1649    e. wcel 1717    =/= wne 2550   class class class wbr 4153   ` cfv 5394  (class class class)co 6020   Basecbs 13396   lecple 13463   joincjn 14328   meetcmee 14329   Atomscatm 29378   HLchlt 29465   LPlanesclpl 29606
This theorem is referenced by:  dalem61  29847
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1661  ax-8 1682  ax-13 1719  ax-14 1721  ax-6 1736  ax-7 1741  ax-11 1753  ax-12 1939  ax-ext 2368  ax-rep 4261  ax-sep 4271  ax-nul 4279  ax-pow 4318  ax-pr 4344  ax-un 4641
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2242  df-mo 2243  df-clab 2374  df-cleq 2380  df-clel 2383  df-nfc 2512  df-ne 2552  df-nel 2553  df-ral 2654  df-rex 2655  df-reu 2656  df-rab 2658  df-v 2901  df-sbc 3105  df-csb 3195  df-dif 3266  df-un 3268  df-in 3270  df-ss 3277  df-nul 3572  df-if 3683  df-pw 3744  df-sn 3763  df-pr 3764  df-op 3766  df-uni 3958  df-iun 4037  df-br 4154  df-opab 4208  df-mpt 4209  df-id 4439  df-xp 4824  df-rel 4825  df-cnv 4826  df-co 4827  df-dm 4828  df-rn 4829  df-res 4830  df-ima 4831  df-iota 5358  df-fun 5396  df-fn 5397  df-f 5398  df-f1 5399  df-fo 5400  df-f1o 5401  df-fv 5402  df-ov 6023  df-oprab 6024  df-mpt2 6025  df-1st 6288  df-2nd 6289  df-undef 6479  df-riota 6485  df-poset 14330  df-plt 14342  df-lub 14358  df-glb 14359  df-join 14360  df-meet 14361  df-p0 14395  df-lat 14402  df-clat 14464  df-oposet 29291  df-ol 29293  df-oml 29294  df-covers 29381  df-ats 29382  df-atl 29413  df-cvlat 29437  df-hlat 29466  df-llines 29612  df-lplanes 29613  df-lvols 29614
  Copyright terms: Public domain W3C validator