question about sublist



On Wed, 2007-04-18 at 10:44 -0400, sen1 at math.msu.edu wrote:
> (%i2) compile(signrun);
> Compiling gazonk0.lsp.
...
> (%i4) xxx: xrl(100000)$
> Evaluation took 8.69 seconds (8.74 elapsed)
> (%i5) same_1(xxx)$
> Evaluation took 10.37 seconds (10.41 elapsed)
> (%i6) signrun(xxx)$
> Evaluation took 501.92 seconds (502.58 elapsed)

For your reference:
Without compiling, the same calculations take the following times in my
laptop (Maxima 5.11.99rc1, CLISP 2.38):
   x:xrl(100000)  ->  9.31 s
   same_1(xxx)    -> 53.21 s
   signrun(xxx)   -> 28.11 s
by changing the condition in signrun, form sign(...)=sign(...)
to ...*... >0, that last time comes down to 26.62 s.

Regards,
Jaime