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

Theorem dochfl1 35038
Description: The value of the explicit functional  G is 1 at the  X that determines it. (Contributed by NM, 27-Oct-2014.)
Hypotheses
Ref Expression
dochfl1.h  |-  H  =  ( LHyp `  K
)
dochfl1.o  |-  ._|_  =  ( ( ocH `  K
) `  W )
dochfl1.u  |-  U  =  ( ( DVecH `  K
) `  W )
dochfl1.v  |-  V  =  ( Base `  U
)
dochfl1.a  |-  .+  =  ( +g  `  U )
dochfl1.t  |-  .x.  =  ( .s `  U )
dochfl1.z  |-  .0.  =  ( 0g `  U )
dochfl1.d  |-  D  =  (Scalar `  U )
dochfl1.r  |-  R  =  ( Base `  D
)
dochfl1.i  |-  .1.  =  ( 1r `  D )
dochfl1.k  |-  ( ph  ->  ( K  e.  HL  /\  W  e.  H ) )
dochfl1.x  |-  ( ph  ->  X  e.  ( V 
\  {  .0.  }
) )
dochfl1.g  |-  G  =  ( v  e.  V  |->  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X }
) v  =  ( w  .+  ( k 
.x.  X ) ) ) )
Assertion
Ref Expression
dochfl1  |-  ( ph  ->  ( G `  X
)  =  .1.  )
Distinct variable groups:    v, k, w,  .+    .1. , k, w    ._|_ , k, v, w    R, k, v    .x. , k,
v, w    v, V    k, X, v, w    w,  .0.
Allowed substitution hints:    ph( w, v, k)    D( w, v, k)    R( w)    U( w, v, k)    .1. ( v)    G( w, v, k)    H( w, v, k)    K( w, v, k)    V( w, k)    W( w, v, k)    .0. ( v,
k)

Proof of Theorem dochfl1
StepHypRef Expression
1 dochfl1.x . . . 4  |-  ( ph  ->  X  e.  ( V 
\  {  .0.  }
) )
21eldifad 3415 . . 3  |-  ( ph  ->  X  e.  V )
3 eqeq1 2454 . . . . . 6  |-  ( v  =  X  ->  (
v  =  ( w 
.+  ( k  .x.  X ) )  <->  X  =  ( w  .+  ( k 
.x.  X ) ) ) )
43rexbidv 2900 . . . . 5  |-  ( v  =  X  ->  ( E. w  e.  (  ._|_  `  { X }
) v  =  ( w  .+  ( k 
.x.  X ) )  <->  E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  ( k 
.x.  X ) ) ) )
54riotabidv 6252 . . . 4  |-  ( v  =  X  ->  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X } ) v  =  ( w 
.+  ( k  .x.  X ) ) )  =  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X } ) X  =  ( w  .+  (
k  .x.  X )
) ) )
6 dochfl1.g . . . 4  |-  G  =  ( v  e.  V  |->  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X }
) v  =  ( w  .+  ( k 
.x.  X ) ) ) )
7 riotaex 6254 . . . 4  |-  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X } ) X  =  ( w  .+  (
k  .x.  X )
) )  e.  _V
85, 6, 7fvmpt 5946 . . 3  |-  ( X  e.  V  ->  ( G `  X )  =  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X } ) X  =  ( w  .+  (
k  .x.  X )
) ) )
92, 8syl 17 . 2  |-  ( ph  ->  ( G `  X
)  =  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X } ) X  =  ( w  .+  (
k  .x.  X )
) ) )
10 dochfl1.h . . . . . 6  |-  H  =  ( LHyp `  K
)
11 dochfl1.u . . . . . 6  |-  U  =  ( ( DVecH `  K
) `  W )
12 dochfl1.k . . . . . 6  |-  ( ph  ->  ( K  e.  HL  /\  W  e.  H ) )
1310, 11, 12dvhlmod 34672 . . . . 5  |-  ( ph  ->  U  e.  LMod )
142snssd 4116 . . . . . 6  |-  ( ph  ->  { X }  C_  V )
15 dochfl1.v . . . . . . 7  |-  V  =  ( Base `  U
)
16 eqid 2450 . . . . . . 7  |-  ( LSubSp `  U )  =  (
LSubSp `  U )
17 dochfl1.o . . . . . . 7  |-  ._|_  =  ( ( ocH `  K
) `  W )
1810, 11, 15, 16, 17dochlss 34916 . . . . . 6  |-  ( ( ( K  e.  HL  /\  W  e.  H )  /\  { X }  C_  V )  ->  (  ._|_  `  { X }
)  e.  ( LSubSp `  U ) )
1912, 14, 18syl2anc 666 . . . . 5  |-  ( ph  ->  (  ._|_  `  { X } )  e.  (
LSubSp `  U ) )
20 dochfl1.z . . . . . 6  |-  .0.  =  ( 0g `  U )
2120, 16lss0cl 18163 . . . . 5  |-  ( ( U  e.  LMod  /\  (  ._|_  `  { X }
)  e.  ( LSubSp `  U ) )  ->  .0.  e.  (  ._|_  `  { X } ) )
2213, 19, 21syl2anc 666 . . . 4  |-  ( ph  ->  .0.  e.  (  ._|_  `  { X } ) )
23 dochfl1.d . . . . . . . 8  |-  D  =  (Scalar `  U )
24 dochfl1.t . . . . . . . 8  |-  .x.  =  ( .s `  U )
25 dochfl1.i . . . . . . . 8  |-  .1.  =  ( 1r `  D )
2615, 23, 24, 25lmodvs1 18112 . . . . . . 7  |-  ( ( U  e.  LMod  /\  X  e.  V )  ->  (  .1.  .x.  X )  =  X )
2713, 2, 26syl2anc 666 . . . . . 6  |-  ( ph  ->  (  .1.  .x.  X
)  =  X )
2827oveq2d 6304 . . . . 5  |-  ( ph  ->  (  .0.  .+  (  .1.  .x.  X ) )  =  (  .0.  .+  X ) )
29 dochfl1.a . . . . . . 7  |-  .+  =  ( +g  `  U )
3015, 29, 20lmod0vlid 18114 . . . . . 6  |-  ( ( U  e.  LMod  /\  X  e.  V )  ->  (  .0.  .+  X )  =  X )
3113, 2, 30syl2anc 666 . . . . 5  |-  ( ph  ->  (  .0.  .+  X
)  =  X )
3228, 31eqtr2d 2485 . . . 4  |-  ( ph  ->  X  =  (  .0.  .+  (  .1.  .x.  X
) ) )
33 oveq1 6295 . . . . . 6  |-  ( w  =  .0.  ->  (
w  .+  (  .1.  .x. 
X ) )  =  (  .0.  .+  (  .1.  .x.  X ) ) )
3433eqeq2d 2460 . . . . 5  |-  ( w  =  .0.  ->  ( X  =  ( w  .+  (  .1.  .x.  X
) )  <->  X  =  (  .0.  .+  (  .1.  .x. 
X ) ) ) )
3534rspcev 3149 . . . 4  |-  ( (  .0.  e.  (  ._|_  `  { X } )  /\  X  =  (  .0.  .+  (  .1.  .x. 
X ) ) )  ->  E. w  e.  ( 
._|_  `  { X }
) X  =  ( w  .+  (  .1. 
.x.  X ) ) )
3622, 32, 35syl2anc 666 . . 3  |-  ( ph  ->  E. w  e.  ( 
._|_  `  { X }
) X  =  ( w  .+  (  .1. 
.x.  X ) ) )
3723lmodring 18092 . . . . 5  |-  ( U  e.  LMod  ->  D  e. 
Ring )
38 dochfl1.r . . . . . 6  |-  R  =  ( Base `  D
)
3938, 25ringidcl 17794 . . . . 5  |-  ( D  e.  Ring  ->  .1.  e.  R )
4013, 37, 393syl 18 . . . 4  |-  ( ph  ->  .1.  e.  R )
41 eqid 2450 . . . . 5  |-  ( LSpan `  U )  =  (
LSpan `  U )
42 eqid 2450 . . . . 5  |-  ( LSSum `  U )  =  (
LSSum `  U )
43 eqid 2450 . . . . 5  |-  (LSHyp `  U )  =  (LSHyp `  U )
4410, 11, 12dvhlvec 34671 . . . . 5  |-  ( ph  ->  U  e.  LVec )
4510, 17, 11, 15, 20, 43, 12, 1dochsnshp 35015 . . . . 5  |-  ( ph  ->  (  ._|_  `  { X } )  e.  (LSHyp `  U ) )
4610, 17, 11, 15, 20, 41, 42, 12, 1dochexmidat 35021 . . . . 5  |-  ( ph  ->  ( (  ._|_  `  { X } ) ( LSSum `  U ) ( (
LSpan `  U ) `  { X } ) )  =  V )
4715, 29, 41, 42, 43, 44, 45, 2, 2, 46, 23, 38, 24lshpsmreu 32669 . . . 4  |-  ( ph  ->  E! k  e.  R  E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  ( k 
.x.  X ) ) )
48 oveq1 6295 . . . . . . . 8  |-  ( k  =  .1.  ->  (
k  .x.  X )  =  (  .1.  .x.  X
) )
4948oveq2d 6304 . . . . . . 7  |-  ( k  =  .1.  ->  (
w  .+  ( k  .x.  X ) )  =  ( w  .+  (  .1.  .x.  X ) ) )
5049eqeq2d 2460 . . . . . 6  |-  ( k  =  .1.  ->  ( X  =  ( w  .+  ( k  .x.  X
) )  <->  X  =  ( w  .+  (  .1. 
.x.  X ) ) ) )
5150rexbidv 2900 . . . . 5  |-  ( k  =  .1.  ->  ( E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  ( k 
.x.  X ) )  <->  E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  (  .1. 
.x.  X ) ) ) )
5251riota2 6272 . . . 4  |-  ( (  .1.  e.  R  /\  E! k  e.  R  E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  ( k 
.x.  X ) ) )  ->  ( E. w  e.  (  ._|_  `  { X } ) X  =  ( w 
.+  (  .1.  .x.  X ) )  <->  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X } ) X  =  ( w  .+  (
k  .x.  X )
) )  =  .1.  ) )
5340, 47, 52syl2anc 666 . . 3  |-  ( ph  ->  ( E. w  e.  (  ._|_  `  { X } ) X  =  ( w  .+  (  .1.  .x.  X ) )  <-> 
( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  ( k 
.x.  X ) ) )  =  .1.  )
)
5436, 53mpbid 214 . 2  |-  ( ph  ->  ( iota_ k  e.  R  E. w  e.  (  ._|_  `  { X }
) X  =  ( w  .+  ( k 
.x.  X ) ) )  =  .1.  )
559, 54eqtrd 2484 1  |-  ( ph  ->  ( G `  X
)  =  .1.  )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    <-> wb 188    /\ wa 371    = wceq 1443    e. wcel 1886   E.wrex 2737   E!wreu 2738    \ cdif 3400    C_ wss 3403   {csn 3967    |-> cmpt 4460   ` cfv 5581   iota_crio 6249  (class class class)co 6288   Basecbs 15114   +g cplusg 15183  Scalarcsca 15186   .scvsca 15187   0gc0g 15331   LSSumclsm 17279   1rcur 17728   Ringcrg 17773   LModclmod 18084   LSubSpclss 18148   LSpanclspn 18187  LSHypclsh 32535   HLchlt 32910   LHypclh 33543   DVecHcdvh 34640   ocHcoch 34909
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1668  ax-4 1681  ax-5 1757  ax-6 1804  ax-7 1850  ax-8 1888  ax-9 1895  ax-10 1914  ax-11 1919  ax-12 1932  ax-13 2090  ax-ext 2430  ax-rep 4514  ax-sep 4524  ax-nul 4533  ax-pow 4580  ax-pr 4638  ax-un 6580  ax-cnex 9592  ax-resscn 9593  ax-1cn 9594  ax-icn 9595  ax-addcl 9596  ax-addrcl 9597  ax-mulcl 9598  ax-mulrcl 9599  ax-mulcom 9600  ax-addass 9601  ax-mulass 9602  ax-distr 9603  ax-i2m1 9604  ax-1ne0 9605  ax-1rid 9606  ax-rnegex 9607  ax-rrecex 9608  ax-cnre 9609  ax-pre-lttri 9610  ax-pre-lttrn 9611  ax-pre-ltadd 9612  ax-pre-mulgt0 9613  ax-riotaBAD 32519
This theorem depends on definitions:  df-bi 189  df-or 372  df-an 373  df-3or 985  df-3an 986  df-tru 1446  df-fal 1449  df-ex 1663  df-nf 1667  df-sb 1797  df-eu 2302  df-mo 2303  df-clab 2437  df-cleq 2443  df-clel 2446  df-nfc 2580  df-ne 2623  df-nel 2624  df-ral 2741  df-rex 2742  df-reu 2743  df-rmo 2744  df-rab 2745  df-v 3046  df-sbc 3267  df-csb 3363  df-dif 3406  df-un 3408  df-in 3410  df-ss 3417  df-pss 3419  df-nul 3731  df-if 3881  df-pw 3952  df-sn 3968  df-pr 3970  df-tp 3972  df-op 3974  df-uni 4198  df-int 4234  df-iun 4279  df-iin 4280  df-br 4402  df-opab 4461  df-mpt 4462  df-tr 4497  df-eprel 4744  df-id 4748  df-po 4754  df-so 4755  df-fr 4792  df-we 4794  df-xp 4839  df-rel 4840  df-cnv 4841  df-co 4842  df-dm 4843  df-rn 4844  df-res 4845  df-ima 4846  df-pred 5379  df-ord 5425  df-on 5426  df-lim 5427  df-suc 5428  df-iota 5545  df-fun 5583  df-fn 5584  df-f 5585  df-f1 5586  df-fo 5587  df-f1o 5588  df-fv 5589  df-riota 6250  df-ov 6291  df-oprab 6292  df-mpt2 6293  df-om 6690  df-1st 6790  df-2nd 6791  df-tpos 6970  df-undef 7017  df-wrecs 7025  df-recs 7087  df-rdg 7125  df-1o 7179  df-oadd 7183  df-er 7360  df-map 7471  df-en 7567  df-dom 7568  df-sdom 7569  df-fin 7570  df-pnf 9674  df-mnf 9675  df-xr 9676  df-ltxr 9677  df-le 9678  df-sub 9859  df-neg 9860  df-nn 10607  df-2 10665  df-3 10666  df-4 10667  df-5 10668  df-6 10669  df-n0 10867  df-z 10935  df-uz 11157  df-fz 11782  df-struct 15116  df-ndx 15117  df-slot 15118  df-base 15119  df-sets 15120  df-ress 15121  df-plusg 15196  df-mulr 15197  df-sca 15199  df-vsca 15200  df-0g 15333  df-preset 16166  df-poset 16184  df-plt 16197  df-lub 16213  df-glb 16214  df-join 16215  df-meet 16216  df-p0 16278  df-p1 16279  df-lat 16285  df-clat 16347  df-mgm 16481  df-sgrp 16520  df-mnd 16530  df-submnd 16576  df-grp 16666  df-minusg 16667  df-sbg 16668  df-subg 16807  df-cntz 16964  df-lsm 17281  df-cmn 17425  df-abl 17426  df-mgp 17717  df-ur 17729  df-ring 17775  df-oppr 17844  df-dvdsr 17862  df-unit 17863  df-invr 17893  df-dvr 17904  df-drng 17970  df-lmod 18086  df-lss 18149  df-lsp 18188  df-lvec 18319  df-lsatoms 32536  df-lshyp 32537  df-oposet 32736  df-ol 32738  df-oml 32739  df-covers 32826  df-ats 32827  df-atl 32858  df-cvlat 32882  df-hlat 32911  df-llines 33057  df-lplanes 33058  df-lvols 33059  df-lines 33060  df-psubsp 33062  df-pmap 33063  df-padd 33355  df-lhyp 33547  df-laut 33548  df-ldil 33663  df-ltrn 33664  df-trl 33719  df-tgrp 34304  df-tendo 34316  df-edring 34318  df-dveca 34564  df-disoa 34591  df-dvech 34641  df-dib 34701  df-dic 34735  df-dih 34791  df-doch 34910  df-djh 34957
This theorem is referenced by:  lcfl6lem  35060  lcfl7lem  35061  hvmapidN  35324  hdmapevec2  35401
  Copyright terms: Public domain W3C validator