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

Theorem cdleme39a 30951
Description: Part of proof of Lemma E in [Crawley] p. 113. Show that f(x) is one-to-one on  P  .\/  Q line. TODO: FIX COMMENT.  E,  Y,  G,  Z serve as f(t), f(u), ft( R), ft( S). Put hypotheses of cdleme38n 30950 in convention of cdleme32sn1awN 30918. TODO see if this hypothesis conversion would be better if done earlier. (Contributed by NM, 15-Mar-2013.)
Hypotheses
Ref Expression
cdleme39.l  |-  .<_  =  ( le `  K )
cdleme39.j  |-  .\/  =  ( join `  K )
cdleme39.m  |-  ./\  =  ( meet `  K )
cdleme39.a  |-  A  =  ( Atoms `  K )
cdleme39.h  |-  H  =  ( LHyp `  K
)
cdleme39.u  |-  U  =  ( ( P  .\/  Q )  ./\  W )
cdleme39.e  |-  E  =  ( ( t  .\/  U )  ./\  ( Q  .\/  ( ( P  .\/  t )  ./\  W
) ) )
cdleme39.g  |-  G  =  ( ( P  .\/  Q )  ./\  ( E  .\/  ( ( R  .\/  t )  ./\  W
) ) )
cdleme39a.v  |-  V  =  ( ( t  .\/  E )  ./\  W )
Assertion
Ref Expression
cdleme39a  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  G  =  ( ( R  .\/  V
)  ./\  ( E  .\/  ( ( t  .\/  R )  ./\  W )
) ) )

Proof of Theorem cdleme39a
StepHypRef Expression
1 cdleme39.g . 2  |-  G  =  ( ( P  .\/  Q )  ./\  ( E  .\/  ( ( R  .\/  t )  ./\  W
) ) )
2 simp11 987 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( K  e.  HL  /\  W  e.  H ) )
3 simp12 988 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  P  e.  A
)
4 simp13 989 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  Q  e.  A
)
5 simp2 958 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( R  e.  A  /\  -.  R  .<_  W ) )
6 simp3l 985 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  R  .<_  ( P 
.\/  Q ) )
7 cdleme39.l . . . . . 6  |-  .<_  =  ( le `  K )
8 cdleme39.j . . . . . 6  |-  .\/  =  ( join `  K )
9 cdleme39.m . . . . . 6  |-  ./\  =  ( meet `  K )
10 cdleme39.a . . . . . 6  |-  A  =  ( Atoms `  K )
11 cdleme39.h . . . . . 6  |-  H  =  ( LHyp `  K
)
12 cdleme39.u . . . . . 6  |-  U  =  ( ( P  .\/  Q )  ./\  W )
137, 8, 9, 10, 11, 12cdleme4 30724 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A  /\  ( R  e.  A  /\  -.  R  .<_  W ) )  /\  R  .<_  ( P 
.\/  Q ) )  ->  ( P  .\/  Q )  =  ( R 
.\/  U ) )
142, 3, 4, 5, 6, 13syl131anc 1197 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( P  .\/  Q )  =  ( R 
.\/  U ) )
15 cdleme39a.v . . . . . 6  |-  V  =  ( ( t  .\/  E )  ./\  W )
16 simp3r 986 . . . . . . 7  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( t  e.  A  /\  -.  t  .<_  W ) )
17 cdleme39.e . . . . . . . 8  |-  E  =  ( ( t  .\/  U )  ./\  ( Q  .\/  ( ( P  .\/  t )  ./\  W
) ) )
187, 8, 9, 10, 11, 12, 17cdleme2 30714 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( (
t  .\/  E )  ./\  W )  =  U )
192, 3, 4, 16, 18syl13anc 1186 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( ( t 
.\/  E )  ./\  W )  =  U )
2015, 19syl5eq 2452 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  V  =  U )
2120oveq2d 6060 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( R  .\/  V )  =  ( R 
.\/  U ) )
2214, 21eqtr4d 2443 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( P  .\/  Q )  =  ( R 
.\/  V ) )
23 simp11l 1068 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  K  e.  HL )
24 simp2l 983 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  R  e.  A
)
25 simp3rl 1030 . . . . . 6  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  t  e.  A
)
268, 10hlatjcom 29854 . . . . . 6  |-  ( ( K  e.  HL  /\  R  e.  A  /\  t  e.  A )  ->  ( R  .\/  t
)  =  ( t 
.\/  R ) )
2723, 24, 25, 26syl3anc 1184 . . . . 5  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( R  .\/  t )  =  ( t  .\/  R ) )
2827oveq1d 6059 . . . 4  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( ( R 
.\/  t )  ./\  W )  =  ( ( t  .\/  R ) 
./\  W ) )
2928oveq2d 6060 . . 3  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( E  .\/  ( ( R  .\/  t )  ./\  W
) )  =  ( E  .\/  ( ( t  .\/  R ) 
./\  W ) ) )
3022, 29oveq12d 6062 . 2  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  ( ( P 
.\/  Q )  ./\  ( E  .\/  ( ( R  .\/  t ) 
./\  W ) ) )  =  ( ( R  .\/  V ) 
./\  ( E  .\/  ( ( t  .\/  R )  ./\  W )
) ) )
311, 30syl5eq 2452 1  |-  ( ( ( ( K  e.  HL  /\  W  e.  H )  /\  P  e.  A  /\  Q  e.  A )  /\  ( R  e.  A  /\  -.  R  .<_  W )  /\  ( R  .<_  ( P  .\/  Q )  /\  ( t  e.  A  /\  -.  t  .<_  W ) ) )  ->  G  =  ( ( R  .\/  V
)  ./\  ( E  .\/  ( ( t  .\/  R )  ./\  W )
) ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 359    /\ w3a 936    = wceq 1649    e. wcel 1721   class class class wbr 4176   ` cfv 5417  (class class class)co 6044   lecple 13495   joincjn 14360   meetcmee 14361   Atomscatm 29750   HLchlt 29837   LHypclh 30470
This theorem is referenced by:  cdleme39n  30952
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 1662  ax-8 1683  ax-13 1723  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2389  ax-rep 4284  ax-sep 4294  ax-nul 4302  ax-pow 4341  ax-pr 4367  ax-un 4664
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2262  df-mo 2263  df-clab 2395  df-cleq 2401  df-clel 2404  df-nfc 2533  df-ne 2573  df-nel 2574  df-ral 2675  df-rex 2676  df-reu 2677  df-rab 2679  df-v 2922  df-sbc 3126  df-csb 3216  df-dif 3287  df-un 3289  df-in 3291  df-ss 3298  df-nul 3593  df-if 3704  df-pw 3765  df-sn 3784  df-pr 3785  df-op 3787  df-uni 3980  df-iun 4059  df-iin 4060  df-br 4177  df-opab 4231  df-mpt 4232  df-id 4462  df-xp 4847  df-rel 4848  df-cnv 4849  df-co 4850  df-dm 4851  df-rn 4852  df-res 4853  df-ima 4854  df-iota 5381  df-fun 5419  df-fn 5420  df-f 5421  df-f1 5422  df-fo 5423  df-f1o 5424  df-fv 5425  df-ov 6047  df-oprab 6048  df-mpt2 6049  df-1st 6312  df-2nd 6313  df-undef 6506  df-riota 6512  df-poset 14362  df-plt 14374  df-lub 14390  df-glb 14391  df-join 14392  df-meet 14393  df-p0 14427  df-p1 14428  df-lat 14434  df-clat 14496  df-oposet 29663  df-ol 29665  df-oml 29666  df-covers 29753  df-ats 29754  df-atl 29785  df-cvlat 29809  df-hlat 29838  df-psubsp 29989  df-pmap 29990  df-padd 30282  df-lhyp 30474
  Copyright terms: Public domain W3C validator