From: Chris S. <san...@us...> - 2005-11-19 16:04:47
|
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:"", |