Update of /cvsroot/stack/stack-1-0/scripts/maxima
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26165/scripts/maxima
Modified Files:
stackmaxima.mac
Log Message:
Index: stackmaxima.mac
===================================================================
RCS file: /cvsroot/stack/stack-1-0/scripts/maxima/stackmaxima.mac,v
retrieving revision 1.49
retrieving revision 1.50
diff -C2 -d -r1.49 -r1.50
*** stackmaxima.mac 17 Nov 2005 21:54:19 -0000 1.49
--- stackmaxima.mac 19 Nov 2005 16:04:39 -0000 1.50
***************
*** 420,424 ****
/* coefl:map('first,rest(coeffs(SA,x))) */
-
/* A general all purpose function
Takes two objects and returns true if they are equal, and false otherwise
--- 420,423 ----
***************
*** 468,471 ****
--- 467,472 ----
*/
+
+
ATAlgEquivfun(SA,SB) := block([KEEPFLOAT,RawMark,FeedBack,AnswerNote,ret],
RawMark:0, FeedBack:"", AnswerNote:"",
|
