[Aimmath-commit] AIM/WEB-INF/maple/aim Diff.mpl,1.4,1.5

[Greg G. <gr...@us...>]

Update of /cvsroot/aimmath/AIM/WEB-INF/maple/aim
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19020

Modified Files:
	Diff.mpl 
Log Message:
Added in earlier test as well since in at least one complicated trig
example the new test doesn't work, though the old one does.            - GG


Index: Diff.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/Diff.mpl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** Diff.mpl	14 Nov 2003 19:55:51 -0000	1.4
--- Diff.mpl	25 Apr 2004 15:45:37 -0000	1.5
***************
*** 169,173 ****
  
    # sometimes an extra simplify is needed ... maybe an eval needed elsewhere?
!   if traperror(simplify(simplify(ans - rightans,symbolic),symbolic)) = 0 then
     mark := 1;
    else
--- 169,174 ----
  
    # sometimes an extra simplify is needed ... maybe an eval needed elsewhere?
!   if traperror(simplify(simplify(ans - rightans,assume=positive))) = 0 or
!      traperror(simplify(simplify(ans - rightans,symbolic),symbolic)) = 0 then
     mark := 1;
    else