-----maxima-admin@math.utexas.edu wrote: -----
>I have been unable to find something like maple's
>or mupad 'scollect ().
(%i1) p : expand((a+b+c)^3);
(%o1) c^3+3*b*c^2+3*a*c^2+3*b^2*c+6*a*b*c+3*a^2*c+b^3+3*a*b^2+3*a^2*b+a^3
(%i2) collectterms(p,c);
Warning - you are redefining the MACSYMA function INTERSECTION
(%o2) c^3+(3*b+3*a)*c^2+(3*b^2+6*a*b+3*a^2)*c+b^3+3*a*b^2+3*a^2*b+a^3
(%i3) facsum(p,c);
(%o3) c^3+3*(b+a)*c^2+3*(b+a)^2*c+(b+a)^3
Barton