Hello,
It seems that package "affine" in maxima 5.17.1 doesn't work at least under
cmucl (it worked for me under a previous version, perhaps 5.16.0).
niobe% maxima
Maxima 5.17.1 http://maxima.sourceforge.net
Using Lisp CMU Common Lisp Snapshot 2008-02 (19E)
I have run load(affine) as root in case it would write something, this seems
to work, i get:
(%i2) load(affine);
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sys-declaim.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sloop.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/compat.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/amacros.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/dummy-gc.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/polybas.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sparsemat.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/aquotient.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/new-rat.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/polya.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/ndotsimp.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/polyb.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/polysmp.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sub-proj.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/polyc.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/polyd.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sheafa.lisp".
; In: UNLESS (BOUNDP '*XXX*)
; (LET (#)
; (SLOOP FOR I FROM 1 ...))
; Note: Variable *NOPOINT defined but never used.
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sheafb.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/sheafc.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/dim-3.lisp".
;; Loading #P"/usr/local/share/maxima/5.17.0/share/affine/modsimp.lisp".
But afterwards using it doesn't work, for example:
(%i5) grobner_basis ([3*x^2+1, y*x]);
;
; In: LAMBDA (A-LIST GROUP-SIZE PRED &AUX IF-NECESSARY ...)
; #'(LAMBDA (A-LIST GROUP-SIZE PRED &AUX IF-NECESSARY ...)
; (BLOCK SORT-GROUPED-LIST # #))
; Note: Variable TEM defined but never used.
;
; Note: Variable ANSWER defined but never used.
;
; In: LAMBDA (&AUX SEQ REPL HI OLD-SIMPS ...)
; #'(LAMBDA (&AUX SEQ REPL HI OLD-SIMPS ...)
; (BLOCK SIMPLIFY-POLY-SIMPLIFICATIONS # # # ...))
; Note: Variable HI defined but never used.
; ;
; Warning: This variable is undefined:
; PLAIN-ANSWER
; ;
; Warning: This function is undefined:
; MUST-REPLACEP
Maxima encountered a Lisp error:
Error in KERNEL:%COERCE-TO-FUNCTION: the function MUST-REPLACEP is
undefined.
Automatically continuing.
--
Michel Talon