let R be non empty associative multLoopStr ; :: thesis: for A being non empty Subset of R
for a being Element of R
for F being LinearCombination of A holds a * F is LinearCombination of A

let A be non empty Subset of R; :: thesis: for a being Element of R
for F being LinearCombination of A holds a * F is LinearCombination of A

let a be Element of R; :: thesis: for F being LinearCombination of A holds a * F is LinearCombination of A
let F be LinearCombination of A; :: thesis: a * F is LinearCombination of A
let i be set ; :: according to IDEAL_1:def 8 :: thesis: ( i in dom (a * F) implies ex u, v being Element of R ex a being Element of A st (a * F) /. i = (u * a) * v )
assume i in dom (a * F) ; :: thesis: ex u, v being Element of R ex a being Element of A st (a * F) /. i = (u * a) * v
then A1: i in dom F by POLYNOM1:def 1;
then consider u, v being Element of R, b being Element of A such that
A2: F /. i = (u * b) * v by Def8;
take x = a * u; :: thesis: ex v being Element of R ex a being Element of A st (a * F) /. i = (x * a) * v
take v ; :: thesis: ex a being Element of A st (a * F) /. i = (x * a) * v
take b ; :: thesis: (a * F) /. i = (x * b) * v
thus (a * F) /. i = a * (F /. i) by A1, POLYNOM1:def 1
.= (a * (u * b)) * v by A2, GROUP_1:def 3
.= (x * b) * v by GROUP_1:def 3 ; :: thesis: verum