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

Theorem hdmap11lem1 35798
Description: Lemma for hdmapadd 35800. (Contributed by NM, 26-May-2015.)
Hypotheses
Ref Expression
hdmap11.h  |-  H  =  ( LHyp `  K
)
hdmap11.u  |-  U  =  ( ( DVecH `  K
) `  W )
hdmap11.v  |-  V  =  ( Base `  U
)
hdmap11.p  |-  .+  =  ( +g  `  U )
hdmap11.c  |-  C  =  ( (LCDual `  K
) `  W )
hdmap11.a  |-  .+b  =  ( +g  `  C )
hdmap11.s  |-  S  =  ( (HDMap `  K
) `  W )
hdmap11.k  |-  ( ph  ->  ( K  e.  HL  /\  W  e.  H ) )
hdmap11.x  |-  ( ph  ->  X  e.  V )
hdmap11.y  |-  ( ph  ->  Y  e.  V )
hdmap11.e  |-  E  = 
<. (  _I  |`  ( Base `  K ) ) ,  (  _I  |`  (
( LTrn `  K ) `  W ) ) >.
hdmap11.o  |-  .0.  =  ( 0g `  U )
hdmap11.n  |-  N  =  ( LSpan `  U )
hdmap11.d  |-  D  =  ( Base `  C
)
hdmap11.l  |-  L  =  ( LSpan `  C )
hdmap11.m  |-  M  =  ( (mapd `  K
) `  W )
hdmap11.j  |-  J  =  ( (HVMap `  K
) `  W )
hdmap11.i  |-  I  =  ( (HDMap1 `  K
) `  W )
hdmap11lem0.1a  |-  ( ph  ->  z  e.  V )
hdmap11lem0.6  |-  ( ph  ->  -.  z  e.  ( N `  { X ,  Y } ) )
hdmap11lem0.2a  |-  ( ph  ->  ( N `  {
z } )  =/=  ( N `  { E } ) )
Assertion
Ref Expression
hdmap11lem1  |-  ( ph  ->  ( S `  ( X  .+  Y ) )  =  ( ( S `
 X )  .+b  ( S `  Y ) ) )

Proof of Theorem hdmap11lem1
StepHypRef Expression
1 hdmap11.h . . 3  |-  H  =  ( LHyp `  K
)
2 hdmap11.u . . 3  |-  U  =  ( ( DVecH `  K
) `  W )
3 hdmap11.v . . 3  |-  V  =  ( Base `  U
)
4 hdmap11.p . . 3  |-  .+  =  ( +g  `  U )
5 hdmap11.o . . 3  |-  .0.  =  ( 0g `  U )
6 hdmap11.n . . 3  |-  N  =  ( LSpan `  U )
7 hdmap11.c . . 3  |-  C  =  ( (LCDual `  K
) `  W )
8 hdmap11.d . . 3  |-  D  =  ( Base `  C
)
9 hdmap11.a . . 3  |-  .+b  =  ( +g  `  C )
10 hdmap11.l . . 3  |-  L  =  ( LSpan `  C )
11 hdmap11.m . . 3  |-  M  =  ( (mapd `  K
) `  W )
12 hdmap11.i . . 3  |-  I  =  ( (HDMap1 `  K
) `  W )
13 hdmap11.k . . 3  |-  ( ph  ->  ( K  e.  HL  /\  W  e.  H ) )
14 eqid 2451 . . . . . 6  |-  ( 0g
`  C )  =  ( 0g `  C
)
15 hdmap11.j . . . . . 6  |-  J  =  ( (HVMap `  K
) `  W )
16 eqid 2451 . . . . . . 7  |-  ( Base `  K )  =  (
Base `  K )
17 eqid 2451 . . . . . . 7  |-  ( (
LTrn `  K ) `  W )  =  ( ( LTrn `  K
) `  W )
18 hdmap11.e . . . . . . 7  |-  E  = 
<. (  _I  |`  ( Base `  K ) ) ,  (  _I  |`  (
( LTrn `  K ) `  W ) ) >.
191, 16, 17, 2, 3, 5, 18, 13dvheveccl 35066 . . . . . 6  |-  ( ph  ->  E  e.  ( V 
\  {  .0.  }
) )
201, 2, 3, 5, 7, 8, 14, 15, 13, 19hvmapcl2 35720 . . . . 5  |-  ( ph  ->  ( J `  E
)  e.  ( D 
\  { ( 0g
`  C ) } ) )
2120eldifad 3441 . . . 4  |-  ( ph  ->  ( J `  E
)  e.  D )
221, 2, 3, 5, 6, 7, 10, 11, 15, 13, 19mapdhvmap 35723 . . . 4  |-  ( ph  ->  ( M `  ( N `  { E } ) )  =  ( L `  {
( J `  E
) } ) )
23 hdmap11lem0.2a . . . . 5  |-  ( ph  ->  ( N `  {
z } )  =/=  ( N `  { E } ) )
2423necomd 2719 . . . 4  |-  ( ph  ->  ( N `  { E } )  =/=  ( N `  { z } ) )
25 hdmap11lem0.1a . . . 4  |-  ( ph  ->  z  e.  V )
261, 2, 3, 5, 6, 7, 8, 10, 11, 12, 13, 21, 22, 24, 19, 25hdmap1cl 35759 . . 3  |-  ( ph  ->  ( I `  <. E ,  ( J `  E ) ,  z
>. )  e.  D
)
27 eqid 2451 . . . 4  |-  ( LSubSp `  U )  =  (
LSubSp `  U )
281, 2, 13dvhlmod 35064 . . . 4  |-  ( ph  ->  U  e.  LMod )
29 hdmap11.x . . . . 5  |-  ( ph  ->  X  e.  V )
30 hdmap11.y . . . . 5  |-  ( ph  ->  Y  e.  V )
313, 27, 6, 28, 29, 30lspprcl 17174 . . . 4  |-  ( ph  ->  ( N `  { X ,  Y }
)  e.  ( LSubSp `  U ) )
32 hdmap11lem0.6 . . . 4  |-  ( ph  ->  -.  z  e.  ( N `  { X ,  Y } ) )
333, 5, 27, 28, 31, 25, 32lssneln0 17148 . . 3  |-  ( ph  ->  z  e.  ( V 
\  {  .0.  }
) )
34 eqidd 2452 . . . . 5  |-  ( ph  ->  ( I `  <. E ,  ( J `  E ) ,  z
>. )  =  (
I `  <. E , 
( J `  E
) ,  z >.
) )
35 eqid 2451 . . . . . 6  |-  ( -g `  U )  =  (
-g `  U )
36 eqid 2451 . . . . . 6  |-  ( -g `  C )  =  (
-g `  C )
371, 2, 3, 35, 5, 6, 7, 8, 36, 10, 11, 12, 13, 19, 21, 33, 26, 24, 22hdmap1eq 35756 . . . . 5  |-  ( ph  ->  ( ( I `  <. E ,  ( J `
 E ) ,  z >. )  =  ( I `  <. E , 
( J `  E
) ,  z >.
)  <->  ( ( M `
 ( N `  { z } ) )  =  ( L `
 { ( I `
 <. E ,  ( J `  E ) ,  z >. ) } )  /\  ( M `  ( N `  { ( E (
-g `  U )
z ) } ) )  =  ( L `
 { ( ( J `  E ) ( -g `  C
) ( I `  <. E ,  ( J `
 E ) ,  z >. ) ) } ) ) ) )
3834, 37mpbid 210 . . . 4  |-  ( ph  ->  ( ( M `  ( N `  { z } ) )  =  ( L `  {
( I `  <. E ,  ( J `  E ) ,  z
>. ) } )  /\  ( M `  ( N `
 { ( E ( -g `  U
) z ) } ) )  =  ( L `  { ( ( J `  E
) ( -g `  C
) ( I `  <. E ,  ( J `
 E ) ,  z >. ) ) } ) ) )
3938simpld 459 . . 3  |-  ( ph  ->  ( M `  ( N `  { z } ) )  =  ( L `  {
( I `  <. E ,  ( J `  E ) ,  z
>. ) } ) )
401, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 26, 33, 29, 30, 32, 39hdmap1l6 35776 . 2  |-  ( ph  ->  ( I `  <. z ,  ( I `  <. E ,  ( J `
 E ) ,  z >. ) ,  ( X  .+  Y )
>. )  =  (
( I `  <. z ,  ( I `  <. E ,  ( J `
 E ) ,  z >. ) ,  X >. )  .+b  ( I `  <. z ,  ( I `  <. E , 
( J `  E
) ,  z >.
) ,  Y >. ) ) )
41 hdmap11.s . . 3  |-  S  =  ( (HDMap `  K
) `  W )
423, 4lmodvacl 17077 . . . 4  |-  ( ( U  e.  LMod  /\  X  e.  V  /\  Y  e.  V )  ->  ( X  .+  Y )  e.  V )
4328, 29, 30, 42syl3anc 1219 . . 3  |-  ( ph  ->  ( X  .+  Y
)  e.  V )
441, 2, 13dvhlvec 35063 . . . 4  |-  ( ph  ->  U  e.  LVec )
4519eldifad 3441 . . . 4  |-  ( ph  ->  E  e.  V )
463, 4, 6, 28, 29, 30lspprvacl 17195 . . . . . . 7  |-  ( ph  ->  ( X  .+  Y
)  e.  ( N `
 { X ,  Y } ) )
4727, 6, 28, 31, 46lspsnel5a 17192 . . . . . 6  |-  ( ph  ->  ( N `  {
( X  .+  Y
) } )  C_  ( N `  { X ,  Y } ) )
4847, 32ssneldd 3460 . . . . 5  |-  ( ph  ->  -.  z  e.  ( N `  { ( X  .+  Y ) } ) )
493, 6, 28, 25, 43, 48lspsnne2 17314 . . . 4  |-  ( ph  ->  ( N `  {
z } )  =/=  ( N `  {
( X  .+  Y
) } ) )
503, 6, 5, 44, 45, 43, 33, 23, 49hdmaplem4 35728 . . 3  |-  ( ph  ->  -.  z  e.  ( ( N `  { E } )  u.  ( N `  { ( X  .+  Y ) } ) ) )
511, 18, 2, 3, 6, 7, 8, 15, 12, 41, 13, 43, 25, 50hdmapval2 35789 . 2  |-  ( ph  ->  ( S `  ( X  .+  Y ) )  =  ( I `  <. z ,  ( I `
 <. E ,  ( J `  E ) ,  z >. ) ,  ( X  .+  Y ) >. )
)
523, 6, 44, 25, 29, 30, 32lspindpi 17328 . . . . . 6  |-  ( ph  ->  ( ( N `  { z } )  =/=  ( N `  { X } )  /\  ( N `  { z } )  =/=  ( N `  { Y } ) ) )
5352simpld 459 . . . . 5  |-  ( ph  ->  ( N `  {
z } )  =/=  ( N `  { X } ) )
543, 6, 5, 44, 45, 29, 33, 23, 53hdmaplem4 35728 . . . 4  |-  ( ph  ->  -.  z  e.  ( ( N `  { E } )  u.  ( N `  { X } ) ) )
551, 18, 2, 3, 6, 7, 8, 15, 12, 41, 13, 29, 25, 54hdmapval2 35789 . . 3  |-  ( ph  ->  ( S `  X
)  =  ( I `
 <. z ,  ( I `  <. E , 
( J `  E
) ,  z >.
) ,  X >. ) )
5652simprd 463 . . . . 5  |-  ( ph  ->  ( N `  {
z } )  =/=  ( N `  { Y } ) )
573, 6, 5, 44, 45, 30, 33, 23, 56hdmaplem4 35728 . . . 4  |-  ( ph  ->  -.  z  e.  ( ( N `  { E } )  u.  ( N `  { Y } ) ) )
581, 18, 2, 3, 6, 7, 8, 15, 12, 41, 13, 30, 25, 57hdmapval2 35789 . . 3  |-  ( ph  ->  ( S `  Y
)  =  ( I `
 <. z ,  ( I `  <. E , 
( J `  E
) ,  z >.
) ,  Y >. ) )
5955, 58oveq12d 6211 . 2  |-  ( ph  ->  ( ( S `  X )  .+b  ( S `  Y )
)  =  ( ( I `  <. z ,  ( I `  <. E ,  ( J `
 E ) ,  z >. ) ,  X >. )  .+b  ( I `  <. z ,  ( I `  <. E , 
( J `  E
) ,  z >.
) ,  Y >. ) ) )
6040, 51, 593eqtr4d 2502 1  |-  ( ph  ->  ( S `  ( X  .+  Y ) )  =  ( ( S `
 X )  .+b  ( S `  Y ) ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 369    = wceq 1370    e. wcel 1758    =/= wne 2644   {csn 3978   {cpr 3980   <.cop 3984   <.cotp 3986    _I cid 4732    |` cres 4943   ` cfv 5519  (class class class)co 6193   Basecbs 14285   +g cplusg 14349   0gc0g 14489   -gcsg 15524   LModclmod 17063   LSubSpclss 17128   LSpanclspn 17167   HLchlt 33304   LHypclh 33937   LTrncltrn 34054   DVecHcdvh 35032  LCDualclcd 35540  mapdcmpd 35578  HVMapchvm 35710  HDMap1chdma1 35746  HDMapchdma 35747
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-8 1760  ax-9 1762  ax-10 1777  ax-11 1782  ax-12 1794  ax-13 1952  ax-ext 2430  ax-rep 4504  ax-sep 4514  ax-nul 4522  ax-pow 4571  ax-pr 4632  ax-un 6475  ax-cnex 9442  ax-resscn 9443  ax-1cn 9444  ax-icn 9445  ax-addcl 9446  ax-addrcl 9447  ax-mulcl 9448  ax-mulrcl 9449  ax-mulcom 9450  ax-addass 9451  ax-mulass 9452  ax-distr 9453  ax-i2m1 9454  ax-1ne0 9455  ax-1rid 9456  ax-rnegex 9457  ax-rrecex 9458  ax-cnre 9459  ax-pre-lttri 9460  ax-pre-lttrn 9461  ax-pre-ltadd 9462  ax-pre-mulgt0 9463  ax-riotaBAD 32913
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 966  df-3an 967  df-tru 1373  df-fal 1376  df-ex 1588  df-nf 1591  df-sb 1703  df-eu 2264  df-mo 2265  df-clab 2437  df-cleq 2443  df-clel 2446  df-nfc 2601  df-ne 2646  df-nel 2647  df-ral 2800  df-rex 2801  df-reu 2802  df-rmo 2803  df-rab 2804  df-v 3073  df-sbc 3288  df-csb 3390  df-dif 3432  df-un 3434  df-in 3436  df-ss 3443  df-pss 3445  df-nul 3739  df-if 3893  df-pw 3963  df-sn 3979  df-pr 3981  df-tp 3983  df-op 3985  df-ot 3987  df-uni 4193  df-int 4230  df-iun 4274  df-iin 4275  df-br 4394  df-opab 4452  df-mpt 4453  df-tr 4487  df-eprel 4733  df-id 4737  df-po 4742  df-so 4743  df-fr 4780  df-we 4782  df-ord 4823  df-on 4824  df-lim 4825  df-suc 4826  df-xp 4947  df-rel 4948  df-cnv 4949  df-co 4950  df-dm 4951  df-rn 4952  df-res 4953  df-ima 4954  df-iota 5482  df-fun 5521  df-fn 5522  df-f 5523  df-f1 5524  df-fo 5525  df-f1o 5526  df-fv 5527  df-riota 6154  df-ov 6196  df-oprab 6197  df-mpt2 6198  df-of 6423  df-om 6580  df-1st 6680  df-2nd 6681  df-tpos 6848  df-undef 6895  df-recs 6935  df-rdg 6969  df-1o 7023  df-oadd 7027  df-er 7204  df-map 7319  df-en 7414  df-dom 7415  df-sdom 7416  df-fin 7417  df-pnf 9524  df-mnf 9525  df-xr 9526  df-ltxr 9527  df-le 9528  df-sub 9701  df-neg 9702  df-nn 10427  df-2 10484  df-3 10485  df-4 10486  df-5 10487  df-6 10488  df-n0 10684  df-z 10751  df-uz 10966  df-fz 11548  df-struct 14287  df-ndx 14288  df-slot 14289  df-base 14290  df-sets 14291  df-ress 14292  df-plusg 14362  df-mulr 14363  df-sca 14365  df-vsca 14366  df-0g 14491  df-mre 14635  df-mrc 14636  df-acs 14638  df-poset 15227  df-plt 15239  df-lub 15255  df-glb 15256  df-join 15257  df-meet 15258  df-p0 15320  df-p1 15321  df-lat 15327  df-clat 15389  df-mnd 15526  df-submnd 15576  df-grp 15656  df-minusg 15657  df-sbg 15658  df-subg 15789  df-cntz 15946  df-oppg 15972  df-lsm 16248  df-cmn 16392  df-abl 16393  df-mgp 16706  df-ur 16718  df-rng 16762  df-oppr 16830  df-dvdsr 16848  df-unit 16849  df-invr 16879  df-dvr 16890  df-drng 16949  df-lmod 17065  df-lss 17129  df-lsp 17168  df-lvec 17299  df-lsatoms 32930  df-lshyp 32931  df-lcv 32973  df-lfl 33012  df-lkr 33040  df-ldual 33078  df-oposet 33130  df-ol 33132  df-oml 33133  df-covers 33220  df-ats 33221  df-atl 33252  df-cvlat 33276  df-hlat 33305  df-llines 33451  df-lplanes 33452  df-lvols 33453  df-lines 33454  df-psubsp 33456  df-pmap 33457  df-padd 33749  df-lhyp 33941  df-laut 33942  df-ldil 34057  df-ltrn 34058  df-trl 34112  df-tgrp 34696  df-tendo 34708  df-edring 34710  df-dveca 34956  df-disoa 34983  df-dvech 35033  df-dib 35093  df-dic 35127  df-dih 35183  df-doch 35302  df-djh 35349  df-lcdual 35541  df-mapd 35579  df-hvmap 35711  df-hdmap1 35748  df-hdmap 35749
This theorem is referenced by:  hdmap11lem2  35799
  Copyright terms: Public domain W3C validator