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 RightLinearCombination 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 RightLinearCombination of A holds a * F is LinearCombination of A
let a be Element of R; :: thesis: for F being RightLinearCombination of A holds a * F is LinearCombination of A
let F be RightLinearCombination 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 )
reconsider c = a as Element of R ;
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 being Element of R, b being Element of A such that
A2: F /. i = b * u by Def10;
take c ; :: thesis: ex v being Element of R ex a being Element of A st (a * F) /. i = (c * a) * v
take u ; :: thesis: ex a being Element of A st (a * F) /. i = (c * a) * u
take b ; :: thesis: (a * F) /. i = (c * b) * u
thus (a * F) /. i = a * (F /. i) by A1, POLYNOM1:def 1
.= (c * b) * u by A2, GROUP_1:def 3 ; :: thesis: verum