let GF be non empty right_complementable associative well-unital distributive Abelian add-associative right_zeroed doubleLoopStr ; :: thesis: for V being non empty right_complementable VectSp-like Abelian add-associative right_zeroed VectSpStr of GF
for v being Element of V
for l being Linear_Combination of {v} holds Sum l = (l . v) * v

let V be non empty right_complementable VectSp-like Abelian add-associative right_zeroed VectSpStr of GF; :: thesis: for v being Element of V
for l being Linear_Combination of {v} holds Sum l = (l . v) * v

let v be Element of V; :: thesis: for l being Linear_Combination of {v} holds Sum l = (l . v) * v
let l be Linear_Combination of {v}; :: thesis: Sum l = (l . v) * v
A1: Carrier l c= {v} by Def7;
now
per cases ( Carrier l = {} or Carrier l = {v} ) by A1, ZFMISC_1:39;
suppose Carrier l = {} ; :: thesis: Sum l = (l . v) * v
then A2: l = ZeroLC V by Def6;
hence Sum l = 0. V by Lm1
.= (0. GF) * v by VECTSP_1:59
.= (l . v) * v by A2, Th22 ;
:: thesis: verum
end;
suppose Carrier l = {v} ; :: thesis: Sum l = (l . v) * v
then consider F being FinSequence of the carrier of V such that
A3: ( F is one-to-one & rng F = {v} ) and
A4: Sum l = Sum (l (#) F) by Def9;
F = <*v*> by A3, FINSEQ_3:106;
then l (#) F = <*((l . v) * v)*> by Th34;
hence Sum l = (l . v) * v by A4, RLVECT_1:61; :: thesis: verum
end;
end;
end;
hence Sum l = (l . v) * v ; :: thesis: verum