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

Theorem dihprrnlem2 32321
Description: Lemma for dihprrn 32322. (Contributed by NM, 29-Sep-2014.)
Hypotheses
Ref Expression
dihprrn.h  |-  H  =  ( LHyp `  K
)
dihprrn.u  |-  U  =  ( ( DVecH `  K
) `  W )
dihprrn.v  |-  V  =  ( Base `  U
)
dihprrn.n  |-  N  =  ( LSpan `  U )
dihprrn.i  |-  I  =  ( ( DIsoH `  K
) `  W )
dihprrn.k  |-  ( ph  ->  ( K  e.  HL  /\  W  e.  H ) )
dihprrn.x  |-  ( ph  ->  X  e.  V )
dihprrn.y  |-  ( ph  ->  Y  e.  V )
dihprrnlem2.o  |-  .0.  =  ( 0g `  U )
dihprrnlem2.xz  |-  ( ph  ->  X  =/=  .0.  )
dihprrnlem2.yz  |-  ( ph  ->  Y  =/=  .0.  )
Assertion
Ref Expression
dihprrnlem2  |-  ( ph  ->  ( N `  { X ,  Y }
)  e.  ran  I
)

Proof of Theorem dihprrnlem2
StepHypRef Expression
1 df-pr 3845 . . . 4  |-  { X ,  Y }  =  ( { X }  u.  { Y } )
21fveq2i 5760 . . 3  |-  ( N `
 { X ,  Y } )  =  ( N `  ( { X }  u.  { Y } ) )
3 dihprrn.h . . . . 5  |-  H  =  ( LHyp `  K
)
4 eqid 2442 . . . . 5  |-  ( join `  K )  =  (
join `  K )
5 eqid 2442 . . . . 5  |-  ( Atoms `  K )  =  (
Atoms `  K )
6 dihprrn.u . . . . 5  |-  U  =  ( ( DVecH `  K
) `  W )
7 eqid 2442 . . . . 5  |-  ( LSSum `  U )  =  (
LSSum `  U )
8 dihprrn.i . . . . 5  |-  I  =  ( ( DIsoH `  K
) `  W )
9 dihprrn.k . . . . 5  |-  ( ph  ->  ( K  e.  HL  /\  W  e.  H ) )
10 dihprrn.x . . . . . 6  |-  ( ph  ->  X  e.  V )
11 dihprrnlem2.xz . . . . . 6  |-  ( ph  ->  X  =/=  .0.  )
12 dihprrn.v . . . . . . 7  |-  V  =  ( Base `  U
)
13 dihprrnlem2.o . . . . . . 7  |-  .0.  =  ( 0g `  U )
14 dihprrn.n . . . . . . 7  |-  N  =  ( LSpan `  U )
155, 3, 6, 12, 13, 14, 8dihlspsnat 32229 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  X  e.  V  /\  X  =/=  .0.  )  ->  ( `' I `  ( N `  { X } ) )  e.  ( Atoms `  K )
)
169, 10, 11, 15syl3anc 1185 . . . . 5  |-  ( ph  ->  ( `' I `  ( N `  { X } ) )  e.  ( Atoms `  K )
)
17 dihprrn.y . . . . . 6  |-  ( ph  ->  Y  e.  V )
18 dihprrnlem2.yz . . . . . 6  |-  ( ph  ->  Y  =/=  .0.  )
195, 3, 6, 12, 13, 14, 8dihlspsnat 32229 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  Y  e.  V  /\  Y  =/=  .0.  )  ->  ( `' I `  ( N `  { Y } ) )  e.  ( Atoms `  K )
)
209, 17, 18, 19syl3anc 1185 . . . . 5  |-  ( ph  ->  ( `' I `  ( N `  { Y } ) )  e.  ( Atoms `  K )
)
213, 4, 5, 6, 7, 8, 9, 16, 20dihjat 32319 . . . 4  |-  ( ph  ->  ( I `  (
( `' I `  ( N `  { X } ) ) (
join `  K )
( `' I `  ( N `  { Y } ) ) ) )  =  ( ( I `  ( `' I `  ( N `
 { X }
) ) ) (
LSSum `  U ) ( I `  ( `' I `  ( N `
 { Y }
) ) ) ) )
223, 6, 12, 14, 8dihlsprn 32227 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  X  e.  V
)  ->  ( N `  { X } )  e.  ran  I )
239, 10, 22syl2anc 644 . . . . . 6  |-  ( ph  ->  ( N `  { X } )  e.  ran  I )
243, 8dihcnvid2 32169 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( N `  { X } )  e. 
ran  I )  -> 
( I `  ( `' I `  ( N `
 { X }
) ) )  =  ( N `  { X } ) )
259, 23, 24syl2anc 644 . . . . 5  |-  ( ph  ->  ( I `  ( `' I `  ( N `
 { X }
) ) )  =  ( N `  { X } ) )
263, 6, 12, 14, 8dihlsprn 32227 . . . . . . 7  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  Y  e.  V
)  ->  ( N `  { Y } )  e.  ran  I )
279, 17, 26syl2anc 644 . . . . . 6  |-  ( ph  ->  ( N `  { Y } )  e.  ran  I )
283, 8dihcnvid2 32169 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( N `  { Y } )  e. 
ran  I )  -> 
( I `  ( `' I `  ( N `
 { Y }
) ) )  =  ( N `  { Y } ) )
299, 27, 28syl2anc 644 . . . . 5  |-  ( ph  ->  ( I `  ( `' I `  ( N `
 { Y }
) ) )  =  ( N `  { Y } ) )
3025, 29oveq12d 6128 . . . 4  |-  ( ph  ->  ( ( I `  ( `' I `  ( N `
 { X }
) ) ) (
LSSum `  U ) ( I `  ( `' I `  ( N `
 { Y }
) ) ) )  =  ( ( N `
 { X }
) ( LSSum `  U
) ( N `  { Y } ) ) )
313, 6, 9dvhlmod 32006 . . . . 5  |-  ( ph  ->  U  e.  LMod )
3210snssd 3967 . . . . 5  |-  ( ph  ->  { X }  C_  V )
3317snssd 3967 . . . . 5  |-  ( ph  ->  { Y }  C_  V )
3412, 14, 7lsmsp2 16190 . . . . 5  |-  ( ( U  e.  LMod  /\  { X }  C_  V  /\  { Y }  C_  V
)  ->  ( ( N `  { X } ) ( LSSum `  U ) ( N `
 { Y }
) )  =  ( N `  ( { X }  u.  { Y } ) ) )
3531, 32, 33, 34syl3anc 1185 . . . 4  |-  ( ph  ->  ( ( N `  { X } ) (
LSSum `  U ) ( N `  { Y } ) )  =  ( N `  ( { X }  u.  { Y } ) ) )
3621, 30, 353eqtrrd 2479 . . 3  |-  ( ph  ->  ( N `  ( { X }  u.  { Y } ) )  =  ( I `  (
( `' I `  ( N `  { X } ) ) (
join `  K )
( `' I `  ( N `  { Y } ) ) ) ) )
372, 36syl5eq 2486 . 2  |-  ( ph  ->  ( N `  { X ,  Y }
)  =  ( I `
 ( ( `' I `  ( N `
 { X }
) ) ( join `  K ) ( `' I `  ( N `
 { Y }
) ) ) ) )
389simpld 447 . . . . 5  |-  ( ph  ->  K  e.  HL )
39 hllat 30259 . . . . 5  |-  ( K  e.  HL  ->  K  e.  Lat )
4038, 39syl 16 . . . 4  |-  ( ph  ->  K  e.  Lat )
41 eqid 2442 . . . . . 6  |-  ( Base `  K )  =  (
Base `  K )
4241, 3, 8dihcnvcl 32167 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( N `  { X } )  e. 
ran  I )  -> 
( `' I `  ( N `  { X } ) )  e.  ( Base `  K
) )
439, 23, 42syl2anc 644 . . . 4  |-  ( ph  ->  ( `' I `  ( N `  { X } ) )  e.  ( Base `  K
) )
4441, 3, 8dihcnvcl 32167 . . . . 5  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( N `  { Y } )  e. 
ran  I )  -> 
( `' I `  ( N `  { Y } ) )  e.  ( Base `  K
) )
459, 27, 44syl2anc 644 . . . 4  |-  ( ph  ->  ( `' I `  ( N `  { Y } ) )  e.  ( Base `  K
) )
4641, 4latjcl 14510 . . . 4  |-  ( ( K  e.  Lat  /\  ( `' I `  ( N `
 { X }
) )  e.  (
Base `  K )  /\  ( `' I `  ( N `  { Y } ) )  e.  ( Base `  K
) )  ->  (
( `' I `  ( N `  { X } ) ) (
join `  K )
( `' I `  ( N `  { Y } ) ) )  e.  ( Base `  K
) )
4740, 43, 45, 46syl3anc 1185 . . 3  |-  ( ph  ->  ( ( `' I `  ( N `  { X } ) ) (
join `  K )
( `' I `  ( N `  { Y } ) ) )  e.  ( Base `  K
) )
4841, 3, 8dihcl 32166 . . 3  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  ( ( `' I `  ( N `
 { X }
) ) ( join `  K ) ( `' I `  ( N `
 { Y }
) ) )  e.  ( Base `  K
) )  ->  (
I `  ( ( `' I `  ( N `
 { X }
) ) ( join `  K ) ( `' I `  ( N `
 { Y }
) ) ) )  e.  ran  I )
499, 47, 48syl2anc 644 . 2  |-  ( ph  ->  ( I `  (
( `' I `  ( N `  { X } ) ) (
join `  K )
( `' I `  ( N `  { Y } ) ) ) )  e.  ran  I
)
5037, 49eqeltrd 2516 1  |-  ( ph  ->  ( N `  { X ,  Y }
)  e.  ran  I
)
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 360    = wceq 1653    e. wcel 1727    =/= wne 2605    u. cun 3304    C_ wss 3306   {csn 3838   {cpr 3839   `'ccnv 4906   ran crn 4908   ` cfv 5483  (class class class)co 6110   Basecbs 13500   0gc0g 13754   joincjn 14432   Latclat 14505   LSSumclsm 15299   LModclmod 15981   LSpanclspn 16078   Atomscatm 30159   HLchlt 30246   LHypclh 30879   DVecHcdvh 31974   DIsoHcdih 32124
This theorem is referenced by:  dihprrn  32322
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  ax-cnex 9077  ax-resscn 9078  ax-1cn 9079  ax-icn 9080  ax-addcl 9081  ax-addrcl 9082  ax-mulcl 9083  ax-mulrcl 9084  ax-mulcom 9085  ax-addass 9086  ax-mulass 9087  ax-distr 9088  ax-i2m1 9089  ax-1ne0 9090  ax-1rid 9091  ax-rnegex 9092  ax-rrecex 9093  ax-cnre 9094  ax-pre-lttri 9095  ax-pre-lttrn 9096  ax-pre-ltadd 9097  ax-pre-mulgt0 9098
This theorem depends on definitions:  df-bi 179  df-or 361  df-an 362  df-3or 938  df-3an 939  df-tru 1329  df-fal 1330  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-rmo 2719  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-pss 3322  df-nul 3614  df-if 3764  df-pw 3825  df-sn 3844  df-pr 3845  df-tp 3846  df-op 3847  df-uni 4040  df-int 4075  df-iun 4119  df-iin 4120  df-br 4238  df-opab 4292  df-mpt 4293  df-tr 4328  df-eprel 4523  df-id 4527  df-po 4532  df-so 4533  df-fr 4570  df-we 4572  df-ord 4613  df-on 4614  df-lim 4615  df-suc 4616  df-om 4875  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-tpos 6508  df-undef 6572  df-riota 6578  df-recs 6662  df-rdg 6697  df-1o 6753  df-oadd 6757  df-er 6934  df-map 7049  df-en 7139  df-dom 7140  df-sdom 7141  df-fin 7142  df-pnf 9153  df-mnf 9154  df-xr 9155  df-ltxr 9156  df-le 9157  df-sub 9324  df-neg 9325  df-nn 10032  df-2 10089  df-3 10090  df-4 10091  df-5 10092  df-6 10093  df-n0 10253  df-z 10314  df-uz 10520  df-fz 11075  df-struct 13502  df-ndx 13503  df-slot 13504  df-base 13505  df-sets 13506  df-ress 13507  df-plusg 13573  df-mulr 13574  df-sca 13576  df-vsca 13577  df-0g 13758  df-poset 14434  df-plt 14446  df-lub 14462  df-glb 14463  df-join 14464  df-meet 14465  df-p0 14499  df-p1 14500  df-lat 14506  df-clat 14568  df-mnd 14721  df-submnd 14770  df-grp 14843  df-minusg 14844  df-sbg 14845  df-subg 14972  df-cntz 15147  df-lsm 15301  df-cmn 15445  df-abl 15446  df-mgp 15680  df-rng 15694  df-ur 15696  df-oppr 15759  df-dvdsr 15777  df-unit 15778  df-invr 15808  df-dvr 15819  df-drng 15868  df-lmod 15983  df-lss 16040  df-lsp 16079  df-lvec 16206  df-lsatoms 29872  df-oposet 30072  df-ol 30074  df-oml 30075  df-covers 30162  df-ats 30163  df-atl 30194  df-cvlat 30218  df-hlat 30247  df-llines 30393  df-lplanes 30394  df-lvols 30395  df-lines 30396  df-psubsp 30398  df-pmap 30399  df-padd 30691  df-lhyp 30883  df-laut 30884  df-ldil 30999  df-ltrn 31000  df-trl 31054  df-tgrp 31638  df-tendo 31650  df-edring 31652  df-dveca 31898  df-disoa 31925  df-dvech 31975  df-dib 32035  df-dic 32069  df-dih 32125  df-doch 32244  df-djh 32291
  Copyright terms: Public domain W3C validator