gcfac and scifac



Raymond Toy wrote on February 13, 2008

>> (%i1) load (scifac);
>>
>> Load failed for
>> 
>> C:/PROGRA~1/MAXIMA~3.0/share/maxima/5.14.0/share/simplification/scifac.lisp
>>  -- an error.  To debug this try debugmode(true);
>
> Near the top of that file, change the "(declare ...") to "(declaim ..."). 
> It loads for me now.  Don't know if it works or not....
>
> Ray

I changed line two of scifac.lisp from
" (declare (special $negdistrib)) "
to
"(declaim (special $negdistrib))"
--------------
package scifac.lisp now loads ok but get error first time scifac.dem calls 
gcfac:

(%i1) demo(scifac)$
batching 
#pC:/PROGRA~1/MAXIMA~3.0/share/maxima/5.14.0/share/simplification/scifac.dem

 At the _ prompt, type ';' followed by enter to get next demo
(%i2)             if properties(gcfac) = [] then load(scifac)
_;
(%i3)                    exp1 : a v s x + a t r + a u
(%o3)                        a s v x + a u + a r t
_;
(%i4)                             gcfac(exp1)
Maxima encountered a Lisp error:

 Error in COND [or a callee]: The function FIXP is undefined.

Automatically continuing.
To reenable the Lisp debugger set *debugger-hook* to nil.
(%i5)                            factor(exp1)
(%o5)                         a (s v x + u + r t)
-----------------
ted woollett
win xp, v5.14