variable evaluation



Hello, 

I have an equation which uses variables determined through the solve
command. How do I force the variables to evaluate to their numerical
values?

For reference, here is a snippet:

  for i thru n do (
    A:Cpp[i]+coeff(lsinp,b,2*i+1),
    for j:0  thru  i-1 do (		      
a[i,i-j]:solve(coeff(collectterms(expand(A),c),c,2*(i-j)+1),a[i,i-j]) ),
		K[i]:solve(coeff(collectterms(expand(A),c),c,1),K[i]) )
	) $

Here I would like the array K to return numerical values. Instead it
returns expressions containing elements of a[i,j]. Here is the output:

(%i8) listarray(a);
(%o8) [#####,#####,#####,#####,[a[1,1]=-1/48],#####,#####,[
a[2,1]=(120*a[2,2]+6*K[1]*a[1,1]-K[1])/48],[a[2,2]=-(60*a[1,1]-1)/2880]]
(%i9) listarray(K);
(%o9) [1,[K[1]=-6*a[1,1]],[K[2]=-6*a[2,1]]]

Any help would be appreciated.

Zoho