From: Robert D. <rob...@us...> - 2006-10-30 00:00:49
|
Update of /cvsroot/maxima/maxima/share/diff_form In directory sc8-pr-cvs7.sourceforge.net:/tmp/cvs-serv24534 Modified Files: cartan_new.lisp Log Message: Change "for i from dim step -1 thru 0 do ..." to "for i from dim step -1 thru 1 do ...". With this change, d(translist) succeeds and the rest of the example works just as shown in surface_example.txt. Index: cartan_new.lisp =================================================================== RCS file: /cvsroot/maxima/maxima/share/diff_form/cartan_new.lisp,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- cartan_new.lisp 29 Oct 2006 17:09:38 -0000 1.1 +++ cartan_new.lisp 30 Oct 2006 00:00:25 -0000 1.2 @@ -53,7 +53,7 @@ ((MSETQ SIMP) $EXT102 $TRUE) ((MSETQ SIMP) $EXT103 (($EXPAND SIMP) $F)) - ((MDO SIMP) $I $DIM -1 NIL 0 NIL + ((MDO SIMP) $I $DIM -1 NIL 1 NIL ((MPROGN SIMP) ((MSETQ SIMP) $EXT104 (($EXPAND SIMP) |