[Maxima-commits] CVS: maxima/tests rtest_expintegral.mac, 1.1, 1.1.2.1

[Dieter K. <cra...@us...>]

Update of /cvsroot/maxima/maxima/tests
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv24081

Modified Files:
      Tag: RELEASE-5_16-BRANCH
	rtest_expintegral.mac 
Log Message:
Adjusting the numerical precision of three tests.
GCL 2.6.8 had no problems but CLISP 2.44 fails.

Tested now with GCL 2.6.8 and CLISP 2.44.
rtest_expintegral.mac is at this time not included in $testsuite_files.

Index: rtest_expintegral.mac
===================================================================
RCS file: /cvsroot/maxima/maxima/tests/rtest_expintegral.mac,v
retrieving revision 1.1
retrieving revision 1.1.2.1
diff -u -d -r1.1 -r1.1.2.1
--- rtest_expintegral.mac	1 Aug 2008 16:59:29 -0000	1.1
+++ rtest_expintegral.mac	16 Aug 2008 18:44:28 -0000	1.1.2.1
@@ -1350,7 +1350,7 @@
 ]),done);
 done;
 
-test_table(lambda([z],expintegral_ci(z)),'ci_2,230,1.00e-10);
+test_table(lambda([z],expintegral_ci(z)),'ci_2,230,3.2e-8);
 [];
 
 /******************************************************************************
@@ -2004,7 +2004,7 @@
 ]),done);
 done;
 
-test_table(lambda([z],z*%e^z*expintegral_e1(z)),'e1_3,80,3.30e-9);
+test_table(lambda([z],z*%e^z*expintegral_e1(z)),'e1_3,80,2.50e-8);
 [];
 
 /******************************************************************************
@@ -3033,7 +3033,7 @@
 ]),done);
 done;
 
-test_complex_table(lambda([z],z*%e^z*expintegral_e1(z)),'ec_1,838,7.50e-7);
+test_complex_table(lambda([z],z*%e^z*expintegral_e1(z)),'ec_1,838,1.25e-6);
 [];
 
 kill(all);