The following function only works if it is executed twice.
Code : Tout sélectionner
f():={
if autosimplify()=='Nop' or autosimplify()=='regroup' then autosimplify('simplify'); increasing_power(true); end;
poly2symb([1,2,3])*poly2symb([4,5,6]);
}:;
f() [enter] returns 18+27*x+28*x^2+13*x^3+4*x^4