It is not necessary to have two .sorts in there. I took out the first one, and it was just as fast. Why should this help? I tried this: Symbols x,y,z; Local q=(1+x+y+z)^20*(1+(1+z+x+y)^20)-(1+x+z+y)^20*(1+(1+z+x+y)^20); Print; .end and it took about twice as long as the longest time. (190 seconds) I also tried Local q=(1+x+y+z)^40 and that takes about .98 seconds Local q=(1+x+y+z)^40- (1+x+z+y)^40 and that takes about 1.7 seconds. What is going on? Pearu Peterson wrote:
Hi,
On Thu, 28 Mar 2002, Richard Fateman wrote:
C:\form>form sample3.frm form sample3.frm FORM by J.Vermaseren,version 3.0(Jan 28 2001) Run at: Thu Mar 28 10:26:41 2002 Symbols x,y,z; Local q=(1+x+y+z)^20; Local q1=q+1; Local res=q*q1; .end .....
Note that using .sort makes the above example approx. 4 times faster:
Symbols x,y,z; Local q=(1+x+y+z)^20; .sort Local q1=1+q; .sort Local res=q1*q; .end
Regards, Pearu