From: Robert D. <rob...@us...> - 2007-11-24 16:58:12
|
Update of /cvsroot/maxima/maxima/share/contrib/Zeilberger In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv2275 Modified Files: zeilberger_algorithm.mac Log Message: Change MODULUS to modulus per message from Fabrizio Caruso 2007-11-24. Index: zeilberger_algorithm.mac =================================================================== RCS file: /cvsroot/maxima/maxima/share/contrib/Zeilberger/zeilberger_algorithm.mac,v retrieving revision 1.4 retrieving revision 1.5 diff -u -d -r1.4 -r1.5 --- zeilberger_algorithm.mac 15 Oct 2007 02:45:39 -0000 1.4 +++ zeilberger_algorithm.mac 24 Nov 2007 16:47:20 -0000 1.5 @@ -272,7 +272,7 @@ /* Numerical test */ if mod_test and (ZAnsatzDegree<=mod_threshold) then ( - MODULUS : mod_big_prime, + modulus : mod_big_prime, test_Gpoly : polymod(subst(ev_point,n,Gpoly),mod_big_prime), @@ -286,7 +286,7 @@ '_g,GAnsatzDegree+1,'_z,ZAnsatzDegree+1,k, modular_linear_solver,mode-1), - MODULUS : false, + modulus : false, if mode>= very_verbose then print("numerical sysSol : ", sysSol), if sysSol = [] then |