Raymond Toy wrote on Thursday, February 14, 2008
> As a temporary solution, add the following to scifac.lisp, near the top:
>
> (defun fixp (n)
> (typep n 'fixnum))
>
> (defun $min (x y)
> (min x y))
>
> (defun add1 (x)
> (1+ x))
>
> These are wild guesses, based on looking at the code for a few seconds.
> fixp and add1 are probably safe since I don'tt seem them defined
> anywhere else in maxima But $min might be suspect since maxima already
> has some kind of $min function.
>
> But with these changes demo(scifac) finishes.
>
> Ray
>
I added these as lines 4,5,6.
demo(scifac) runs to completion.
the gcfac examples demonstrate the power of this factoring function.
thanks,
ted
win xp, v 5.14