Question about solve

Is there a simple way to cause solve to assign to variables or to use
the list returned by
solve to do assignments?  For example solve returns returns the list [
a[1] = 2] where
a[1] is the variable I am solving for.  However, I want to assign a[1]
the value 2.

I am using

      map(lambda([eq],block([l:lhs(eq),r:rhs(eq),a,s],
                 a:part(l,0),s:part(l,1),
                 arraymake(a,[s])::r)),
        sol)

which works, but is dependent on the solution being a array variable.
Is there a better way?

Thanks,
Dan Stanger
dan.stanger@ieee.org