finding out if expr has the form F(y/x^a)




________________________________
? Hello Richard? this is another versionperhaps a little better. If you don't like the name solution think in something better :)

? Limitations. If there are many solutions for the parameter a, it only gives one of them.


?load(pdiff);

solution(g):=block([f0:g*x/y,a,f],if ratsimp(diff(f0,x))=0 then
a:0 else a:ratsimp(-1/at(diff(f0,y)/diff(f0,x),y=t*x)/t),
if not(freeof(x,y,t,a)) then return(false),
f:expand(ratsimp(at(f0,y=x^(a+1)))),['a=a,'f=f,'g=ratsimp(y/x*at(f,x=y/x^a))]);

_______________________________________________
Maxima mailing list
Maxima at math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima