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

Theorem dalemrot 30552
Description: Lemma for dath 30631. Rotate triangles  Y  =  P Q R and  Z  =  S T U to allow reuse of analogous proofs. (Contributed by NM, 14-Aug-2012.)
Hypotheses
Ref Expression
dalema.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 ) ) ) ) )
dalemc.l  |-  .<_  =  ( le `  K )
dalemc.j  |-  .\/  =  ( join `  K )
dalemc.a  |-  A  =  ( Atoms `  K )
dalemrot.y  |-  Y  =  ( ( P  .\/  Q )  .\/  R )
dalemrot.z  |-  Z  =  ( ( S  .\/  T )  .\/  U )
Assertion
Ref Expression
dalemrot  |-  ( 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 ) ) ) ) )

Proof of Theorem dalemrot
StepHypRef Expression
1 dalema.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 ) ) ) ) )
21dalemkehl 30518 . . . 4  |-  ( ph  ->  K  e.  HL )
3 dalemc.a . . . . 5  |-  A  =  ( Atoms `  K )
41, 3dalemceb 30533 . . . 4  |-  ( ph  ->  C  e.  ( Base `  K ) )
52, 4jca 520 . . 3  |-  ( ph  ->  ( K  e.  HL  /\  C  e.  ( Base `  K ) ) )
61dalemqea 30522 . . . 4  |-  ( ph  ->  Q  e.  A )
71dalemrea 30523 . . . 4  |-  ( ph  ->  R  e.  A )
81dalempea 30521 . . . 4  |-  ( ph  ->  P  e.  A )
96, 7, 83jca 1135 . . 3  |-  ( ph  ->  ( Q  e.  A  /\  R  e.  A  /\  P  e.  A
) )
101dalemtea 30525 . . . 4  |-  ( ph  ->  T  e.  A )
111dalemuea 30526 . . . 4  |-  ( ph  ->  U  e.  A )
121dalemsea 30524 . . . 4  |-  ( ph  ->  S  e.  A )
1310, 11, 123jca 1135 . . 3  |-  ( ph  ->  ( T  e.  A  /\  U  e.  A  /\  S  e.  A
) )
145, 9, 133jca 1135 . 2  |-  ( 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
) ) )
15 dalemc.j . . . . 5  |-  .\/  =  ( join `  K )
161, 15, 3dalemqrprot 30543 . . . 4  |-  ( ph  ->  ( ( Q  .\/  R )  .\/  P )  =  ( ( P 
.\/  Q )  .\/  R ) )
17 dalemrot.y . . . . 5  |-  Y  =  ( ( P  .\/  Q )  .\/  R )
181dalemyeo 30527 . . . . 5  |-  ( ph  ->  Y  e.  O )
1917, 18syl5eqelr 2527 . . . 4  |-  ( ph  ->  ( ( P  .\/  Q )  .\/  R )  e.  O )
2016, 19eqeltrd 2516 . . 3  |-  ( ph  ->  ( ( Q  .\/  R )  .\/  P )  e.  O )
2115, 3hlatjrot 30268 . . . . 5  |-  ( ( K  e.  HL  /\  ( T  e.  A  /\  U  e.  A  /\  S  e.  A
) )  ->  (
( T  .\/  U
)  .\/  S )  =  ( ( S 
.\/  T )  .\/  U ) )
222, 10, 11, 12, 21syl13anc 1187 . . . 4  |-  ( ph  ->  ( ( T  .\/  U )  .\/  S )  =  ( ( S 
.\/  T )  .\/  U ) )
23 dalemrot.z . . . . 5  |-  Z  =  ( ( S  .\/  T )  .\/  U )
241dalemzeo 30528 . . . . 5  |-  ( ph  ->  Z  e.  O )
2523, 24syl5eqelr 2527 . . . 4  |-  ( ph  ->  ( ( S  .\/  T )  .\/  U )  e.  O )
2622, 25eqeltrd 2516 . . 3  |-  ( ph  ->  ( ( T  .\/  U )  .\/  S )  e.  O )
2720, 26jca 520 . 2  |-  ( ph  ->  ( ( ( Q 
.\/  R )  .\/  P )  e.  O  /\  ( ( T  .\/  U )  .\/  S )  e.  O ) )
28 simp312 1106 . . . . 5  |-  ( ( ( ( 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 ) ) ) )  ->  -.  C  .<_  ( Q  .\/  R ) )
291, 28sylbi 189 . . . 4  |-  ( ph  ->  -.  C  .<_  ( Q 
.\/  R ) )
30 simp313 1107 . . . . 5  |-  ( ( ( ( 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 ) ) ) )  ->  -.  C  .<_  ( R  .\/  P ) )
311, 30sylbi 189 . . . 4  |-  ( ph  ->  -.  C  .<_  ( R 
.\/  P ) )
321dalem-clpjq 30532 . . . 4  |-  ( ph  ->  -.  C  .<_  ( P 
.\/  Q ) )
3329, 31, 323jca 1135 . . 3  |-  ( ph  ->  ( -.  C  .<_  ( Q  .\/  R )  /\  -.  C  .<_  ( R  .\/  P )  /\  -.  C  .<_  ( P  .\/  Q ) ) )
34 simp322 1109 . . . . 5  |-  ( ( ( ( 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 ) ) ) )  ->  -.  C  .<_  ( T  .\/  U ) )
351, 34sylbi 189 . . . 4  |-  ( ph  ->  -.  C  .<_  ( T 
.\/  U ) )
36 simp323 1110 . . . . 5  |-  ( ( ( ( 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 ) ) ) )  ->  -.  C  .<_  ( U  .\/  S ) )
371, 36sylbi 189 . . . 4  |-  ( ph  ->  -.  C  .<_  ( U 
.\/  S ) )
38 simp321 1108 . . . . 5  |-  ( ( ( ( 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 ) ) ) )  ->  -.  C  .<_  ( S  .\/  T ) )
391, 38sylbi 189 . . . 4  |-  ( ph  ->  -.  C  .<_  ( S 
.\/  T ) )
4035, 37, 393jca 1135 . . 3  |-  ( ph  ->  ( -.  C  .<_  ( T  .\/  U )  /\  -.  C  .<_  ( U  .\/  S )  /\  -.  C  .<_  ( S  .\/  T ) ) )
411dalemclqjt 30530 . . . 4  |-  ( ph  ->  C  .<_  ( Q  .\/  T ) )
421dalemclrju 30531 . . . 4  |-  ( ph  ->  C  .<_  ( R  .\/  U ) )
431dalemclpjs 30529 . . . 4  |-  ( ph  ->  C  .<_  ( P  .\/  S ) )
4441, 42, 433jca 1135 . . 3  |-  ( ph  ->  ( C  .<_  ( Q 
.\/  T )  /\  C  .<_  ( R  .\/  U )  /\  C  .<_  ( P  .\/  S ) ) )
4533, 40, 443jca 1135 . 2  |-  ( ph  ->  ( ( -.  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 ) ) ) )
4614, 27, 453jca 1135 1  |-  ( 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 ) ) ) ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 178    /\ wa 360    /\ w3a 937    = wceq 1653    e. wcel 1727   class class class wbr 4237   ` cfv 5483  (class class class)co 6110   Basecbs 13500   lecple 13567   joincjn 14432   Atomscatm 30159   HLchlt 30246
This theorem is referenced by:  dalemeea  30558  dalem6  30563  dalem7  30564  dalem11  30569  dalem12  30570  dalem29  30596  dalem30  30597  dalem31N  30598  dalem32  30599  dalem33  30600  dalem34  30601  dalem35  30602  dalem36  30603  dalem37  30604  dalem40  30607  dalem46  30613  dalem47  30614  dalem49  30616  dalem50  30617  dalem58  30625  dalem59  30626
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1556  ax-5 1567  ax-17 1627  ax-9 1668  ax-8 1689  ax-13 1729  ax-14 1731  ax-6 1746  ax-7 1751  ax-11 1763  ax-12 1953  ax-ext 2423  ax-rep 4345  ax-sep 4355  ax-nul 4363  ax-pow 4406  ax-pr 4432  ax-un 4730
This theorem depends on definitions:  df-bi 179  df-or 361  df-an 362  df-3an 939  df-tru 1329  df-ex 1552  df-nf 1555  df-sb 1660  df-eu 2291  df-mo 2292  df-clab 2429  df-cleq 2435  df-clel 2438  df-nfc 2567  df-ne 2607  df-nel 2608  df-ral 2716  df-rex 2717  df-reu 2718  df-rab 2720  df-v 2964  df-sbc 3168  df-csb 3268  df-dif 3309  df-un 3311  df-in 3313  df-ss 3320  df-nul 3614  df-if 3764  df-pw 3825  df-sn 3844  df-pr 3845  df-op 3847  df-uni 4040  df-iun 4119  df-br 4238  df-opab 4292  df-mpt 4293  df-id 4527  df-xp 4913  df-rel 4914  df-cnv 4915  df-co 4916  df-dm 4917  df-rn 4918  df-res 4919  df-ima 4920  df-iota 5447  df-fun 5485  df-fn 5486  df-f 5487  df-f1 5488  df-fo 5489  df-f1o 5490  df-fv 5491  df-ov 6113  df-oprab 6114  df-mpt2 6115  df-1st 6378  df-2nd 6379  df-undef 6572  df-riota 6578  df-poset 14434  df-lub 14462  df-join 14464  df-lat 14506  df-ats 30163  df-atl 30194  df-cvlat 30218  df-hlat 30247
  Copyright terms: Public domain W3C validator