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

Theorem cdlemg31a 36836
Description: TODO: fix comment. (Contributed by NM, 29-May-2013.)
Hypotheses
Ref Expression
cdlemg12.l  |-  .<_  =  ( le `  K )
cdlemg12.j  |-  .\/  =  ( join `  K )
cdlemg12.m  |-  ./\  =  ( meet `  K )
cdlemg12.a  |-  A  =  ( Atoms `  K )
cdlemg12.h  |-  H  =  ( LHyp `  K
)
cdlemg12.t  |-  T  =  ( ( LTrn `  K
) `  W )
cdlemg12b.r  |-  R  =  ( ( trL `  K
) `  W )
cdlemg31.n  |-  N  =  ( ( P  .\/  v )  ./\  ( Q  .\/  ( R `  F ) ) )
Assertion
Ref Expression
cdlemg31a  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  N  .<_  ( P  .\/  v ) )

Proof of Theorem cdlemg31a
StepHypRef Expression
1 cdlemg31.n . 2  |-  N  =  ( ( P  .\/  v )  ./\  ( Q  .\/  ( R `  F ) ) )
2 simp1l 1018 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  K  e.  HL )
3 hllat 35501 . . . 4  |-  ( K  e.  HL  ->  K  e.  Lat )
42, 3syl 16 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  K  e.  Lat )
5 simp2l 1020 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  P  e.  A )
6 simp3l 1022 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  v  e.  A )
7 eqid 2382 . . . . 5  |-  ( Base `  K )  =  (
Base `  K )
8 cdlemg12.j . . . . 5  |-  .\/  =  ( join `  K )
9 cdlemg12.a . . . . 5  |-  A  =  ( Atoms `  K )
107, 8, 9hlatjcl 35504 . . . 4  |-  ( ( K  e.  HL  /\  P  e.  A  /\  v  e.  A )  ->  ( P  .\/  v
)  e.  ( Base `  K ) )
112, 5, 6, 10syl3anc 1226 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  ( P  .\/  v )  e.  (
Base `  K )
)
12 simp2r 1021 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  Q  e.  A )
137, 9atbase 35427 . . . . 5  |-  ( Q  e.  A  ->  Q  e.  ( Base `  K
) )
1412, 13syl 16 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  Q  e.  ( Base `  K )
)
15 simp1 994 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  ( K  e.  HL  /\  W  e.  H ) )
16 simp3r 1023 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  F  e.  T )
17 cdlemg12.h . . . . . 6  |-  H  =  ( LHyp `  K
)
18 cdlemg12.t . . . . . 6  |-  T  =  ( ( LTrn `  K
) `  W )
19 cdlemg12b.r . . . . . 6  |-  R  =  ( ( trL `  K
) `  W )
207, 17, 18, 19trlcl 36302 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  F  e.  T
)  ->  ( R `  F )  e.  (
Base `  K )
)
2115, 16, 20syl2anc 659 . . . 4  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  ( R `  F )  e.  (
Base `  K )
)
227, 8latjcl 15798 . . . 4  |-  ( ( K  e.  Lat  /\  Q  e.  ( Base `  K )  /\  ( R `  F )  e.  ( Base `  K
) )  ->  ( Q  .\/  ( R `  F ) )  e.  ( Base `  K
) )
234, 14, 21, 22syl3anc 1226 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  ( Q  .\/  ( R `  F
) )  e.  (
Base `  K )
)
24 cdlemg12.l . . . 4  |-  .<_  =  ( le `  K )
25 cdlemg12.m . . . 4  |-  ./\  =  ( meet `  K )
267, 24, 25latmle1 15823 . . 3  |-  ( ( K  e.  Lat  /\  ( P  .\/  v )  e.  ( Base `  K
)  /\  ( Q  .\/  ( R `  F
) )  e.  (
Base `  K )
)  ->  ( ( P  .\/  v )  ./\  ( Q  .\/  ( R `
 F ) ) )  .<_  ( P  .\/  v ) )
274, 11, 23, 26syl3anc 1226 . 2  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  ( ( P  .\/  v )  ./\  ( Q  .\/  ( R `
 F ) ) )  .<_  ( P  .\/  v ) )
281, 27syl5eqbr 4400 1  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( P  e.  A  /\  Q  e.  A )  /\  (
v  e.  A  /\  F  e.  T )
)  ->  N  .<_  ( P  .\/  v ) )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    /\ wa 367    /\ w3a 971    = wceq 1399    e. wcel 1826   class class class wbr 4367   ` cfv 5496  (class class class)co 6196   Basecbs 14634   lecple 14709   joincjn 15690   meetcmee 15691   Latclat 15792   Atomscatm 35401   HLchlt 35488   LHypclh 36121   LTrncltrn 36238   trLctrl 36296
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1626  ax-4 1639  ax-5 1712  ax-6 1755  ax-7 1798  ax-8 1828  ax-9 1830  ax-10 1845  ax-11 1850  ax-12 1862  ax-13 2006  ax-ext 2360  ax-rep 4478  ax-sep 4488  ax-nul 4496  ax-pow 4543  ax-pr 4601  ax-un 6491
This theorem depends on definitions:  df-bi 185  df-or 368  df-an 369  df-3an 973  df-tru 1402  df-ex 1621  df-nf 1625  df-sb 1748  df-eu 2222  df-mo 2223  df-clab 2368  df-cleq 2374  df-clel 2377  df-nfc 2532  df-ne 2579  df-ral 2737  df-rex 2738  df-reu 2739  df-rab 2741  df-v 3036  df-sbc 3253  df-csb 3349  df-dif 3392  df-un 3394  df-in 3396  df-ss 3403  df-nul 3712  df-if 3858  df-pw 3929  df-sn 3945  df-pr 3947  df-op 3951  df-uni 4164  df-iun 4245  df-br 4368  df-opab 4426  df-mpt 4427  df-id 4709  df-xp 4919  df-rel 4920  df-cnv 4921  df-co 4922  df-dm 4923  df-rn 4924  df-res 4925  df-ima 4926  df-iota 5460  df-fun 5498  df-fn 5499  df-f 5500  df-f1 5501  df-fo 5502  df-f1o 5503  df-fv 5504  df-riota 6158  df-ov 6199  df-oprab 6200  df-mpt2 6201  df-map 7340  df-preset 15674  df-poset 15692  df-plt 15705  df-lub 15721  df-glb 15722  df-join 15723  df-meet 15724  df-p0 15786  df-p1 15787  df-lat 15793  df-oposet 35314  df-ol 35316  df-oml 35317  df-covers 35404  df-ats 35405  df-atl 35436  df-cvlat 35460  df-hlat 35489  df-lhyp 36125  df-laut 36126  df-ldil 36241  df-ltrn 36242  df-trl 36297
This theorem is referenced by:  cdlemg31c  36838  cdlemg33b0  36840  cdlemg33a  36845
  Copyright terms: Public domain W3C validator