From: Dieter K. <cra...@us...> - 2010-02-11 16:30:56
|
Update of /cvsroot/maxima/maxima/src In directory sfp-cvsdas-1.v30.ch3.sourceforge.com:/tmp/cvs-serv24665 Modified Files: hyp.lisp Log Message: Correcting the order of the simp and array flag in the noun form of %f. Index: hyp.lisp =================================================================== RCS file: /cvsroot/maxima/maxima/src/hyp.lisp,v retrieving revision 1.115 retrieving revision 1.116 diff -u -d -r1.115 -r1.116 --- hyp.lisp 7 Feb 2010 16:52:45 -0000 1.115 +++ hyp.lisp 11 Feb 2010 16:30:22 -0000 1.116 @@ -3226,7 +3226,7 @@ (defun fpqform (arg-l1 arg-l2 arg) (list '(mqapply) - (list '($%f array simp) (length arg-l1)(length arg-l2)) + (list '($%f simp array) (length arg-l1)(length arg-l2)) (append (list '(mlist simp)) arg-l1) (append (list '(mlist simp)) arg-l2) arg)) |