[Openmcl-devel] clozurecl-1.5: maxima-5.20.1 testsuite failures

Andrey G. Grozin A.G.Grozin at inp.nsk.su
Sat Apr 24 21:16:29 UTC 2010


Thanks, but this doesn't help me :-(

I added the following patch to maxima-5.20.1:

diff -r -U2 maxima-5.20.1.orig/configure maxima-5.20.1/configure
--- maxima-5.20.1.orig/configure        2009-12-14 04:20:43.000000000 
+0100
+++ maxima-5.20.1/configure     2010-04-24 21:59:24.000000000 +0200
@@ -2559,5 +2559,5 @@
  fi

-openmcl_default_name=openmcl
+openmcl_default_name=ccl
  # Check whether --enable-openmcl or --disable-openmcl was given.
  if test "${enable_openmcl+set}" = set; then
diff -r -U2 maxima-5.20.1.orig/src/maxima-build.lisp 
maxima-5.20.1/src/maxima-build.lisp
--- maxima-5.20.1.orig/src/maxima-build.lisp    2008-12-30 
02:32:33.000000000 +0100
+++ maxima-5.20.1/src/maxima-build.lisp 2010-04-24 21:54:19.000000000 
+0200
@@ -36,5 +36,5 @@
    #+allegro (excl:dumplisp :name "binary-acl/maxima.dxl")
    #+lispworks (hcl:save-image "binary-lispworks/maxima" :restart-function 'cl-user::run)
-  #+ccl (ccl:save-application "binary-openmcl/maxima" :toplevel-function 'cl-user::run))
-
-
+  #+ccl (ccl:save-application "binary-openmcl/maxima" :toplevel-function
+   (lambda () (let* ((*read-default-float-format* 'double-float))
+     (cl-user::run))))

and re-compiled maxima by clozurecl-1.5. Running the testsuite gave the 
same result as before. Am I doing something wrong?

Recently maxima-5.21.1 appeared. It will become the next stable maxima, if 
no urgent bugs will be discovered. I applied the same patch and compiled 
it. The testsuite log is attached. Looks like the previous one, though I 
haven't compared them in great detail.

Probably, I'm doing something wrong?

Andrey
-------------- next part --------------
Maxima 5.21.1 http://maxima.sourceforge.net
using Lisp Clozure Common Lisp Version 1.5  (LinuxX8632)
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1)                           run_testsuite()
Running tests in rtestnset: 535/535 tests passed
Running tests in rtest1: 
********************** Problem 8 ***************
Input:
ev(g(z + 2 y, - 0.5), y : 7)


Result:
3 (z + 14) + 1.22984884706593

This differed from the expected result:
1.2298489 + 3 (14 + z)

105/106 tests passed

The following 1 problem failed: (8)
Running tests in rtest1a: 24/24 tests passed
Running tests in rtest2: 
;Compiler warnings for "/var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/share/linearalgebra/linalg-extra.lisp" :
;   In $VANDERMONDE_MATRIX: IGNORE declaration for unknown variable LK
;Compiler warnings for "/var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/share/linearalgebra/linalg-extra.lisp" :
;   In $VANDERMONDE_MATRIX: Unused lexical variable LK56/56 tests passed
Running tests in rtest4: 
********************** Problem 19 ***************
Input:
                 1
ev(%, numer, x = -)
                 2


Result:
2.5 > 1.772453850905516

This differed from the expected result:
2.5 > 1.7724539

88/89 tests passed

The following 1 problem failed: (19)
Running tests in rtest5: 51/51 tests passed
Running tests in rtest6: 4/4 tests passed
Running tests in rtest6a: 52/52 tests passed
Running tests in rtest6b: 16/16 tests passed
Running tests in rtest7: 
********************** Problem 40 ***************
Input:
                        0.25
ev(rectform((3.5 %i + 2)    ), numer)


Result:
0.368258791816691 %i + 1.368266274774369

This differed from the expected result:
1.3682662 + 0.3682588 %i

********************** Problem 41 ***************
Input:
polarform(%)


Result:
                    0.262912553137093 %i
1.416956998795383 %e

This differed from the expected result:
           0.26291254 %i
1.416957 %e

42/44 tests passed

The following 2 problems failed: (40 41)
Running tests in rtest9: 
********************** Problem 19 ***************
Input:
ev(horner(poly, x), keepfloat)


Result:
1.0 ((1.0D-20 x - 5.5) x + 5.2D+20)

This differed from the expected result:
           + 20    10.0 x
1.0 (5.2 10     + (------ - 5.5) x)
                      21
                    10

84/85 tests passed (not counting 1 expected errors)

The following 1 problem failed: (19)
Running tests in rtest9a: 22/22 tests passed
Running tests in rtest10: 
********************** Problem 13 ***************
Input:
   %
    1, 2
ev(-----, numer)
   %
    2, 2


Result:
1.732142857142857

This differed from the expected result:
1.7321428

********************** Problem 19 ***************
Input:
   %
    1, 2
ev(-----, numer)
   %
    2, 2


Result:
1.732142857142857

This differed from the expected result:
1.7321428

44/46 tests passed (not counting 2 expected errors)

The following 2 problems failed: (13 19)
Running tests in rtest11: 135/135 tests passed
Running tests in rtest13: 24/24 tests passed
Running tests in rtest13s: 17/17 tests passed
Running tests in rtest14: 
********************** Problem 3 ***************
Input:
bessel_j(0, 1.0)


Result:
0.765197686557967

This differed from the expected result:
0.7651977

********************** Problem 6 ***************
Input:
bessel_j(3, 2.0)


Result:
0.128943249474402

This differed from the expected result:
0.12894325

********************** Problem 148 ***************
Input:
              1
closeto(gamma(-) - 1.7724539, 2.0D-15)
              2


Result:
1.7724539 - sqrt(%pi)

This differed from the expected result:
true

********************** Problem 149 ***************
Input:
              1
closeto(gamma(-) - 2.6789386, 3.0D-15)
              3


Result:
                  1
2.6789386 - gamma(-)
                  3

This differed from the expected result:
true

********************** Problem 150 ***************
Input:
              7
closeto(gamma(-) - 0.91906255, 1.0D-15)
              4


Result:
                        3
0.91906255 - 0.75 gamma(-)
                        4

This differed from the expected result:
true

********************** Problem 151 ***************
Input:
closeto(gamma(%i + 1) - (0.49801567 - 0.15494983 %i), 1.0D-14)


Result:
3.909787612461634D-9

This differed from the expected result:
true

********************** Problem 152 ***************
Input:
closeto(gamma(5 %i + 1) - (- 0.0013585194 %i - 0.0016996645), 1.0D-14)


Result:
2.050793397496623D-11

This differed from the expected result:
true

********************** Problem 153 ***************
Input:
closeto(gamma(3 %i + 2) - (0.091774285 %i - 0.08239527), 1.0D-14)


Result:
3.4017707910975367D-9

This differed from the expected result:
true

********************** Problem 154 ***************
Input:
closeto(bessel_j(0, 1.0) - 0.7651977, 1.0D-14)


Result:
7.743638619217563D-9

This differed from the expected result:
true

********************** Problem 155 ***************
Input:
closeto(bessel_y(0, 1.0) - 0.08825696, 1.0D-14)


Result:
1.6183067663710915D-9

This differed from the expected result:
true

********************** Problem 156 ***************
Input:
closeto(bessel_i(0, 1.0) - 1.2660658, 1.0D-14)


Result:
4.179924983915839D-8

This differed from the expected result:
true

********************** Problem 157 ***************
Input:
closeto(bessel_k(0, 1.0) - 0.42102444, 1.0D-14)


Result:
3.4783467217636144D-9

This differed from the expected result:
true

********************** Problem 167 ***************
Input:
ev(erf(1.0), nouns)


Result:
0.842700792949715

This differed from the expected result:
0.8427008

********************** Problem 168 ***************
Input:
ev(erf(1.0), erf)


Result:
0.842700792949715

This differed from the expected result:
0.8427008

********************** Problem 169 ***************
Input:
erf(1.0)


Result:
0.842700792949715

This differed from the expected result:
0.8427008

********************** Problem 172 ***************
Input:
test_bessel(bessel_j(- 1, - 2.0), 0.5767248, 15)


Result:
1.9532707895564272D-8

This differed from the expected result:
true

********************** Problem 173 ***************
Input:
test_bessel(bessel_j(- 1, 2.0), - 0.5767248, 15)


Result:
1.9532707895564272D-8

This differed from the expected result:
true

********************** Problem 174 ***************
Input:
test_bessel(bessel_j(- 1, - 1.5), 0.5579365, 15)


Result:
1.8328037865167346D-8

This differed from the expected result:
true

********************** Problem 175 ***************
Input:
test_bessel(bessel_j(- 1, 1.5), - 0.5579365, 15)


Result:
1.8328037865167346D-8

This differed from the expected result:
true

********************** Problem 176 ***************
Input:
test_bessel(bessel_j(- 1.5, - 2.0), - 0.39562327 %i, 15)


Result:
1.4661773461988048D-8

This differed from the expected result:
true

********************** Problem 177 ***************
Input:
test_bessel(bessel_j(- 1.5, 2.0), - 0.39562327, 15)


Result:
1.466177357301035D-8

This differed from the expected result:
true

********************** Problem 178 ***************
Input:
test_bessel(bessel_j(- 1.8, - 1.5), - 0.14772643 %i - 0.20332798, 15)


Result:
6.513585443235215D-8 and 8.960426312043523D-8

This differed from the expected result:
true

********************** Problem 179 ***************
Input:
test_bessel(bessel_j(- 1.8, 1.5), - 0.25132722, 15)


Result:
1.0072066680688607D-7

This differed from the expected result:
true

********************** Problem 180 ***************
Input:
test_bessel(bessel_j(- 2, - 1.5), 0.23208767, 15)


Result:
3.874703613515607D-10

This differed from the expected result:
true

********************** Problem 181 ***************
Input:
test_bessel(bessel_j(- 2, 1.5), 0.23208767, 15)


Result:
3.874703613515607D-10

This differed from the expected result:
true

********************** Problem 182 ***************
Input:
test_bessel(bessel_j(- 2.5, - 1.5), - 1.3150373 %i, 15)


Result:
4.571360534555424D-8

This differed from the expected result:
true

********************** Problem 183 ***************
Input:
test_bessel(bessel_j(- 2.5, 1.5), 1.3150373, 15)


Result:
4.571360556759885D-8

This differed from the expected result:
true

********************** Problem 184 ***************
Input:
test_bessel(bessel_j(- 2.3, - 1.5), 0.5949438 - 0.81886995 %i, 14)


Result:
8.502321835468507D-8 and 1.6981381600889023D-7

This differed from the expected result:
true

********************** Problem 185 ***************
Input:
test_bessel(bessel_j(- 2.3, 1.5), 1.0121789, 14)


Result:
7.665718526617127D-8

This differed from the expected result:
true

********************** Problem 186 ***************
Input:
test_bessel(bessel_j(1.5, 1.0), 0.24029784, 15)


Result:
7.790240674765414D-11

This differed from the expected result:
true

********************** Problem 187 ***************
Input:
test_bessel(bessel_j(1.5, - 1.0), - 0.24029784 %i, 15)


Result:
7.790240674765414D-11

This differed from the expected result:
true

********************** Problem 188 ***************
Input:
test_bessel(bessel_j(1.8, 1.0), 0.15649532, 14)


Result:
8.693123831893246D-9

This differed from the expected result:
true

********************** Problem 189 ***************
Input:
test_bessel(bessel_j(1.8, - 1.0), 0.12660737 - 0.091985635 %i, 15)


Result:
8.4497973340536D-9 and 2.848190708282239D-8

This differed from the expected result:
true

********************** Problem 190 ***************
Input:
test_bessel(bessel_j(2.0, 1.0), 0.11490349, 15)


Result:
2.3332095144823484D-9

This differed from the expected result:
true

********************** Problem 191 ***************
Input:
test_bessel(bessel_j(2.0, - 1.0), 0.11490349, 15)


Result:
2.3332095144823484D-9

This differed from the expected result:
true

********************** Problem 192 ***************
Input:
test_bessel(bessel_j(2.5, 1.0), 0.04949681, 15)


Result:
6.548056680211189D-10

This differed from the expected result:
true

********************** Problem 193 ***************
Input:
test_bessel(bessel_j(2.5, - 1.0), 0.04949681 %i, 15)


Result:
6.548056680211189D-10

This differed from the expected result:
true

********************** Problem 194 ***************
Input:
test_bessel(bessel_j(0, %i + 1.0), 0.9376085 - 0.49652994 %i, 15)


Result:
3.6474619991011537D-9 and 1.081865580454533D-8

This differed from the expected result:
true

********************** Problem 195 ***************
Input:
test_bessel(bessel_j(1, %i + 1.0), 0.36502802 %i + 0.61416036, 15)


Result:
2.3982888563978122D-8 and 5.107300304896256D-9

This differed from the expected result:
true

********************** Problem 196 ***************
Input:
test_bessel(bessel_j(- 1, %i + 1.0), - 0.36502802 %i - 0.61416036, 14)


Result:
2.3982888675000424D-8 and 5.10730047142971D-9

This differed from the expected result:
true

********************** Problem 197 ***************
Input:
test_bessel(bessel_j(2, %i + 1.0), 0.24739765 %i + 0.041579887, 15)


Result:
3.269653089943425D-10 and 4.794638880367685D-9

This differed from the expected result:
true

********************** Problem 198 ***************
Input:
test_bessel(bessel_j(- 2, %i + 1.0), 0.24739765 %i + 0.041579887, 15)


Result:
3.269653991999633D-10 and 4.7946387971009585D-9

This differed from the expected result:
true

********************** Problem 199 ***************
Input:
test_bessel(bessel_j(2.3, %i + 1.0), 0.16777982 %i - 0.014161522, 15)


Result:
5.98082159491975D-9 and 1.762235704583226D-8

This differed from the expected result:
true

********************** Problem 200 ***************
Input:
test_bessel(bessel_j(- 2.3, %i + 1.0), 0.19205986 - 0.5158677 %i, 14)


Result:
2.1643222186673583D-8 and 1.42907630173994D-7

This differed from the expected result:
true

********************** Problem 201 ***************
Input:
test_bessel(bessel_y(- 1, - 2.0), 1.1534497 %i - 0.10703243, 14)


Result:
1.6112612910568203D-9 and 3.9065415791128544D-8

This differed from the expected result:
true

********************** Problem 202 ***************
Input:
test_bessel(bessel_y(- 1, 2.0), 0.10703243, 15)


Result:
1.6112612910568203D-9

This differed from the expected result:
true

********************** Problem 203 ***************
Input:
test_bessel(bessel_y(- 1, - 1.5), 1.115873 %i - 0.41230863, 15)


Result:
6.353572890027692D-9 and 3.665607573033469D-8

This differed from the expected result:
true

********************** Problem 204 ***************
Input:
test_bessel(bessel_y(- 1, 1.5), 0.41230863, 15)


Result:
6.353572890027692D-9

This differed from the expected result:
true

********************** Problem 205 ***************
Input:
test_bessel(bessel_y(- 1.5, - 2.0), 0.4912938 %i, 15)


Result:
9.269075007534155D-9

This differed from the expected result:
true

********************** Problem 206 ***************
Input:
test_bessel(bessel_y(- 1.5, 2.0), - 0.4912938, 15)


Result:
9.269075618156819D-9

This differed from the expected result:
true

********************** Problem 207 ***************
Input:
test_bessel(bessel_y(- 1.8, - 1.5), 0.085751995 %i - 0.6777414, 14)


Result:
8.729856459943619D-8 and 4.510224345388725D-8

This differed from the expected result:
true

********************** Problem 208 ***************
Input:
test_bessel(bessel_y(- 1.8, 1.5), - 0.83773446, 14)


Result:
2.5675529147228815D-8

This differed from the expected result:
true

********************** Problem 209 ***************
Input:
test_bessel(bessel_y(- 2, - 1.5), 0.46417534 %i - 0.93219376, 15)


Result:
3.6594581809268334D-9 and 7.749405006585164D-10

This differed from the expected result:
true

********************** Problem 210 ***************
Input:
test_bessel(bessel_y(- 2, 1.5), - 0.93219376, 14)


Result:
3.6594581809268334D-9

This differed from the expected result:
true

********************** Problem 211 ***************
Input:
test_bessel(bessel_y(- 2.5, - 1.5), 0.12444636 %i, 14)


Result:
2.4586157415518173D-9

This differed from the expected result:
true

********************** Problem 212 ***************
Input:
test_bessel(bessel_y(- 2.5, 1.5), 0.12444636, 15)


Result:
2.4586163799300564D-9

This differed from the expected result:
true

********************** Problem 213 ***************
Input:
test_bessel(bessel_y(- 2.3, - 1.5), 0.7565241 %i - 0.3148571, 14)


Result:
1.2742488209038783D-7 and 7.429228332522797D-8

This differed from the expected result:
true

********************** Problem 214 ***************
Input:
test_bessel(bessel_y(- 2.3, 1.5), - 0.5356669, 14)


Result:
1.0892021806707675D-7

This differed from the expected result:
true

********************** Problem 215 ***************
Input:
test_bessel(bessel_y(1.5, 1.0), - 1.1024956, 14)


Result:
2.4050864633196056D-8

This differed from the expected result:
true

********************** Problem 216 ***************
Input:
test_bessel(bessel_y(1.5, - 1.0), - 1.1024956 %i, 14)


Result:
2.4050864633196056D-8

This differed from the expected result:
true

********************** Problem 217 ***************
Input:
test_bessel(bessel_y(1.8, 1.0), - 1.382352, 14)


Result:
5.369846833858105D-8

This differed from the expected result:
true

********************** Problem 218 ***************
Input:
test_bessel(bessel_y(1.8, - 1.0), - 0.5593114 %i - 1.1183462, 14)


Result:
1.236858047093392D-7 and 1.3208377880324917D-7

This differed from the expected result:
true

********************** Problem 219 ***************
Input:
test_bessel(bessel_y(2.0, 1.0), - 1.6506826, 14)


Result:
3.826614491941882D-8

This differed from the expected result:
true

********************** Problem 220 ***************
Input:
test_bessel(bessel_y(2.0, - 1.0), 0.22980697 %i - 1.6506826, 14)


Result:
3.826614491941882D-8 and 4.666419445298331D-9

This differed from the expected result:
true

********************** Problem 221 ***************
Input:
test_bessel(bessel_y(2.5, 1.0), - 2.8763878, 14)


Result:
2.2913209996033856D-8

This differed from the expected result:
true

********************** Problem 222 ***************
Input:
test_bessel(bessel_y(2.5, - 1.0), 2.8763878 %i, 14)


Result:
2.2913209996033856D-8

This differed from the expected result:
true

********************** Problem 223 ***************
Input:
test_bessel(bessel_y(0, %i + 1.0), 0.7101586 %i + 0.44547448, 15)


Result:
1.3313855407037778D-8 and 4.498340588909855D-9

This differed from the expected result:
true

********************** Problem 224 ***************
Input:
test_bessel(bessel_y(1, %i + 1.0), 0.629801 %i - 0.6576945, 15)


Result:
1.7025213683297125D-8 and 2.8670161134058958D-8

This differed from the expected result:
true

********************** Problem 225 ***************
Input:
test_bessel(bessel_y(- 1, %i + 1.0), 0.6576945 - 0.629801 %i, 15)


Result:
1.7025213794319427D-8 and 2.8670161023036655D-8

This differed from the expected result:
true

********************** Problem 226 ***************
Input:
test_bessel(bessel_y(2, %i + 1.0), 0.57733697 %i - 0.47336802, 14)


Result:
1.6689079007647933D-9 and 9.410929591169293D-9

This differed from the expected result:
true

********************** Problem 227 ***************
Input:
test_bessel(bessel_y(- 2, %i + 1.0), 0.57733697 %i - 0.47336802, 14)


Result:
1.6689079007647933D-9 and 9.410929813213897D-9

This differed from the expected result:
true

********************** Problem 228 ***************
Input:
test_bessel(bessel_y(2.3, %i + 1.0), 0.7595467 %i - 0.247688, 15)


Result:
4.598977568215368D-8 and 2.283413569337256D-8

This differed from the expected result:
true

********************** Problem 229 ***************
Input:
test_bessel(bessel_y(- 2.3, %i + 1.0), 0.58218706 %i - 0.15704426, 14)


Result:
5.17720034065583D-8 and 9.279690249552885D-8

This differed from the expected result:
true

********************** Problem 230 ***************
Input:
test_bessel(bessel_i(- 1, - 2.0), - 1.5906368, 15)


Result:
5.233947719673893D-9

This differed from the expected result:
true

********************** Problem 231 ***************
Input:
test_bessel(bessel_i(- 1, 2.0), 1.5906368, 15)


Result:
5.233947719673893D-9

This differed from the expected result:
true

********************** Problem 232 ***************
Input:
test_bessel(bessel_i(- 1, - 1.5), - 0.98166645, 15)


Result:
1.7154209164260692D-8

This differed from the expected result:
true

********************** Problem 233 ***************
Input:
test_bessel(bessel_i(- 1, 1.5), 0.98166645, 15)


Result:
1.7154209164260692D-8

This differed from the expected result:
true

********************** Problem 234 ***************
Input:
test_bessel(bessel_i(- 1.5, - 2.0), 0.98494107 %i, 14)


Result:
1.2311194619307742D-8

This differed from the expected result:
true

********************** Problem 235 ***************
Input:
test_bessel(bessel_i(- 1.5, 2.0), 0.98494107, 14)


Result:
1.2311194619307742D-8

This differed from the expected result:
true

********************** Problem 236 ***************
Input:
test_bessel(bessel_i(- 1.8, - 1.5), 0.1472632 %i + 0.2026904, 15)


Result:
2.0996168303977214D-8 and 2.238422930345152D-8

This differed from the expected result:
true

********************** Problem 237 ***************
Input:
test_bessel(bessel_i(- 1.8, 1.5), 0.25053912, 15)


Result:
1.8892830355721202D-8

This differed from the expected result:
true

********************** Problem 238 ***************
Input:
test_bessel(bessel_i(- 2, - 1.5), 0.33783463, 15)


Result:
8.100552784107151D-9

This differed from the expected result:
true

********************** Problem 239 ***************
Input:
test_bessel(bessel_i(- 2, 1.5), 0.33783463, 15)


Result:
8.100552784107151D-9

This differed from the expected result:
true

********************** Problem 240 ***************
Input:
test_bessel(bessel_i(- 2.5, - 1.5), - 0.80156666 %i, 14)


Result:
6.675165975522646D-10

This differed from the expected result:
true

********************** Problem 241 ***************
Input:
test_bessel(bessel_i(- 2.5, 1.5), 0.80156666, 14)


Result:
6.67516708574567D-10

This differed from the expected result:
true

********************** Problem 242 ***************
Input:
test_bessel(bessel_i(- 2.3, - 1.5), 0.37339452 - 0.5139335 %i, 15)


Result:
5.4821855166586886D-8 and 1.0095206992577488D-7

This differed from the expected result:
true

********************** Problem 243 ***************
Input:
test_bessel(bessel_i(- 2.3, 1.5), 0.6352567, 15)


Result:
4.6383371588021305D-8

This differed from the expected result:
true

********************** Problem 244 ***************
Input:
test_bessel(bessel_i(1.5, 1.0), 0.29352534, 15)


Result:
1.1825432744139164D-8

This differed from the expected result:
true

********************** Problem 245 ***************
Input:
test_bessel(bessel_i(1.5, - 1.0), - 0.29352534 %i, 13)


Result:
1.1825432466583408D-8

This differed from the expected result:
true

********************** Problem 246 ***************
Input:
test_bessel(bessel_i(1.8, 1.0), 0.18710119, 15)


Result:
1.7468087865069037D-8

This differed from the expected result:
true

********************** Problem 247 ***************
Input:
test_bessel(bessel_i(1.8, - 1.0), 0.15136804 - 0.10997532 %i, 14)


Result:
6.157840626297428D-10 and 2.728042602928582D-8

This differed from the expected result:
true

********************** Problem 248 ***************
Input:
test_bessel(bessel_i(2.0, 1.0), 0.13574767, 15)


Result:
1.3602809989521347D-9

This differed from the expected result:
true

********************** Problem 249 ***************
Input:
test_bessel(bessel_i(2.0, - 1.0), 0.13574767, 15)


Result:
1.3602809989521347D-9

This differed from the expected result:
true

********************** Problem 250 ***************
Input:
test_bessel(bessel_i(2.5, 1.0), 0.05709891, 15)


Result:
1.0094685434780537D-9

This differed from the expected result:
true

********************** Problem 251 ***************
Input:
test_bessel(bessel_i(2.5, - 1.0), 0.05709891 %i, 15)


Result:
1.0094684949057964D-9

This differed from the expected result:
true

********************** Problem 252 ***************
Input:
test_bessel(bessel_i(0, %i + 1.0), 0.49652994 %i + 0.9376085, 15)


Result:
3.6474619991011537D-9 and 1.081865580454533D-8

This differed from the expected result:
true

********************** Problem 253 ***************
Input:
test_bessel(bessel_i(1, %i + 1.0), 0.61416036 %i + 0.36502802, 15)


Result:
5.107300304896256D-9 and 2.3982888563978122D-8

This differed from the expected result:
true

********************** Problem 254 ***************
Input:
test_bessel(bessel_i(- 1, %i + 1.0), 0.61416036 %i + 0.36502802, 15)


Result:
5.107300304896256D-9 and 2.3982888563978122D-8

This differed from the expected result:
true

********************** Problem 255 ***************
Input:
test_bessel(bessel_i(2, %i + 1.0), 0.24739765 %i - 0.041579887, 15)


Result:
3.269653089943425D-10 and 4.794638880367685D-9

This differed from the expected result:
true

********************** Problem 256 ***************
Input:
test_bessel(bessel_i(- 2, %i + 1.0), 0.24739765 %i - 0.041579887, 15)


Result:
3.269653645054937D-10 and 4.794638741589807D-9

This differed from the expected result:
true

********************** Problem 257 ***************
Input:
test_bessel(bessel_i(2.3, %i + 1.0), 0.15592211 %i - 0.06355244, 15)


Result:
2.172082944063014D-9 and 1.177465436263958D-8

This differed from the expected result:
true

********************** Problem 258 ***************
Input:
test_bessel(bessel_i(- 2.3, %i + 1.0), - 0.37244812 %i - 0.40532562, 14)


Result:
6.737579810733862D-8 and 7.966453263730244D-8

This differed from the expected result:
true

********************** Problem 259 ***************
Input:
test_bessel(bessel_k(- 1, - 2.0), - 4.9971333 %i - 0.13986588, 14)


Result:
6.5723817499474535D-9 and 1.9794707384335197D-7

This differed from the expected result:
true

********************** Problem 260 ***************
Input:
test_bessel(bessel_k(- 1, 2.0), 0.13986588, 14)


Result:
6.5723817499474535D-9

This differed from the expected result:
true

********************** Problem 261 ***************
Input:
test_bessel(bessel_k(- 1, - 1.5), - 3.083996 %i - 0.2773878, 14)


Result:
2.6243549000604105D-9 and 1.7214292213907356D-8

This differed from the expected result:
true

********************** Problem 262 ***************
Input:
test_bessel(bessel_k(- 1, 1.5), 0.2773878, 15)


Result:
2.6243549000604105D-9

This differed from the expected result:
true

********************** Problem 263 ***************
Input:
test_bessel(bessel_k(- 1.5, - 2.0), - 3.2741902 %i, 13)


Result:
4.682240595244025D-8

This differed from the expected result:
true

********************** Problem 264 ***************
Input:
test_bessel(bessel_k(- 1.5, 2.0), 0.17990665, 15)


Result:
6.574414207483059D-9

This differed from the expected result:
true

********************** Problem 265 ***************
Input:
test_bessel(bessel_k(- 1.8, - 1.5), 0.3929372 - 1.0725775 %i, 15)


Result:
5.29194168485958D-8 and 1.6722579765371393D-8

This differed from the expected result:
true

********************** Problem 266 ***************
Input:
test_bessel(bessel_k(- 1.8, 1.5), 0.48569712, 15)


Result:
2.6594887292397118D-8

This differed from the expected result:
true

********************** Problem 267 ***************
Input:
test_bessel(bessel_k(- 2, - 1.5), 0.58365595 - 1.0613388 %i, 14)


Result:
9.849363324931915D-9 and 2.721879988065723D-8

This differed from the expected result:
true

********************** Problem 268 ***************
Input:
test_bessel(bessel_k(- 2, 1.5), 0.58365595, 15)


Result:
9.849363324931915D-9

This differed from the expected result:
true

********************** Problem 269 ***************
Input:
test_bessel(bessel_k(- 2.3, - 1.5), 0.46559867 - 1.3548763 %i, 14)


Result:
5.892134452567532D-8 and 9.40131288373891D-8

This differed from the expected result:
true

********************** Problem 270 ***************
Input:
test_bessel(bessel_k(- 2.3, 1.5), 0.79212373, 15)


Result:
2.3554781902745958D-8

This differed from the expected result:
true

********************** Problem 271 ***************
Input:
test_bessel(bessel_k(1.5, 1.0), 0.922137, 14)


Result:
1.3122643749419183D-8

This differed from the expected result:
true

********************** Problem 273 ***************
Input:
test_bessel(bessel_k(1.8, 1.0), 1.275527, 15)


Result:
3.345859589387601D-8

This differed from the expected result:
true

********************** Problem 274 ***************
Input:
test_bessel(bessel_k(1.8, - 1.0), 0.16194026 %i + 1.031923, 14)


Result:
1.7490019654786693D-7 and 6.87863165316216D-8

This differed from the expected result:
true

********************** Problem 275 ***************
Input:
test_bessel(bessel_k(2.0, 1.0), 1.624839, 14)


Result:
4.9614639285877615D-8

This differed from the expected result:
true

********************** Problem 276 ***************
Input:
test_bessel(bessel_k(2.0, - 1.0), 1.624839 - 0.42646387 %i, 14)


Result:
4.9614639285877615D-8 and 9.887770324734646D-9

This differed from the expected result:
true

********************** Problem 277 ***************
Input:
test_bessel(bessel_k(2.5, 1.0), 3.2274795, 14)


Result:
7.328003670536987D-8

This differed from the expected result:
true

********************** Problem 278 ***************
Input:
test_bessel(bessel_k(2.5, - 1.0), - 3.406861 %i, 14)


Result:
2.2002689004096965D-8

This differed from the expected result:
true

********************** Problem 279 ***************
Input:
test_bessel(bessel_k(0, %i + 1.0), 0.08019773 - 0.35727745 %i, 15)


Result:
2.2238046820666213D-9 and 6.339620939321833D-9

This differed from the expected result:
true

********************** Problem 280 ***************
Input:
test_bessel(bessel_k(1, %i + 1.0), 0.024568306 - 0.45971948 %i, 15)


Result:
7.584222694312359D-10 and 5.282825676911074D-9

This differed from the expected result:
true

********************** Problem 281 ***************
Input:
test_bessel(bessel_k(- 1, %i + 1.0), 0.024568306 - 0.45971948 %i, 15)


Result:
7.584222694312359D-10 and 5.282825676911074D-9

This differed from the expected result:
true

********************** Problem 282 ***************
Input:
test_bessel(bessel_k(2, %i + 1.0), - 0.84156525 %i - 0.35495344, 13)


Result:
3.28733662513514D-9 and 1.2740143162659479D-8

This differed from the expected result:
true

********************** Problem 283 ***************
Input:
test_bessel(bessel_k(- 2, %i + 1.0), - 0.84156525 %i - 0.35495344, 13)


Result:
3.28733662513514D-9 and 1.2740143162659479D-8

This differed from the expected result:
true

********************** Problem 284 ***************
Input:
test_bessel(bessel_k(2.3, %i + 1.0), - 1.0258895 %i - 0.6635906, 15)


Result:
8.119366079473167D-8 and 6.22358713453508D-8

This differed from the expected result:
true

********************** Problem 285 ***************
Input:
test_bessel(bessel_k(- 2.3, %i + 1.0), - 1.0258895 %i - 0.6635906, 13)


Result:
8.119366079473167D-8 and 6.22358713453508D-8

This differed from the expected result:
true

230/358 tests passed

The following 128 problems failed: (3 6 148 149 150 151 152 153 154 155 156 157 167 168 169 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 273 274 275 276 277 278 279 280 281 282 283 284 285)
Running tests in rtest15: 
********************** Problem 231 ***************
Input:
ev(Y1, numer)


Result:
[0.160107126728731, 0.318217397648185, 0.679282208724561, - 0.255447520108661, 
0.455000045821639, 1.513096652187913, 1.631906796078438, 1.153564994895108, 
- 1.945910149055313, 0.935437562892546, 6.548062940247827, 
1.427448757889531 %i, 0.14384103622589 - 1.570796326794897 %i, 
2.644120761058629, 2.633915793849634, 0.142375643167804, 0.14384103622589, 
1.010221447322645, 7.047554385466547, 6.976247043798604, 0.989881973551706, 
0.143343547572463, 0.141893193766933, 0.377964473009227, 1.427448757889531, 
1.428899272190733, 1.570796326794897 - 2.633915793849634 %i, 
2.633915793849634 %i, 0.143347568905365, 0.141897054604164, 0.989813260446615, 
6.952316038379696, 7.023866335396166, 1.010291577169605, 0.142371729792264, 
0.143836959436191, 0.154150679827258, 0.148311797498793, 0.14552316969849, 
- 7.363980242224349, 50.3574714369117, - 687.6815220686585]

This differed from the expected result:
[0.16010712, 0.3182174, 0.6792822, - 0.2554475, 0.45500004, 1.5130967, 
1.6319067, 1.153565, - 1.9459101, 0.93543756, 6.548063, 1.4274487 %i, 
0.14384104 - 1.5707964 %i, 2.6441207, 2.633916, 0.14237565, 0.14384104, 
1.0102215, 7.0475545, 6.976247, 0.989882, 0.14334355, 0.1418932, 0.37796447, 
1.4274487, 1.4288993, 1.5707964 - 2.633916 %i, 2.633916 %i, 0.14334758, 
0.14189705, 0.98981327, 6.952316, 7.023866, 1.0102916, 0.14237173, 0.14383696, 
0.15415068, 0.1483118, 0.14552318, - 7.3639803, 50.35747, - 687.6815]

********************** Problem 232 ***************
Input:
                   1
makelist(foo(float(-)), foo, F1)
                   7


Result:
[0.160107126728731, 0.318217397648185, 0.679282208724561, - 0.255447520108661, 
0.455000045821639, 1.513096652187913, 1.631906796078438, 1.153564994895108, 
- 1.945910149055313, 0.935437562892546, 6.548062940247827, 
1.427448757889531 %i, 0.14384103622589 - 1.570796326794897 %i, 
2.644120761058629, 2.633915793849634, 0.142375643167804, 0.14384103622589, 
1.010221447322645, 7.047554385466547, 6.976247043798604, 0.989881973551706, 
0.143343547572463, 0.141893193766933, 0.377964473009227, 1.427448757889531, 
1.428899272190733, 1.570796326794897 - 2.633915793849634 %i, 
2.633915793849634 %i, 0.143347568905365, 0.141897054604164, 0.989813260446615, 
6.952316038379696, 7.023866335396166, 1.010291577169605, 0.142371729792264, 
0.143836959436191, 0.154150679827258, 0.148311797498793, 0.14552316969849, 
- 7.363980242224349, 50.3574714369117, - 687.6815220686585]

This differed from the expected result:
[0.16010712, 0.3182174, 0.6792822, - 0.2554475, 0.45500004, 1.5130967, 
1.6319067, 1.153565, - 1.9459101, 0.93543756, 6.548063, 1.4274487 %i, 
0.14384104 - 1.5707964 %i, 2.6441207, 2.633916, 0.14237565, 0.14384104, 
1.0102215, 7.0475545, 6.976247, 0.989882, 0.14334355, 0.1418932, 0.37796447, 
1.4274487, 1.4288993, 1.5707964 - 2.633916 %i, 2.633916 %i, 0.14334758, 
0.14189705, 0.98981327, 6.952316, 7.023866, 1.0102916, 0.14237173, 0.14383696, 
0.15415068, 0.1483118, 0.14552318, - 7.3639803, 50.35747, - 687.6815]

********************** Problem 234 ***************
Input:
ev(Y2, numer)


Result:
[0.463647609000806, 0.824100335701528, 0.795186657155776, 1.44325571710677, 
- 1.035878262667884, 0.992706118230306, 0.989832930447624, 6.959141929885597, 
1.007347473371774, 0.997105701546593, 7.010274039905824, 1.010271500613521, 
1.002902699732754, 7.030622760487995, 0.143695876600183, 0.142647775865469, 
0.142234910628399, 0.142718756869998, 0.142580931447268, 0.1429957703483, 
9.973633393356863]

This differed from the expected result:
[0.4636476, 0.8241003, 0.79518664, 1.4432557, - 1.0358783, 0.9927061, 
0.98983294, 6.9591417, 1.0073475, 0.9971057, 7.010274, 1.0102715, 1.0029027, 
7.030623, 0.14369588, 0.14264777, 0.1422349, 0.14271876, 0.14258093, 
0.14299577, 9.973634]

********************** Problem 235 ***************
Input:
                   1         2
makelist(foo(float(-), float(-)), foo, F2)
                   7         7


Result:
[0.463647609000806, 0.824100335701528, 0.795186657155776, 1.44325571710677, 
- 1.035878262667884, 0.992706118230306, 0.989832930447624, 6.959141929885597, 
1.007347473371774, 0.997105701546593, 7.010274039905824, 1.010271500613521, 
1.002902699732754, 7.030622760487995, 0.143695876600183, 0.142647775865469, 
0.142234910628399, 0.142718756869998, 0.142580931447268, 0.1429957703483, 
9.973633393356863]

This differed from the expected result:
[0.4636476, 0.8241003, 0.79518664, 1.4432557, - 1.0358783, 0.9927061, 
0.98983294, 6.9591417, 1.0073475, 0.9971057, 7.010274, 1.0102715, 1.0029027, 
7.030623, 0.14369588, 0.14264777, 0.1422349, 0.14271876, 0.14258093, 
0.14299577, 9.973634]

********************** Problem 237 ***************
Input:
ev(Y2, numer)


Result:
[1.562139916774403, 1.536246964132837, 1.537956342530595, 0.142032908537516, 
                                          0.143067439129136, 0.143487627597992]

This differed from the expected result:
[1.5621399, 1.536247, 1.5379564, 0.1420329, 0.14306743, 0.14348763]

********************** Problem 238 ***************
Input:
                   1         2
makelist(foo(float(-), float(-)), foo, F2)
                   7         7


Result:
[1.562139916774403, 1.536246964132837, 1.537956342530595, 0.142032908537516, 
                                          0.143067439129136, 0.143487627597992]

This differed from the expected result:
[1.5621399, 1.536247, 1.5379564, 0.1420329, 0.14306743, 0.14348763]

********************** Problem 240 ***************
Input:
ev(Y2, numer)


Result:
[0.542236603307174, 1.943092630269517, 1.96920504408893, 0.536085361615397, 
                                          0.461019342719435, 1.716205223757663]

This differed from the expected result:
[0.5422366, 1.9430926, 1.969205, 0.53608537, 0.46101934, 1.7162052]

********************** Problem 241 ***************
Input:
                         8         1                            1         8
[inverse_jacobi_dc(float(-), float(-)), inverse_jacobi_dn(float(-), float(-)), 
                         7         7                            7         7
                        1         8                            8         9
inverse_jacobi_ds(float(-), float(-)), inverse_jacobi_nc(float(-), float(-)), 
                        7         7                            7         7
                        8         9                            8         9
inverse_jacobi_nd(float(-), float(-)), inverse_jacobi_ns(float(-), float(-))]
                        7         7                            7         7


Result:
[0.542236603307174, 1.943092630269517, 1.96920504408893, 0.536085361615397, 
                                          0.461019342719435, 1.716205223757663]

This differed from the expected result:
[0.5422366, 1.9430926, 1.969205, 0.53608537, 0.46101934, 1.7162052]

********************** Problem 243 ***************
Input:
ev(Y3, numer)


Result:
0.341152767055257

This differed from the expected result:
0.34115276

********************** Problem 244 ***************
Input:
                  1         1         1
elliptic_pi(float(-), float(-), float(-))
                  2         3         4


Result:
0.341152767055257

This differed from the expected result:
0.34115276

240/250 tests passed

The following 10 problems failed: (231 232 234 235 237 238 240 241 243 244)
Running tests in rtest16: 
********************** Problem 185 ***************
Input:
ev(%e, numer)


Result:
2.718281828459045

This differed from the expected result:
2.7182817

********************** Problem 186 ***************
Input:
ev(1 + %e, numer)


Result:
3.718281828459045

This differed from the expected result:
3.7182817

********************** Problem 187 ***************
Input:
     %e
ev(%e  , numer)


Result:
15.15426224147926

This differed from the expected result:
15.154263

********************** Problem 189 ***************
Input:
ev(sin(%e), numer)


Result:
0.410781290502909

This differed from the expected result:
0.4107813

********************** Problem 190 ***************
Input:
ev(sin(1 + %e), numer)


Result:
- 0.545251556692334

This differed from the expected result:
- 0.54525155

********************** Problem 194 ***************
Input:
         x
ev(sin(%e ), numer)


Result:
                     x
sin(2.718281828459045 )

This differed from the expected result:
             x
sin(2.7182817 )

********************** Problem 195 ***************
Input:
           1 + 2 x
         %e
ev(sin(%e         ), numer)


Result:
                                      2 x + 1
                     2.718281828459045
sin(2.718281828459045                        )

This differed from the expected result:
                      1 + 2 x
             2.7182817
sin(2.7182817                )

368/375 tests passed

The following 7 problems failed: (185 186 187 189 190 194 195)
Running tests in rtestode: 76/76 tests passed
Running tests in rtestode_zp: 30/30 tests passed
Running tests in rtest3: 
********************** Problem 14 ***************
Input:
                                               10
for i thru 10 do (guess : subst(guess, x, 0.5 (-- + x)), 
                                               x
                                     !     2     !
                                  if !guess  - 10! < 5.0D-5 then return(guess))


Result:
- 3.1622806

This differed from the expected result:
- 3.1622808

********************** Problem 18 ***************
Input:
x


Result:
2.282429035887867

This differed from the expected result:
2.282429

********************** Problem 69 ***************
Input:
ev(ans, x : 1, numer) - ev(ans, x : 0, numer)


Result:
0.57791601820424

This differed from the expected result:
0.577916

********************** Problem 78 ***************
Input:
ev(%, numer)


Result:
0.836169314292147

This differed from the expected result:
0.8361693

********************** Problem 80 ***************
Input:
ev(sin(1), numer)


Result:
0.841470984807897

This differed from the expected result:
0.84147096

********************** Problem 82 ***************
Input:
ev(%, numer)


Result:
3.67909398040588

This differed from the expected result:
3.679094

127/133 tests passed

The following 6 problems failed: (14 18 69 78 80 82)
Running tests in rtest8: 
********************** Problem 8 ***************
Input:
sort(allroots(%))


Result:
[x = - 1.015755543828121, x = 0.829674990212936, x = 1.0, 
x = - 0.965962515219637 %i - 0.406959723192407, 
x = 0.965962515219637 %i - 0.406959723192407]

This differed from the expected result:
[x = - 1.0157555, x = 0.829675, x = 1.0, x = - 0.4069597 - 0.9659625 %i, 
                                                  x = 0.9659625 %i - 0.4069597]

********************** Problem 37 ***************
Input:
solve(%, [x, y])


Result:
[[x = 2, y = 2], [x = 0.520259438865201 %i - 0.133124035735871, 
y = 0.0767837852378779 - 3.608003221870287 %i], 
[x = - 0.520259438865201 %i - 0.133124035735871, 
y = 3.608003221870287 %i + 0.0767837852378779], 
[x = - 1.733751846381093, y = - 0.15356757100197]]

This differed from the expected result:
[[x = 2, y = 2], [x = 0.52025944 %i - 0.13312404, 
y = 0.076783784 - 3.6080031 %i], [x = - 0.13312404 - 0.52025944 %i, 
y = 0.076783784 + 3.6080031 %i], [x = - 1.7337519, y = - 0.15356757]]

********************** Problem 65 ***************
Input:
                      %e + 4   %e + 4 x
find_root(2 x = - log(------) (------) , x, - 1, 0)
                      2 %pi    2 %pi


Result:
- 0.0334028982687412

This differed from the expected result:
- 0.033402897

********************** Problem 66 ***************
Input:
find_root(2 x = cos((%pi + %e) x), x, 0, 1)


Result:
0.198421050565687

This differed from the expected result:
0.19842105

********************** Problem 67 ***************
Input:
         2
(expr : x  - 5, find_root(expr, x, 0, 10))


Result:
2.23606797749979

This differed from the expected result:
sqrt(5.0)

********************** Problem 74 ***************
Input:
                         c
                 2 atan(----)
                        2 fl
        6096 tan(------------)
                      r
(expr : ----------------------, ev(find_root(expr = 6096, fl, 1, 10), 
                  %pi
             tan(------)
                 60 180
                                                          c = 7.176, r = 3264))


Result:
6.98149304787515

This differed from the expected result:
6.981493

********************** Problem 81 ***************
Input:
                    x                                   x
[find_root(sin(x) - -, x, 0.1, %pi), find_root(sin(x) = -, x, 0.1, %pi), 
                    2                                   2
                          find_root(f(x), x, 0.1, %pi), find_root(f, 0.1, %pi)]


Result:
[1.895494267033981, 1.895494267033981, 1.895494267033981, 1.895494267033981]

This differed from the expected result:
[1.8954942, 1.8954942, 1.8954942, 1.8954942]

********************** Problem 82 ***************
Input:
                1                                              %pi
[find_root(f, ------, 2 %pi sin(%e)), find_root(f, log(%pi), %e   ), 
              %pi %e
                 1
find_root(f, exp(-), exp(cos(%pi + %e))), 
                 5
             cos(exp(2))
find_root(f, -----------, 10 cos(exp(2)))]
                 10


Result:
[1.895494267033981, 1.895494267033981, 1.895494267033981, 1.895494267033981]

This differed from the expected result:
[1.8954942, 1.8954942, 1.8954942, 1.8954942]

********************** Problem 83 ***************
Input:
block([expr], charfun2(z, l1, l2) := charfun((l1 <= z) and (z < l2)), 
                                  2            3
expr : (- 0.213 + 1.55 x - 0.498 x  + 0.00117 x ) charfun2(x, 1.0, 1.5)
                              2           3
 + (- 0.275 + 1.67 x - 0.581 x  + 0.0195 x ) charfun2(x, 1.5, 2.0)
                             2           3
 + (- 0.866 + 2.56 x - 1.02 x  + 0.0933 x ) charfun2(x, 2.0, 2.5)
                            2          3
 + (- 2.77 + 4.85 x - 1.94 x  + 0.215 x ) charfun2(x, 2.5, inf)
                             2          3
 + (0.117 + 0.559 x + 0.494 x  - 0.329 x ) charfun2(x, minf, 1.0), 
block([float_approx_equal_tolerance : 1.0D-12], 
float_approx_equal(find_root(expr, x, 0, 4), 3.1272714)))


Result:
false

This differed from the expected result:
true

********************** Problem 92 ***************
Input:
                 4
ev(e2, foo(u) = u )


Result:
[0.4, 4.440892098500628D-15, 21, 0]

This differed from the expected result:
[0.4, 4.440892098500628D-15, 21, 0]

********************** Problem 101 ***************
Input:
ev(e5, au = 0, omega = 2)


Result:
[0.4, 2.2165709488159253D-11, 175, 0]

This differed from the expected result:
[0.4, 2.216570948815925D-11, 175, 0]

********************** Problem 107 ***************
Input:
ev(e7, alfa = 2, vita = 1)


Result:
[0.0529610277865573, 5.551115123125783D-17, 50, 0]

This differed from the expected result:
[0.05296103, 5.551115123125782D-17, 50, 0]

********************** Problem 120 ***************
Input:
                            x
first(quad_qags(sin(%pi exp(-)), x, 0, 2))
                            2


Result:
- 0.43734547482525

This differed from the expected result:
- 0.43734547

********************** Problem 121 ***************
Input:
           2             1
quad_qags(w  quad_qags(-----, s, 1, 5) , w, - 5, - 1)
                       s - w
                                      1
                                                     1


Result:
25.83639378805382

This differed from the expected result:
25.836393

********************** Problem 122 ***************
Input:
              1 + x   1 + x
find_root(0.05      = -----, x, 5, 100)
                        10
                      10


Result:
6.03499260639099

This differed from the expected result:
6.0349927

********************** Problem 123 ***************
Input:
                 1                                       2
(f : diff(----------------, a), g : quad_qags(f b (1 - b) , b, 0, 1) , 
                 2                                                  1
          (a - b)  + 1 + 1
                                                     find_root(g = 0, a, 0, 1))


Result:
 ***MESSAGE FROM ROUTINE DQAGS IN LIBRARY SLATEC.
 ***INFORMATIVE MESSAGE, PROG CONTINUES, TRACEBACK REQUESTED
 *  ABNORMAL RETURN
 *  ERROR NUMBER = 2
 *   
 ***END OF MESSAGE
 
 ***MESSAGE FROM ROUTINE DQAGS IN LIBRARY SLATEC.
 ***INFORMATIVE MESSAGE, PROG CONTINUES, TRACEBACK REQUESTED
 *  ABNORMAL RETURN
 *  ERROR NUMBER = 2
 *   
 ***END OF MESSAGE
 
 ***MESSAGE FROM ROUTINE DQAGS IN LIBRARY SLATEC.
 ***INFORMATIVE MESSAGE, PROG CONTINUES, TRACEBACK REQUESTED
 *  ABNORMAL RETURN
 *  ERROR NUMBER = 2
 *   
 ***END OF MESSAGE
 
 ***MESSAGE FROM ROUTINE DQAGS IN LIBRARY SLATEC.
 ***INFORMATIVE MESSAGE, PROG CONTINUES, TRACEBACK REQUESTED
 *  ABNORMAL RETURN
 *  ERROR NUMBER = 2
 *   
 ***END OF MESSAGE
 
0.397861359013382

This differed from the expected result:
0.39786136

********************** Problem 124 ***************
Input:
                 1                                       2
(f : diff(----------------, a), g : quad_qags(f b (1 - b) , b, 0, 1) , 
                 2                                                  1
          (a - b)  + 1 + 1
                                                     find_root(g = 0, a, 0, 1))


Result:
0.397861359013382

This differed from the expected result:
0.39786136

********************** Problem 126 ***************
Input:
first(quad_qags(foo17(u), u, - 1, 0))


Result:
- 0.359753467469551

This differed from the expected result:
- 0.35975346

********************** Problem 127 ***************
Input:
first(quad_qags(foo17, u, - 1, 0))


Result:
- 0.359753467469552

This differed from the expected result:
- 0.35975346

********************** Problem 128 ***************
Input:
find_root(foo17(u) = - 0.2, u, - 1, 0)


Result:
- 0.246809038536116

This differed from the expected result:
- 0.24680904

********************** Problem 129 ***************
Input:
(bar17(u) := 0.2 + foo17(u), find_root(bar17, u, - 1, 0))


Result:
- 0.246809038536114

This differed from the expected result:
- 0.24680904

********************** Problem 130 ***************
Input:
(compile(foo17), first(quad_qags(foo17, u, - 1, 0)))


Result:
- 0.359753467469551

This differed from the expected result:
- 0.35975346

********************** Problem 131 ***************
Input:
find_root(bar17, u, - 1, 0)


Result:
- 0.246809038536114

This differed from the expected result:
- 0.24680904

111/134 tests passed

The following 23 problems failed: (8 37 65 66 67 74 81 82 83 92 101 107 120 121 122 123 124 126 127 128 129 130 131)
Running tests in rtest12: 78/78 tests passed (not counting 2 expected errors)
Running tests in rexamples: 136/136 tests passed
Running tests in rtesthyp: 421/421 tests passed (not counting 8 expected errors)
Running tests in rtest_hypgeo: 291/291 tests passed (not counting 2 expected errors)
Running tests in rtestmt19937: 
********************** Problem 4 ***************
Input:
                                16       32       64
map(fix, map(random, [1.0, 1.0 2  , 1.0 2  , 1.0 2  ])
                                                    52   52 - 16   52 - 32
                                                  [2  , 2       , 2       , 1])


Result:
[2768446261559296, 3043776213811200, 3684428568068096, 4125697480903884800]

This differed from the expected result:
[1832214229593881, 3554405100599231, 36172692743681, 705526283404820480]

********************** Problem 6 ***************
Input:
apply(+, L makelist(i, i, 1, 1000))


Result:
1047370103732997

This differed from the expected result:
1047661644052859

********************** Problem 7 ***************
Input:
              16   32   64   128
map(random, [2  , 2  , 2  , 2   ])


Result:
[43046, 2657919161, 18048340941747789077, 
                                        95952372975483484858677600915861204811]

This differed from the expected result:
[61259, 1512147836, 5201588561757929978, 
                                        55876996326958407997738817869273087742]

********************** Problem 8 ***************
Input:
                                16       32       64    52
map(fix, map(random, [1.0, 1.0 2  , 1.0 2  , 1.0 2  ]) 2  )


Result:
[554015347703808, 152501172056996446208, 11595621018890814932123648, 
                                            6177558480521590364759410509611008]

This differed from the expected result:
[3378087623307407, 950036134838534144, 12401473179864865699790848, 
                                           31898738619930029950889265274552320]

********************** Problem 11 ***************
Input:
                                16       32       64
map(fix, map(random, [1.0, 1.0 2  , 1.0 2  , 1.0 2  ])
                                                    52   52 - 16   52 - 32
                                                  [2  , 2       , 2       , 1])


Result:
[2768446261559296, 3043776213811200, 3684428568068096, 4125697480903884800]

This differed from the expected result:
[1832214229593881, 3554405100599231, 36172692743681, 705526283404820480]

********************** Problem 13 ***************
Input:
apply(+, L makelist(i, i, 1, 1000))


Result:
1047370103732997

This differed from the expected result:
1047661644052859

********************** Problem 14 ***************
Input:
              16   32   64   128
map(random, [2  , 2  , 2  , 2   ])


Result:
[43046, 2657919161, 18048340941747789077, 
                                        95952372975483484858677600915861204811]

This differed from the expected result:
[61259, 1512147836, 5201588561757929978, 
                                        55876996326958407997738817869273087742]

********************** Problem 15 ***************
Input:
                                16       32       64    52
map(fix, map(random, [1.0, 1.0 2  , 1.0 2  , 1.0 2  ]) 2  )


Result:
[554015347703808, 152501172056996446208, 11595621018890814932123648, 
                                            6177558480521590364759410509611008]

This differed from the expected result:
[3378087623307407, 950036134838534144, 12401473179864865699790848, 
                                           31898738619930029950889265274552320]

7/15 tests passed

The following 8 problems failed: (4 6 7 8 11 13 14 15)
Running tests in rtest_allnummod: 501/501 tests passed (not counting 4 expected errors)
Running tests in rtestconjugate: 134/134 tests passed
Running tests in rtestsum: 
********************** Problem 37 ***************
Input:
ev(%, numer)


Result:
0.00825405701324819

This differed from the expected result:
0.008254057

********************** Problem 38 ***************
Input:
ev(u, a = 2, simpsum, numer)


Result:
0.00825405701324819

This differed from the expected result:
0.008254057

301/303 tests passed (not counting 4 expected errors)

The following 2 problems failed: (37 38)
Running tests in rtest_trig: 
********************** Problem 16 ***************
Input:
is(maxerror < 1.0D-13)


Result:
false

This differed from the expected result:
true

********************** Problem 56 ***************
Input:
block([buggy : []], for f in invtrig do (triginverses : true, 
xtrig : subst(f, x, trig), triginverses : false, 
xtrig : xtrig - subst(f, x, trig), xtrig : 
buildq([L : map(nounify(cabs), xtrig)], lambda([], L)), 
                             i
for i thru 9 do block([xi : ----, xtrigi], 
                            10.0
xtrigi : apply(buildq, [[funmake(:, ['x, xi])], xtrig]), 
if apply('max, ev(xtrigi(), nouns)) >= 1.0D-12
 then buggy : cons(xtrigi, buggy))), buggy)


Result:
             !     0.9                       !
[lambda([], [!-------------- - cos(acot(0.9))!, 
             !        2                      !
             !sqrt(0.9  + 1)                 !
!      1                        !  ! 1                  !
!-------------- - sin(acot(0.9))!, !--- - tan(acot(0.9))!, 
!        2                      !  !0.9                 !
!sqrt(0.9  + 1)                 !
                                   !        2                      !
!        2                      !  !sqrt(0.9  + 1)                 !
!sqrt(0.9  + 1) - csc(acot(0.9))!, !-------------- - sec(acot(0.9))!, 
                                   !     0.9                       !
abs(0.9 - cot(acot(0.9)))]), lambda([], 
 !     0.8                       !  !      1                        !
[!-------------- - cos(acot(0.8))!, !-------------- - sin(acot(0.8))!, 
 !        2                      !  !        2                      !
 !sqrt(0.8  + 1)                 !  !sqrt(0.8  + 1)                 !
! 1                  !  !        2                      !
!--- - tan(acot(0.8))!, !sqrt(0.8  + 1) - csc(acot(0.8))!, 
!0.8                 !
!        2                      !
!sqrt(0.8  + 1)                 !
!-------------- - sec(acot(0.8))!, abs(0.8 - cot(acot(0.8)))]), 
!     0.8                       !
            !     0.7                       !
lambda([], [!-------------- - cos(acot(0.7))!, 
            !        2                      !
            !sqrt(0.7  + 1)                 !
!      1                        !  ! 1                  !
!-------------- - sin(acot(0.7))!, !--- - tan(acot(0.7))!, 
!        2                      !  !0.7                 !
!sqrt(0.7  + 1)                 !
                                   !        2                      !
!        2                      !  !sqrt(0.7  + 1)                 !
!sqrt(0.7  + 1) - csc(acot(0.7))!, !-------------- - sec(acot(0.7))!, 
                                   !     0.7                       !
abs(0.7 - cot(acot(0.7)))]), lambda([], 
 !     0.6                       !  !      1                        !
[!-------------- - cos(acot(0.6))!, !-------------- - sin(acot(0.6))!, 
 !        2                      !  !        2                      !
 !sqrt(0.6  + 1)                 !  !sqrt(0.6  + 1)                 !
! 1                  !  !        2                      !
!--- - tan(acot(0.6))!, !sqrt(0.6  + 1) - csc(acot(0.6))!, 
!0.6                 !
!        2                      !
!sqrt(0.6  + 1)                 !
!-------------- - sec(acot(0.6))!, abs(0.6 - cot(acot(0.6)))]), 
!     0.6                       !
            !     0.5                       !
lambda([], [!-------------- - cos(acot(0.5))!, 
            !        2                      !
            !sqrt(0.5  + 1)                 !
!      1                        !  ! 1                  !
!-------------- - sin(acot(0.5))!, !--- - tan(acot(0.5))!, 
!        2                      !  !0.5                 !
!sqrt(0.5  + 1)                 !
                                   !        2                      !
!        2                      !  !sqrt(0.5  + 1)                 !
!sqrt(0.5  + 1) - csc(acot(0.5))!, !-------------- - sec(acot(0.5))!, 
                                   !     0.5                       !
abs(0.5 - cot(acot(0.5)))]), lambda([], 
 !     0.4                       !  !      1                        !
[!-------------- - cos(acot(0.4))!, !-------------- - sin(acot(0.4))!, 
 !        2                      !  !        2                      !
 !sqrt(0.4  + 1)                 !  !sqrt(0.4  + 1)                 !
! 1                  !  !        2                      !
!--- - tan(acot(0.4))!, !sqrt(0.4  + 1) - csc(acot(0.4))!, 
!0.4                 !
!        2                      !
!sqrt(0.4  + 1)                 !
!-------------- - sec(acot(0.4))!, abs(0.4 - cot(acot(0.4)))]), 
!     0.4                       !
            !     0.3                       !
lambda([], [!-------------- - cos(acot(0.3))!, 
            !        2                      !
            !sqrt(0.3  + 1)                 !
!      1                        !  ! 1                  !
!-------------- - sin(acot(0.3))!, !--- - tan(acot(0.3))!, 
!        2                      !  !0.3                 !
!sqrt(0.3  + 1)                 !
                                   !        2                      !
!        2                      !  !sqrt(0.3  + 1)                 !
!sqrt(0.3  + 1) - csc(acot(0.3))!, !-------------- - sec(acot(0.3))!, 
                                   !     0.3                       !
abs(0.3 - cot(acot(0.3)))]), lambda([], 
 !     0.2                       !  !      1                        !
[!-------------- - cos(acot(0.2))!, !-------------- - sin(acot(0.2))!, 
 !        2                      !  !        2                      !
 !sqrt(0.2  + 1)                 !  !sqrt(0.2  + 1)                 !
! 1                  !  !        2                      !
!--- - tan(acot(0.2))!, !sqrt(0.2  + 1) - csc(acot(0.2))!, 
!0.2                 !
!        2                      !
!sqrt(0.2  + 1)                 !
!-------------- - sec(acot(0.2))!, abs(0.2 - cot(acot(0.2)))]), 
!     0.2                       !
            !     0.1                       !
lambda([], [!-------------- - cos(acot(0.1))!, 
            !        2                      !
            !sqrt(0.1  + 1)                 !
!      1                        !  ! 1                  !
!-------------- - sin(acot(0.1))!, !--- - tan(acot(0.1))!, 
!        2                      !  !0.1                 !
!sqrt(0.1  + 1)                 !
                                   !        2                      !
!        2                      !  !sqrt(0.1  + 1)                 !
!sqrt(0.1  + 1) - csc(acot(0.1))!, !-------------- - sec(acot(0.1))!, 
                                   !     0.1                       !
abs(0.1 - cot(acot(0.1)))]), lambda([], 
                         !        2                      !
 ! 1                  !  !sqrt(0.9  - 1)                 !
[!--- - cos(asec(0.9))!, !-------------- - sin(asec(0.9))!, 
 !0.9                 !  !     0.9                       !
!        2                      !  !     0.9                       !
!sqrt(0.9  - 1) - tan(asec(0.9))!, !-------------- - csc(asec(0.9))!, 
                                   !        2                      !
                                   !sqrt(0.9  - 1)                 !
                           !      1                        !
abs(0.9 - sec(asec(0.9))), !-------------- - cot(asec(0.9))!]), 
                           !        2                      !
                           !sqrt(0.9  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.8  - 1)                 !
lambda([], [!--- - cos(asec(0.8))!, !-------------- - sin(asec(0.8))!, 
            !0.8                 !  !     0.8                       !
!        2                      !  !     0.8                       !
!sqrt(0.8  - 1) - tan(asec(0.8))!, !-------------- - csc(asec(0.8))!, 
                                   !        2                      !
                                   !sqrt(0.8  - 1)                 !
                           !      1                        !
abs(0.8 - sec(asec(0.8))), !-------------- - cot(asec(0.8))!]), 
                           !        2                      !
                           !sqrt(0.8  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.7  - 1)                 !
lambda([], [!--- - cos(asec(0.7))!, !-------------- - sin(asec(0.7))!, 
            !0.7                 !  !     0.7                       !
!        2                      !  !     0.7                       !
!sqrt(0.7  - 1) - tan(asec(0.7))!, !-------------- - csc(asec(0.7))!, 
                                   !        2                      !
                                   !sqrt(0.7  - 1)                 !
                           !      1                        !
abs(0.7 - sec(asec(0.7))), !-------------- - cot(asec(0.7))!]), 
                           !        2                      !
                           !sqrt(0.7  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.6  - 1)                 !
lambda([], [!--- - cos(asec(0.6))!, !-------------- - sin(asec(0.6))!, 
            !0.6                 !  !     0.6                       !
!        2                      !  !     0.6                       !
!sqrt(0.6  - 1) - tan(asec(0.6))!, !-------------- - csc(asec(0.6))!, 
                                   !        2                      !
                                   !sqrt(0.6  - 1)                 !
                           !      1                        !
abs(0.6 - sec(asec(0.6))), !-------------- - cot(asec(0.6))!]), 
                           !        2                      !
                           !sqrt(0.6  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.5  - 1)                 !
lambda([], [!--- - cos(asec(0.5))!, !-------------- - sin(asec(0.5))!, 
            !0.5                 !  !     0.5                       !
!        2                      !  !     0.5                       !
!sqrt(0.5  - 1) - tan(asec(0.5))!, !-------------- - csc(asec(0.5))!, 
                                   !        2                      !
                                   !sqrt(0.5  - 1)                 !
                           !      1                        !
abs(0.5 - sec(asec(0.5))), !-------------- - cot(asec(0.5))!]), 
                           !        2                      !
                           !sqrt(0.5  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.4  - 1)                 !
lambda([], [!--- - cos(asec(0.4))!, !-------------- - sin(asec(0.4))!, 
            !0.4                 !  !     0.4                       !
!        2                      !  !     0.4                       !
!sqrt(0.4  - 1) - tan(asec(0.4))!, !-------------- - csc(asec(0.4))!, 
                                   !        2                      !
                                   !sqrt(0.4  - 1)                 !
                           !      1                        !
abs(0.4 - sec(asec(0.4))), !-------------- - cot(asec(0.4))!]), 
                           !        2                      !
                           !sqrt(0.4  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.3  - 1)                 !
lambda([], [!--- - cos(asec(0.3))!, !-------------- - sin(asec(0.3))!, 
            !0.3                 !  !     0.3                       !
!        2                      !  !     0.3                       !
!sqrt(0.3  - 1) - tan(asec(0.3))!, !-------------- - csc(asec(0.3))!, 
                                   !        2                      !
                                   !sqrt(0.3  - 1)                 !
                           !      1                        !
abs(0.3 - sec(asec(0.3))), !-------------- - cot(asec(0.3))!]), 
                           !        2                      !
                           !sqrt(0.3  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.2  - 1)                 !
lambda([], [!--- - cos(asec(0.2))!, !-------------- - sin(asec(0.2))!, 
            !0.2                 !  !     0.2                       !
!        2                      !  !     0.2                       !
!sqrt(0.2  - 1) - tan(asec(0.2))!, !-------------- - csc(asec(0.2))!, 
                                   !        2                      !
                                   !sqrt(0.2  - 1)                 !
                           !      1                        !
abs(0.2 - sec(asec(0.2))), !-------------- - cot(asec(0.2))!]), 
                           !        2                      !
                           !sqrt(0.2  - 1)                 !
                                    !        2                      !
            ! 1                  !  !sqrt(0.1  - 1)                 !
lambda([], [!--- - cos(asec(0.1))!, !-------------- - sin(asec(0.1))!, 
            !0.1                 !  !     0.1                       !
!        2                      !  !     0.1                       !
!sqrt(0.1  - 1) - tan(asec(0.1))!, !-------------- - csc(asec(0.1))!, 
                                   !        2                      !
                                   !sqrt(0.1  - 1)                 !
                           !      1                        !
abs(0.1 - sec(asec(0.1))), !-------------- - cot(asec(0.1))!]), 
                           !        2                      !
                           !sqrt(0.1  - 1)                 !
            !        2                      !
            !sqrt(0.9  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.9))!, !--- - sin(acsc(0.9))!, 
            !     0.9                       !  !0.9                 !
!      1                        !
!-------------- - tan(acsc(0.9))!, abs(0.9 - csc(acsc(0.9))), 
!        2                      !
!sqrt(0.9  - 1)                 !
!     0.9                       !  !        2                      !
!-------------- - sec(acsc(0.9))!, !sqrt(0.9  - 1) - cot(acsc(0.9))!]), 
!        2                      !
!sqrt(0.9  - 1)                 !
            !        2                      !
            !sqrt(0.8  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.8))!, !--- - sin(acsc(0.8))!, 
            !     0.8                       !  !0.8                 !
!      1                        !
!-------------- - tan(acsc(0.8))!, abs(0.8 - csc(acsc(0.8))), 
!        2                      !
!sqrt(0.8  - 1)                 !
!     0.8                       !  !        2                      !
!-------------- - sec(acsc(0.8))!, !sqrt(0.8  - 1) - cot(acsc(0.8))!]), 
!        2                      !
!sqrt(0.8  - 1)                 !
            !        2                      !
            !sqrt(0.7  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.7))!, !--- - sin(acsc(0.7))!, 
            !     0.7                       !  !0.7                 !
!      1                        !
!-------------- - tan(acsc(0.7))!, abs(0.7 - csc(acsc(0.7))), 
!        2                      !
!sqrt(0.7  - 1)                 !
!     0.7                       !  !        2                      !
!-------------- - sec(acsc(0.7))!, !sqrt(0.7  - 1) - cot(acsc(0.7))!]), 
!        2                      !
!sqrt(0.7  - 1)                 !
            !        2                      !
            !sqrt(0.6  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.6))!, !--- - sin(acsc(0.6))!, 
            !     0.6                       !  !0.6                 !
!      1                        !
!-------------- - tan(acsc(0.6))!, abs(0.6 - csc(acsc(0.6))), 
!        2                      !
!sqrt(0.6  - 1)                 !
!     0.6                       !  !        2                      !
!-------------- - sec(acsc(0.6))!, !sqrt(0.6  - 1) - cot(acsc(0.6))!]), 
!        2                      !
!sqrt(0.6  - 1)                 !
            !        2                      !
            !sqrt(0.5  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.5))!, !--- - sin(acsc(0.5))!, 
            !     0.5                       !  !0.5                 !
!      1                        !
!-------------- - tan(acsc(0.5))!, abs(0.5 - csc(acsc(0.5))), 
!        2                      !
!sqrt(0.5  - 1)                 !
!     0.5                       !  !        2                      !
!-------------- - sec(acsc(0.5))!, !sqrt(0.5  - 1) - cot(acsc(0.5))!]), 
!        2                      !
!sqrt(0.5  - 1)                 !
            !        2                      !
            !sqrt(0.4  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.4))!, !--- - sin(acsc(0.4))!, 
            !     0.4                       !  !0.4                 !
!      1                        !
!-------------- - tan(acsc(0.4))!, abs(0.4 - csc(acsc(0.4))), 
!        2                      !
!sqrt(0.4  - 1)                 !
!     0.4                       !  !        2                      !
!-------------- - sec(acsc(0.4))!, !sqrt(0.4  - 1) - cot(acsc(0.4))!]), 
!        2                      !
!sqrt(0.4  - 1)                 !
            !        2                      !
            !sqrt(0.3  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.3))!, !--- - sin(acsc(0.3))!, 
            !     0.3                       !  !0.3                 !
!      1                        !
!-------------- - tan(acsc(0.3))!, abs(0.3 - csc(acsc(0.3))), 
!        2                      !
!sqrt(0.3  - 1)                 !
!     0.3                       !  !        2                      !
!-------------- - sec(acsc(0.3))!, !sqrt(0.3  - 1) - cot(acsc(0.3))!]), 
!        2                      !
!sqrt(0.3  - 1)                 !
            !        2                      !
            !sqrt(0.2  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.2))!, !--- - sin(acsc(0.2))!, 
            !     0.2                       !  !0.2                 !
!      1                        !
!-------------- - tan(acsc(0.2))!, abs(0.2 - csc(acsc(0.2))), 
!        2                      !
!sqrt(0.2  - 1)                 !
!     0.2                       !  !        2                      !
!-------------- - sec(acsc(0.2))!, !sqrt(0.2  - 1) - cot(acsc(0.2))!]), 
!        2                      !
!sqrt(0.2  - 1)                 !
            !        2                      !
            !sqrt(0.1  - 1)                 !  ! 1                  !
lambda([], [!-------------- - cos(acsc(0.1))!, !--- - sin(acsc(0.1))!, 
            !     0.1                       !  !0.1                 !
!      1                        !
!-------------- - tan(acsc(0.1))!, abs(0.1 - csc(acsc(0.1))), 
!        2                      !
!sqrt(0.1  - 1)                 !
!     0.1                       !  !        2                      !
!-------------- - sec(acsc(0.1))!, !sqrt(0.1  - 1) - cot(acsc(0.1))!]), 
!        2                      !
!sqrt(0.1  - 1)                 !
            !      1                        !
lambda([], [!-------------- - cos(atan(0.9))!, 
            !        2                      !
            !sqrt(0.9  + 1)                 !
!     0.9                       !
!-------------- - sin(atan(0.9))!, abs(0.9 - tan(atan(0.9))), 
!        2                      !
!sqrt(0.9  + 1)                 !
!        2                      !
!sqrt(0.9  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.9))!, !sqrt(0.9  + 1) - sec(atan(0.9))!, 
!     0.9                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.9))!]), lambda([], [!-------------- - cos(atan(0.8))!, 
!0.9                 !                !        2                      !
                                      !sqrt(0.8  + 1)                 !
!     0.8                       !
!-------------- - sin(atan(0.8))!, abs(0.8 - tan(atan(0.8))), 
!        2                      !
!sqrt(0.8  + 1)                 !
!        2                      !
!sqrt(0.8  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.8))!, !sqrt(0.8  + 1) - sec(atan(0.8))!, 
!     0.8                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.8))!]), lambda([], [!-------------- - cos(atan(0.7))!, 
!0.8                 !                !        2                      !
                                      !sqrt(0.7  + 1)                 !
!     0.7                       !
!-------------- - sin(atan(0.7))!, abs(0.7 - tan(atan(0.7))), 
!        2                      !
!sqrt(0.7  + 1)                 !
!        2                      !
!sqrt(0.7  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.7))!, !sqrt(0.7  + 1) - sec(atan(0.7))!, 
!     0.7                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.7))!]), lambda([], [!-------------- - cos(atan(0.6))!, 
!0.7                 !                !        2                      !
                                      !sqrt(0.6  + 1)                 !
!     0.6                       !
!-------------- - sin(atan(0.6))!, abs(0.6 - tan(atan(0.6))), 
!        2                      !
!sqrt(0.6  + 1)                 !
!        2                      !
!sqrt(0.6  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.6))!, !sqrt(0.6  + 1) - sec(atan(0.6))!, 
!     0.6                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.6))!]), lambda([], [!-------------- - cos(atan(0.5))!, 
!0.6                 !                !        2                      !
                                      !sqrt(0.5  + 1)                 !
!     0.5                       !
!-------------- - sin(atan(0.5))!, abs(0.5 - tan(atan(0.5))), 
!        2                      !
!sqrt(0.5  + 1)                 !
!        2                      !
!sqrt(0.5  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.5))!, !sqrt(0.5  + 1) - sec(atan(0.5))!, 
!     0.5                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.5))!]), lambda([], [!-------------- - cos(atan(0.4))!, 
!0.5                 !                !        2                      !
                                      !sqrt(0.4  + 1)                 !
!     0.4                       !
!-------------- - sin(atan(0.4))!, abs(0.4 - tan(atan(0.4))), 
!        2                      !
!sqrt(0.4  + 1)                 !
!        2                      !
!sqrt(0.4  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.4))!, !sqrt(0.4  + 1) - sec(atan(0.4))!, 
!     0.4                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.4))!]), lambda([], [!-------------- - cos(atan(0.3))!, 
!0.4                 !                !        2                      !
                                      !sqrt(0.3  + 1)                 !
!     0.3                       !
!-------------- - sin(atan(0.3))!, abs(0.3 - tan(atan(0.3))), 
!        2                      !
!sqrt(0.3  + 1)                 !
!        2                      !
!sqrt(0.3  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.3))!, !sqrt(0.3  + 1) - sec(atan(0.3))!, 
!     0.3                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.3))!]), lambda([], [!-------------- - cos(atan(0.2))!, 
!0.3                 !                !        2                      !
                                      !sqrt(0.2  + 1)                 !
!     0.2                       !
!-------------- - sin(atan(0.2))!, abs(0.2 - tan(atan(0.2))), 
!        2                      !
!sqrt(0.2  + 1)                 !
!        2                      !
!sqrt(0.2  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.2))!, !sqrt(0.2  + 1) - sec(atan(0.2))!, 
!     0.2                       !
! 1                  !                !      1                        !
!--- - cot(atan(0.2))!]), lambda([], [!-------------- - cos(atan(0.1))!, 
!0.2                 !                !        2                      !
                                      !sqrt(0.1  + 1)                 !
!     0.1                       !
!-------------- - sin(atan(0.1))!, abs(0.1 - tan(atan(0.1))), 
!        2                      !
!sqrt(0.1  + 1)                 !
!        2                      !
!sqrt(0.1  + 1)                 !  !        2                      !
!-------------- - csc(atan(0.1))!, !sqrt(0.1  + 1) - sec(atan(0.1))!, 
!     0.1                       !
! 1                  !                !            2                  !
!--- - cot(atan(0.1))!]), lambda([], [!sqrt(1 - 0.9 ) - cos(asin(0.9))!, 
!0.1                 !
                           !     0.9                       !
abs(0.9 - sin(asin(0.9))), !-------------- - tan(asin(0.9))!, 
                           !            2                  !
                           !sqrt(1 - 0.9 )                 !
! 1                  !  !      1                        !
!--- - csc(asin(0.9))!, !-------------- - sec(asin(0.9))!, 
!0.9                 !  !            2                  !
                        !sqrt(1 - 0.9 )                 !
!            2                  !
!sqrt(1 - 0.9 )                 !
!-------------- - cot(asin(0.9))!]), lambda([], 
!     0.9                       !
 !            2                  !
[!sqrt(1 - 0.8 ) - cos(asin(0.8))!, abs(0.8 - sin(asin(0.8))), 
!     0.8                       !  ! 1                  !
!-------------- - tan(asin(0.8))!, !--- - csc(asin(0.8))!, 
!            2                  !  !0.8                 !
!sqrt(1 - 0.8 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.8 )                 !
!-------------- - sec(asin(0.8))!, !-------------- - cot(asin(0.8))!]), 
!            2                  !  !     0.8                       !
!sqrt(1 - 0.8 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.7 ) - cos(asin(0.7))!, abs(0.7 - sin(asin(0.7))), 
!     0.7                       !  ! 1                  !
!-------------- - tan(asin(0.7))!, !--- - csc(asin(0.7))!, 
!            2                  !  !0.7                 !
!sqrt(1 - 0.7 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.7 )                 !
!-------------- - sec(asin(0.7))!, !-------------- - cot(asin(0.7))!]), 
!            2                  !  !     0.7                       !
!sqrt(1 - 0.7 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.6 ) - cos(asin(0.6))!, abs(0.6 - sin(asin(0.6))), 
!     0.6                       !  ! 1                  !
!-------------- - tan(asin(0.6))!, !--- - csc(asin(0.6))!, 
!            2                  !  !0.6                 !
!sqrt(1 - 0.6 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.6 )                 !
!-------------- - sec(asin(0.6))!, !-------------- - cot(asin(0.6))!]), 
!            2                  !  !     0.6                       !
!sqrt(1 - 0.6 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.5 ) - cos(asin(0.5))!, abs(0.5 - sin(asin(0.5))), 
!     0.5                       !  ! 1                  !
!-------------- - tan(asin(0.5))!, !--- - csc(asin(0.5))!, 
!            2                  !  !0.5                 !
!sqrt(1 - 0.5 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.5 )                 !
!-------------- - sec(asin(0.5))!, !-------------- - cot(asin(0.5))!]), 
!            2                  !  !     0.5                       !
!sqrt(1 - 0.5 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.4 ) - cos(asin(0.4))!, abs(0.4 - sin(asin(0.4))), 
!     0.4                       !  ! 1                  !
!-------------- - tan(asin(0.4))!, !--- - csc(asin(0.4))!, 
!            2                  !  !0.4                 !
!sqrt(1 - 0.4 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.4 )                 !
!-------------- - sec(asin(0.4))!, !-------------- - cot(asin(0.4))!]), 
!            2                  !  !     0.4                       !
!sqrt(1 - 0.4 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.3 ) - cos(asin(0.3))!, abs(0.3 - sin(asin(0.3))), 
!     0.3                       !  ! 1                  !
!-------------- - tan(asin(0.3))!, !--- - csc(asin(0.3))!, 
!            2                  !  !0.3                 !
!sqrt(1 - 0.3 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.3 )                 !
!-------------- - sec(asin(0.3))!, !-------------- - cot(asin(0.3))!]), 
!            2                  !  !     0.3                       !
!sqrt(1 - 0.3 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.2 ) - cos(asin(0.2))!, abs(0.2 - sin(asin(0.2))), 
!     0.2                       !  ! 1                  !
!-------------- - tan(asin(0.2))!, !--- - csc(asin(0.2))!, 
!            2                  !  !0.2                 !
!sqrt(1 - 0.2 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.2 )                 !
!-------------- - sec(asin(0.2))!, !-------------- - cot(asin(0.2))!]), 
!            2                  !  !     0.2                       !
!sqrt(1 - 0.2 )                 !
            !            2                  !
lambda([], [!sqrt(1 - 0.1 ) - cos(asin(0.1))!, abs(0.1 - sin(asin(0.1))), 
!     0.1                       !  ! 1                  !
!-------------- - tan(asin(0.1))!, !--- - csc(asin(0.1))!, 
!            2                  !  !0.1                 !
!sqrt(1 - 0.1 )                 !
                                   !            2                  !
!      1                        !  !sqrt(1 - 0.1 )                 !
!-------------- - sec(asin(0.1))!, !-------------- - cot(asin(0.1))!]), 
!            2                  !  !     0.1                       !
!sqrt(1 - 0.1 )                 !
                                       !            2                  !
lambda([], [abs(0.9 - cos(acos(0.9))), !sqrt(1 - 0.9 ) - sin(acos(0.9))!, 
!            2                  !
!sqrt(1 - 0.9 )                 !  !      1                        !
!-------------- - tan(acos(0.9))!, !-------------- - csc(acos(0.9))!, 
!     0.9                       !  !            2                  !
                                   !sqrt(1 - 0.9 )                 !
! 1                  !  !     0.9                       !
!--- - sec(acos(0.9))!, !-------------- - cot(acos(0.9))!]), 
!0.9                 !  !            2                  !
                        !sqrt(1 - 0.9 )                 !
                                       !            2                  !
lambda([], [abs(0.8 - cos(acos(0.8))), !sqrt(1 - 0.8 ) - sin(acos(0.8))!, 
!            2                  !
!sqrt(1 - 0.8 )                 !  !      1                        !
!-------------- - tan(acos(0.8))!, !-------------- - csc(acos(0.8))!, 
!     0.8                       !  !            2                  !
                                   !sqrt(1 - 0.8 )                 !
! 1                  !  !     0.8                       !
!--- - sec(acos(0.8))!, !-------------- - cot(acos(0.8))!]), 
!0.8                 !  !            2                  !
                        !sqrt(1 - 0.8 )                 !
                                       !            2                  !
lambda([], [abs(0.7 - cos(acos(0.7))), !sqrt(1 - 0.7 ) - sin(acos(0.7))!, 
!            2                  !
!sqrt(1 - 0.7 )                 !  !      1                        !
!-------------- - tan(acos(0.7))!, !-------------- - csc(acos(0.7))!, 
!     0.7                       !  !            2                  !
                                   !sqrt(1 - 0.7 )                 !
! 1                  !  !     0.7                       !
!--- - sec(acos(0.7))!, !-------------- - cot(acos(0.7))!]), 
!0.7                 !  !            2                  !
                        !sqrt(1 - 0.7 )                 !
                                       !            2                  !
lambda([], [abs(0.6 - cos(acos(0.6))), !sqrt(1 - 0.6 ) - sin(acos(0.6))!, 
!            2                  !
!sqrt(1 - 0.6 )                 !  !      1                        !
!-------------- - tan(acos(0.6))!, !-------------- - csc(acos(0.6))!, 
!     0.6                       !  !            2                  !
                                   !sqrt(1 - 0.6 )                 !
! 1                  !  !     0.6                       !
!--- - sec(acos(0.6))!, !-------------- - cot(acos(0.6))!]), 
!0.6                 !  !            2                  !
                        !sqrt(1 - 0.6 )                 !
                                       !            2                  !
lambda([], [abs(0.5 - cos(acos(0.5))), !sqrt(1 - 0.5 ) - sin(acos(0.5))!, 
!            2                  !
!sqrt(1 - 0.5 )                 !  !      1                        !
!-------------- - tan(acos(0.5))!, !-------------- - csc(acos(0.5))!, 
!     0.5                       !  !            2                  !
                                   !sqrt(1 - 0.5 )                 !
! 1                  !  !     0.5                       !
!--- - sec(acos(0.5))!, !-------------- - cot(acos(0.5))!]), 
!0.5                 !  !            2                  !
                        !sqrt(1 - 0.5 )                 !
                                       !            2                  !
lambda([], [abs(0.4 - cos(acos(0.4))), !sqrt(1 - 0.4 ) - sin(acos(0.4))!, 
!            2                  !
!sqrt(1 - 0.4 )                 !  !      1                        !
!-------------- - tan(acos(0.4))!, !-------------- - csc(acos(0.4))!, 
!     0.4                       !  !            2                  !
                                   !sqrt(1 - 0.4 )                 !
! 1                  !  !     0.4                       !
!--- - sec(acos(0.4))!, !-------------- - cot(acos(0.4))!]), 
!0.4                 !  !            2                  !
                        !sqrt(1 - 0.4 )                 !
                                       !            2                  !
lambda([], [abs(0.3 - cos(acos(0.3))), !sqrt(1 - 0.3 ) - sin(acos(0.3))!, 
!            2                  !
!sqrt(1 - 0.3 )                 !  !      1                        !
!-------------- - tan(acos(0.3))!, !-------------- - csc(acos(0.3))!, 
!     0.3                       !  !            2                  !
                                   !sqrt(1 - 0.3 )                 !
! 1                  !  !     0.3                       !
!--- - sec(acos(0.3))!, !-------------- - cot(acos(0.3))!]), 
!0.3                 !  !            2                  !
                        !sqrt(1 - 0.3 )                 !
                                       !            2                  !
lambda([], [abs(0.2 - cos(acos(0.2))), !sqrt(1 - 0.2 ) - sin(acos(0.2))!, 
!            2                  !
!sqrt(1 - 0.2 )                 !  !      1                        !
!-------------- - tan(acos(0.2))!, !-------------- - csc(acos(0.2))!, 
!     0.2                       !  !            2                  !
                                   !sqrt(1 - 0.2 )                 !
! 1                  !  !     0.2                       !
!--- - sec(acos(0.2))!, !-------------- - cot(acos(0.2))!]), 
!0.2                 !  !            2                  !
                        !sqrt(1 - 0.2 )                 !
                                       !            2                  !
lambda([], [abs(0.1 - cos(acos(0.1))), !sqrt(1 - 0.1 ) - sin(acos(0.1))!, 
!            2                  !
!sqrt(1 - 0.1 )                 !  !      1                        !
!-------------- - tan(acos(0.1))!, !-------------- - csc(acos(0.1))!, 
!     0.1                       !  !            2                  !
                                   !sqrt(1 - 0.1 )                 !
! 1                  !  !     0.1                       !
!--- - sec(acos(0.1))!, !-------------- - cot(acos(0.1))!])]
!0.1                 !  !            2                  !
                        !sqrt(1 - 0.1 )                 !

This differed from the expected result:
[]

********************** Problem 58 ***************
Input:
block([buggy : []], for f in invhtrig do (triginverses : true, 
xtrig : subst(f, x, htrig), triginverses : false, 
xtrig : xtrig - subst(f, x, htrig), xtrig : 
buildq([L : map(nounify(cabs), xtrig)], lambda([], L)), 
                             i
for i thru 9 do block([xi : ----, xtrigi], 
                            10.0
xtrigi : apply(buildq, [[funmake(:, ['x, xi])], xtrig]), 
if apply('max, ev(xtrigi(), nouns)) >= 1.0D-12
 then buggy : cons(xtrigi, buggy))), buggy)


Result:
                                             1
[lambda([], [cosh(atanh(0.9)) - ---------------------------, 
                                sqrt(1 - 0.9) sqrt(0.9 + 1)
!            0.9                               !
!--------------------------- - sinh(atanh(0.9))!, abs(0.9 - tanh(atanh(0.9))), 
!sqrt(1 - 0.9) sqrt(0.9 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.8)) - ---------------------------, 
                                          sqrt(1 - 0.8) sqrt(0.8 + 1)
!            0.8                               !
!--------------------------- - sinh(atanh(0.8))!, abs(0.8 - tanh(atanh(0.8))), 
!sqrt(1 - 0.8) sqrt(0.8 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.7)) - ---------------------------, 
                                          sqrt(1 - 0.7) sqrt(0.7 + 1)
!            0.7                               !
!--------------------------- - sinh(atanh(0.7))!, abs(0.7 - tanh(atanh(0.7))), 
!sqrt(1 - 0.7) sqrt(0.7 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.6)) - ---------------------------, 
                                          sqrt(1 - 0.6) sqrt(0.6 + 1)
!            0.6                               !
!--------------------------- - sinh(atanh(0.6))!, abs(0.6 - tanh(atanh(0.6))), 
!sqrt(1 - 0.6) sqrt(0.6 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.5)) - ---------------------------, 
                                          sqrt(1 - 0.5) sqrt(0.5 + 1)
!            0.5                               !
!--------------------------- - sinh(atanh(0.5))!, abs(0.5 - tanh(atanh(0.5))), 
!sqrt(1 - 0.5) sqrt(0.5 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.4)) - ---------------------------, 
                                          sqrt(1 - 0.4) sqrt(0.4 + 1)
!            0.4                               !
!--------------------------- - sinh(atanh(0.4))!, abs(0.4 - tanh(atanh(0.4))), 
!sqrt(1 - 0.4) sqrt(0.4 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.3)) - ---------------------------, 
                                          sqrt(1 - 0.3) sqrt(0.3 + 1)
!            0.3                               !
!--------------------------- - sinh(atanh(0.3))!, abs(0.3 - tanh(atanh(0.3))), 
!sqrt(1 - 0.3) sqrt(0.3 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.2)) - ---------------------------, 
                                          sqrt(1 - 0.2) sqrt(0.2 + 1)
!            0.2                               !
!--------------------------- - sinh(atanh(0.2))!, abs(0.2 - tanh(atanh(0.2))), 
!sqrt(1 - 0.2) sqrt(0.2 + 1)                   !
                                                       1
0, 0, 0]), lambda([], [cosh(atanh(0.1)) - ---------------------------, 
                                          sqrt(1 - 0.1) sqrt(0.1 + 1)
!            0.1                               !
!--------------------------- - sinh(atanh(0.1))!, abs(0.1 - tanh(atanh(0.1))), 
!sqrt(1 - 0.1) sqrt(0.1 + 1)                   !
                       !        2                        !
0, 0, 0]), lambda([], [!sqrt(0.9  + 1) - cosh(asinh(0.9))!, 
                             !     0.9                         !
abs(0.9 - sinh(asinh(0.9))), !-------------- - tanh(asinh(0.9))!, 0, 0, 0]), 
                             !        2                        !
                             !sqrt(0.9  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.8  + 1) - cosh(asinh(0.8))!, abs(0.8 - sinh(asinh(0.8))), 
!     0.8                         !
!-------------- - tanh(asinh(0.8))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.8  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.7  + 1) - cosh(asinh(0.7))!, abs(0.7 - sinh(asinh(0.7))), 
!     0.7                         !
!-------------- - tanh(asinh(0.7))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.7  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.6  + 1) - cosh(asinh(0.6))!, abs(0.6 - sinh(asinh(0.6))), 
!     0.6                         !
!-------------- - tanh(asinh(0.6))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.6  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.5  + 1) - cosh(asinh(0.5))!, abs(0.5 - sinh(asinh(0.5))), 
!     0.5                         !
!-------------- - tanh(asinh(0.5))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.5  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.4  + 1) - cosh(asinh(0.4))!, abs(0.4 - sinh(asinh(0.4))), 
!     0.4                         !
!-------------- - tanh(asinh(0.4))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.4  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.3  + 1) - cosh(asinh(0.3))!, abs(0.3 - sinh(asinh(0.3))), 
!     0.3                         !
!-------------- - tanh(asinh(0.3))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.3  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.2  + 1) - cosh(asinh(0.2))!, abs(0.2 - sinh(asinh(0.2))), 
!     0.2                         !
!-------------- - tanh(asinh(0.2))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.2  + 1)                   !
            !        2                        !
lambda([], [!sqrt(0.1  + 1) - cosh(asinh(0.1))!, abs(0.1 - sinh(asinh(0.1))), 
!     0.1                         !
!-------------- - tanh(asinh(0.1))!, 0, 0, 0]), 
!        2                        !
!sqrt(0.1  + 1)                   !
lambda([], [abs(0.9 - cosh(acosh(0.9))), 
abs(sqrt(0.9 - 1) sqrt(0.9 + 1) - sinh(acosh(0.9))), 
!sqrt(0.9 - 1) sqrt(0.9 + 1)                   !
!--------------------------- - tanh(acosh(0.9))!, 0, 0, 0]), 
!            0.9                               !
lambda([], [abs(0.8 - cosh(acosh(0.8))), 
abs(sqrt(0.8 - 1) sqrt(0.8 + 1) - sinh(acosh(0.8))), 
!sqrt(0.8 - 1) sqrt(0.8 + 1)                   !
!--------------------------- - tanh(acosh(0.8))!, 0, 0, 0]), 
!            0.8                               !
lambda([], [abs(0.7 - cosh(acosh(0.7))), 
abs(sqrt(0.7 - 1) sqrt(0.7 + 1) - sinh(acosh(0.7))), 
!sqrt(0.7 - 1) sqrt(0.7 + 1)                   !
!--------------------------- - tanh(acosh(0.7))!, 0, 0, 0]), 
!            0.7                               !
lambda([], [abs(0.6 - cosh(acosh(0.6))), 
abs(sqrt(0.6 - 1) sqrt(0.6 + 1) - sinh(acosh(0.6))), 
!sqrt(0.6 - 1) sqrt(0.6 + 1)                   !
!--------------------------- - tanh(acosh(0.6))!, 0, 0, 0]), 
!            0.6                               !
lambda([], [abs(0.5 - cosh(acosh(0.5))), 
abs(sqrt(0.5 - 1) sqrt(0.5 + 1) - sinh(acosh(0.5))), 
!sqrt(0.5 - 1) sqrt(0.5 + 1)                   !
!--------------------------- - tanh(acosh(0.5))!, 0, 0, 0]), 
!            0.5                               !
lambda([], [abs(0.4 - cosh(acosh(0.4))), 
abs(sqrt(0.4 - 1) sqrt(0.4 + 1) - sinh(acosh(0.4))), 
!sqrt(0.4 - 1) sqrt(0.4 + 1)                   !
!--------------------------- - tanh(acosh(0.4))!, 0, 0, 0]), 
!            0.4                               !
lambda([], [abs(0.3 - cosh(acosh(0.3))), 
abs(sqrt(0.3 - 1) sqrt(0.3 + 1) - sinh(acosh(0.3))), 
!sqrt(0.3 - 1) sqrt(0.3 + 1)                   !
!--------------------------- - tanh(acosh(0.3))!, 0, 0, 0]), 
!            0.3                               !
lambda([], [abs(0.2 - cosh(acosh(0.2))), 
abs(sqrt(0.2 - 1) sqrt(0.2 + 1) - sinh(acosh(0.2))), 
!sqrt(0.2 - 1) sqrt(0.2 + 1)                   !
!--------------------------- - tanh(acosh(0.2))!, 0, 0, 0]), 
!            0.2                               !
lambda([], [abs(0.1 - cosh(acosh(0.1))), 
abs(sqrt(0.1 - 1) sqrt(0.1 + 1) - sinh(acosh(0.1))), 
!sqrt(0.1 - 1) sqrt(0.1 + 1)                   !
!--------------------------- - tanh(acosh(0.1))!, 0, 0, 0])]
!            0.1                               !

This differed from the expected result:
[]

********************** Problem 85 ***************
Input:
acot(0.0)


Result:
1.570796326794897

This differed from the expected result:
1.5707964

132/136 tests passed

The following 4 problems failed: (16 56 58 85)
Running tests in rtest_zeta: 21/21 tests passed
Running tests in rtest_diff_invtrig: 22/22 tests passed
Running tests in rtest_scalarp: 20/20 tests passed
Running tests in rtest_everysome: 84/84 tests passed
Running tests in rtestint: 
********************** Problem 123 ***************
Input:
                                    2  2
float(rectform(integrate(integrate(x  y  (%i cos(2 y) + sin(2 x)) exp(%i 20 x)
                                     exp(%i 30 y), x, - 1, - 10), y, - 5, 15)))


Result:
6.12759200671752 - 40.62195392101798 %i

This differed from the expected result:
6.127592 - 40.621952 %i

********************** Problem 124 ***************
Input:
                 2.0
integrate((1 + x)   , x)


Result:
error-catch

This differed from the expected result:
                  3.0
0.33333334 (1 + x)

201/203 tests passed

The following 2 problems failed: (123 124)
Running tests in rtestifactor: 25/25 tests passed
Running tests in rtest_equal: 201/201 tests passed (not counting 2 expected errors)
Running tests in rtest_abs: 77/77 tests passed
Running tests in rtest_taylor: 144/144 tests passed (not counting 12 expected errors)
Running tests in rtest_dot: 
********************** Problem 6 ***************
Input:
bfloat_approx_equal(1.1 . 1.1b0, 1.21b0)


Result:
false

This differed from the expected result:
true

54/55 tests passed

The following 1 problem failed: (6)
Running tests in rtest_mset: 59/59 tests passed
Running tests in rtest_boolean: 120/120 tests passed
Running tests in rtest_round: 99/99 tests passed
Running tests in rtest_map: 99/99 tests passed (not counting 3 expected errors)
Running tests in rtest_sign: 277/277 tests passed (not counting 9 expected errors)
Running tests in rtest_algebraic: 45/45 tests passed
Running tests in rtest_gamma: 
********************** Problem 51 ***************
Input:
closeto(1.3!, 
  1.166711905198160345041881441202917938533994349719468893970206664b0, 1.0D-14)


Result:
3.338211293725137500069706687838194051671165639397020666400988039b-8

This differed from the expected result:
true

********************** Problem 52 ***************
Input:
closeto(2.3!, 
  2.683437381955768793596327314766711258628187004354778456131475327b0, 1.0D-14)


Result:
1.32412017280892634163059881591536817375448528456131475326991033b-7

This differed from the expected result:
true

********************** Problem 53 ***************
Input:
closeto(3.3!, 
  8.855343360454037018867880138730147153473017114370768905233868579b0, 1.0D-14)


Result:
2.259664072531976684953390172451400640112191731094766131420959977b-6

This differed from the expected result:
true

********************** Problem 57 ***************
Input:
closeto((%i + 1.3)!, 
5.406144679098492753783510221774150545811250310680842509749769021b-1 %i
 + 7.191409365372817791473038599462048083254863806205029128993808432b-1, 
1.0D-14)


Result:
3.785256655191478572335882013757683000803603841605790781912295346b-8

This differed from the expected result:
true

********************** Problem 58 ***************
Input:
closeto((%i + 2.3)!, 
1.962554212729935112517511210954259433862073952077096690141827718b0 %i
 + 1.113409686125898816660447855698856004567493644359072448693599037b0, 
1.0D-14)


Result:
1.23189362577976123662868288172816060845154557009075480435941927b-7

This differed from the expected result:
true

********************** Problem 59 ***************
Input:
closeto((%i + 3.3)!, 
7.589838588134684687968234851847912136312337686213491526161630507b0 %i
 + 1.711697751485530982461966712851965381210655074307842390547049105b0, 
5.0D-14)


Result:
2.069470620091287990747890531996667054618750808851146319745004166b-6

This differed from the expected result:
true

********************** Problem 179 ***************
Input:
ev(gamma(%e), numer)


Result:
1.567468255774053

This differed from the expected result:
1.5674683

********************** Problem 180 ***************
Input:
ev(gamma(%e), numer, %enumer)


Result:
1.567468255774053

This differed from the expected result:
1.5674683

********************** Problem 352 ***************
Input:
relerror(gamma_incomplete(0.5, - 10), 1.7724539 - 7388.538 %i, 2.0D-12)


Result:
1.4602058338268983D-8

This differed from the expected result:
true

********************** Problem 354 ***************
Input:
relerror(gamma_incomplete(0.5, - 5), 1.7724539 - 76.79623 %i, 1.5D-14)


Result:
2.989922299276408D-8

This differed from the expected result:
true

********************** Problem 356 ***************
Input:
relerror(gamma_incomplete(0.5, - 2.5), 1.7724539 - 9.873508 %i, 1.0D-15)


Result:
2.2031168931795757D-8

This differed from the expected result:
true

********************** Problem 358 ***************
Input:
relerror(gamma_incomplete(0.5, - 0.25), 1.7724539 - 1.0899742 %i, 5.0D-15)


Result:
3.301453240851113D-8

This differed from the expected result:
true

********************** Problem 360 ***************
Input:
relerror(gamma_incomplete(0.5, 0.1 %i - 10), - 7355.478 %i - 693.7125, 2.0D-12)


Result:
1.7672099392237727D-8

This differed from the expected result:
true

********************** Problem 362 ***************
Input:
relerror(gamma_incomplete(0.5, 0.1 %i - 5), - 76.497765 %i - 4.855607, 5.0D-15)


Result:
2.411736861698206D-8

This differed from the expected result:
true

********************** Problem 364 ***************
Input:
relerror(gamma_incomplete(0.5, 0.1 %i - 2.5), 1.0028895 - 9.84271 %i, 1.21D-15)


Result:
3.126918627448394D-8

This differed from the expected result:
true

********************** Problem 366 ***************
Input:
relerror(gamma_incomplete(0.5, 0.1 %i - 0.25), 1.5192535 - 1.1019363 %i, 
                                                                       2.0D-15)


Result:
3.4997227113275835D-8

This differed from the expected result:
true

********************** Problem 368 ***************
Input:
relerror(gamma_incomplete(0.5, 1.1 %i - 10), - 3741.5383 %i - 6334.195, 
                                                                       4.0D-12)


Result:
2.3340462122078975D-8

This differed from the expected result:
true

********************** Problem 371 ***************
Input:
relerror(gamma_incomplete(0.5, 1.1 %i - 2.5), - 6.435129 %i - 5.5335064, 
                                                                       5.0D-15)


Result:
2.5963853487228624D-8

This differed from the expected result:
true

********************** Problem 373 ***************
Input:
relerror(gamma_incomplete(0.5, 1.1 %i - 0.25), - 1.0658329 %i - 0.13794254, 
                                                                       2.0D-15)


Result:
4.2793368480883735D-8

This differed from the expected result:
true

********************** Problem 375 ***************
Input:
relerror(gamma_incomplete(0.5, - 100 %i), 0.024684086 %i + 0.09689916, 1.0D-15)


Result:
5.309887299761691D-10

This differed from the expected result:
true

********************** Problem 377 ***************
Input:
relerror(gamma_incomplete(0.5, - 50 %i), 0.069012605 %i + 0.12339894, 1.0D-15)


Result:
2.709402215532457D-8

This differed from the expected result:
true

********************** Problem 379 ***************
Input:
relerror(gamma_incomplete(0.5, - 10 %i), - 0.30392674 %i - 0.08046978, 1.0D-15)


Result:
4.320437967850714D-8

This differed from the expected result:
true

********************** Problem 381 ***************
Input:
relerror(gamma_incomplete(0.5, - 5 %i), 0.36441985 - 0.24368559 %i, 3.0D-15)


Result:
1.61533803197146D-8

This differed from the expected result:
true

********************** Problem 383 ***************
Input:
relerror(gamma_incomplete(0.5, - 2.5 %i), 0.009214957 %i - 0.5969142, 2.81D-15)


Result:
1.150820000452286D-8

This differed from the expected result:
true

********************** Problem 385 ***************
Input:
relerror(gamma_incomplete(0.5, - 0.25 %i), 0.6440371 %i + 1.0110906, 1.0D-15)


Result:
4.8895486928089505D-8

This differed from the expected result:
true

********************** Problem 387 ***************
Input:
relerror(gamma_incomplete(0.5, 0.25 %i), 1.0110906 - 0.6440371 %i, 1.0D-15)


Result:
4.8895486928089505D-8

This differed from the expected result:
true

********************** Problem 389 ***************
Input:
relerror(gamma_incomplete(0.5, 2.5 %i), - 0.009214957 %i - 0.5969142, 2.81D-15)


Result:
1.150820000452286D-8

This differed from the expected result:
true

********************** Problem 391 ***************
Input:
relerror(gamma_incomplete(0.5, 5 %i), 0.24368559 %i + 0.36441985, 3.0D-15)


Result:
1.61533803197146D-8

This differed from the expected result:
true

********************** Problem 393 ***************
Input:
relerror(gamma_incomplete(0.5, 50 %i), 0.12339894 - 0.069012605 %i, 1.0D-15)


Result:
2.709402215532457D-8

This differed from the expected result:
true

********************** Problem 395 ***************
Input:
relerror(gamma_incomplete(0.5, 100 %i), 0.09689916 - 0.024684086 %i, 1.0D-15)


Result:
5.309887299761691D-10

This differed from the expected result:
true

********************** Problem 397 ***************
Input:
relerror(gamma_incomplete(0.5, 1.0 %i - 1), - 2.2529845 %i - 0.64608663, 
                                                                       1.0D-15)


Result:
4.062905303961757D-8

This differed from the expected result:
true

********************** Problem 398 ***************
Input:
relerror(gamma_incomplete(0.5, 2.0 %i - 2), - 0.6696405 %i - 4.636215, 4.0D-15)


Result:
4.9924246597737244D-8

This differed from the expected result:
true

********************** Problem 399 ***************
Input:
relerror(gamma_incomplete(0.5, 3.0 %i - 3), 8.244293 %i - 6.274836, 4.0D-15)


Result:
4.423725338646418D-8

This differed from the expected result:
true

********************** Problem 400 ***************
Input:
relerror(gamma_incomplete(0.5, 4.0 %i - 4), 22.441214 %i + 9.028176, 5.0D-15)


Result:
2.09623156236818D-8

This differed from the expected result:
true

********************** Problem 401 ***************
Input:
relerror(gamma_incomplete(0.5, 5.0 %i - 5), 9.81323 %i + 57.54071, 3.0D-15)


Result:
1.472729929166936D-8

This differed from the expected result:
true

********************** Problem 402 ***************
Input:
relerror(gamma_incomplete(0.5, 6.0 %i - 6), 95.71761 - 107.542206 %i, 2.0D-15)


Result:
8.214871591317707D-9

This differed from the expected result:
true

********************** Problem 403 ***************
Input:
relerror(gamma_incomplete(0.5, 10.0 %i - 10), 5931.0757 %i + 921.0687, 1.0D-15)


Result:
3.6582463732279526D-8

This differed from the expected result:
true

********************** Problem 404 ***************
Input:
relerror(gamma_incomplete(0.5, 15.0 %i - 15), 315145.5 %i - 649132.2, 1.0D-15)


Result:
3.7012854566979756D-8

This differed from the expected result:
true

********************** Problem 405 ***************
Input:
relerror(gamma_incomplete(0.5, 1.0 %i - 1), - 2.2529845 %i - 0.64608663, 
                                                                       5.0D-15)


Result:
4.062905303961757D-8

This differed from the expected result:
true

********************** Problem 406 ***************
Input:
relerror(gamma_incomplete(0.5, 2.0 %i - 2), - 0.6696405 %i - 4.636215, 4.0D-15)


Result:
4.9924246597737244D-8

This differed from the expected result:
true

********************** Problem 407 ***************
Input:
relerror(gamma_incomplete(0.5, 3.0 %i - 3), 8.244293 %i - 6.274836, 4.0D-15)


Result:
4.423725338646418D-8

This differed from the expected result:
true

********************** Problem 408 ***************
Input:
relerror(gamma_incomplete(0.5, 4.0 %i - 4), 22.441214 %i + 9.028176, 5.0D-15)


Result:
2.09623156236818D-8

This differed from the expected result:
true

********************** Problem 409 ***************
Input:
relerror(gamma_incomplete(0.5, 5.0 %i - 5), 9.81323 %i + 57.54071, 3.0D-15)


Result:
1.472729929166936D-8

This differed from the expected result:
true

********************** Problem 410 ***************
Input:
relerror(gamma_incomplete(0.5, 6.0 %i - 6), 95.71761 - 107.542206 %i, 2.0D-15)


Result:
8.214871591317707D-9

This differed from the expected result:
true

********************** Problem 411 ***************
Input:
relerror(gamma_incomplete(0.5, 10.0 %i - 10), 5931.0757 %i + 921.0687, 1.0D-15)


Result:
3.6582463732279526D-8

This differed from the expected result:
true

********************** Problem 412 ***************
Input:
relerror(gamma_incomplete(0.5, 15.0 %i - 15), 315145.5 %i - 649132.2, 1.0D-15)


Result:
3.7012854566979756D-8

This differed from the expected result:
true

********************** Problem 430 ***************
Input:
closeto(gamma_incomplete_generalized(0.15, 0.1, 0.9), 
                               1.2852107729384965755381966241403693b0, 1.0D-14)


Result:
2.9915104243120098829851599887712576b-8

This differed from the expected result:
true

********************** Problem 433 ***************
Input:
closeto(gamma_incomplete_generalized(%i + 0.15, %i + 0.1, %i + 0.9), 
- 1.331624948541950064551011751571048216966144653609664738448103866b-1 %i
 - 3.956290928621934869542750861441673192206453223955788892863857789b-2, 
1.0D-14)


Result:
3.114185090268277414047970209319593434269454421125209658740643497b-9

This differed from the expected result:
true

********************** Problem 435 ***************
Input:
closeto(gamma_incomplete_generalized(%i - 0.15, %i + 0.1, %i + 0.9), 
- 1.061573977537848899036540409816513040090736207026024415933198781b-1 %i
 - 7.903699552278027449948116754698066920498863638107044857029927559b-2, 
1.0D-14)


Result:
3.762223787376987807329567543044004514011595655283167174443847488b-9

This differed from the expected result:
true

********************** Problem 459 ***************
Input:
closeto(gamma_incomplete_regularized(0.25, 0.15), 
  3.33171802315356635312883100316418088698364424547247141093212159b-1, 1.0D-15)


Result:
5.870653007997207624332537628436065840562872141093212158997399413b-9

This differed from the expected result:
true

********************** Problem 461 ***************
Input:
closeto(gamma_incomplete_regularized(- 0.25, 0.15), 
- 3.747953569677745583399657181155178573572870781780605755597341785b-1, 
1.0D-15)


Result:
1.121187021725036191412184945015552011040462307555973417850472085b-8

This differed from the expected result:
true

********************** Problem 463 ***************
Input:
closeto(gamma_incomplete_regularized(- 0.25, - 0.15), 
8.793111686526307330149512394813836593198771932587418970029356374b-1 %i
 + 1.206888313473692669850487605186163406801228067412581029970643626b-1, 
1.0D-15)


Result:
1.513444147122233140077371815968059332435898202879683641527956118b-8

This differed from the expected result:
true

********************** Problem 465 ***************
Input:
closeto(gamma_incomplete_regularized(0.25, %i + 0.15), 
- 1.759768209797086273285777898669237251900625192446301525551431309b-1 %i
 - 2.418334505387030409242574179510248953686143416190056596191932b-2, 1.0D-15)


Result:
1.403237635967879359435595156574265604599907800979776758296745264b-9

This differed from the expected result:
true

********************** Problem 467 ***************
Input:
closeto(gamma_incomplete_regularized(0.25, 0.15 - %i), 
1.759768209797086273285777898669237251900625192446301525551431309b-1 %i
 - 2.418334505387030409242574179510248953686143416190056596191932b-2, 1.0D-15)


Result:
1.403237635967879359435595156574265604599907800979776758296745264b-9

This differed from the expected result:
true

********************** Problem 635 ***************
Input:
beta_incomplete(1.0, 1, z)


Result:
error-catch

This differed from the expected result:
1.0 z

********************** Problem 670 ***************
Input:
closeto(beta_incomplete(0.5, 1.0, 0.1), 6.324555320336759b-1, 1.0D-15)


Result:
4.712161008613158b-9

This differed from the expected result:
true

********************** Problem 671 ***************
Input:
closeto(beta_incomplete(0.5, 1.0, 0.15), 7.745966692414834b-1, 1.0D-15)


Result:
1.538985286431149b-8

This differed from the expected result:
true

********************** Problem 672 ***************
Input:
closeto(beta_incomplete(0.5, 1.0, 0.2), 8.944271909999159b-1, 1.0D-15)


Result:
6.664001878098347b-9

This differed from the expected result:
true

635/693 tests passed

The following 58 problems failed: (51 52 53 57 58 59 179 180 352 354 356 358 360 362 364 366 368 371 373 375 377 379 381 383 385 387 389 391 393 395 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 430 433 435 459 461 463 465 467 635 670 671 672)
Running tests in rtest_expintegral: 
********************** Problem 103 ***************
Input:
test_value(expintegral_e(0.5, 0.5), 0.7953795, 15)


Result:
2.8615882885496546D-8

This differed from the expected result:
true

********************** Problem 104 ***************
Input:
test_value(expintegral_e(1.5, 0.5), 1.0D-17 %i + 0.41768184, 15)


Result:
1.4463809816511741D-8

This differed from the expected result:
true

********************** Problem 105 ***************
Input:
test_value(expintegral_e(1.5, 1.5), 1.0D-18 %i + 0.08475847, 15)


Result:
1.6983803252657026D-11

This differed from the expected result:
true

********************** Problem 106 ***************
Input:
test_value(expintegral_e(%i - 0.25, 0.5), 0.7029676 - 1.0854584 %i, 15)


Result:
2.8798309847921644D-8 and 1.1924468523716314D-8

This differed from the expected result:
true

********************** Problem 107 ***************
Input:
test_value(expintegral_e(%i + 0.5, 0.5), 0.50378907 - 0.4713446 %i, 15)


Result:
1.978457964124658D-8 and 7.927940304242043D-9

This differed from the expected result:
true

********************** Problem 108 ***************
Input:
test_value(expintegral_e(%i + 0.5, 1.5), 0.106174976 - 0.04370295 %i, 15)


Result:
5.862236668319198D-10 and 8.603947554419733D-10

This differed from the expected result:
true

********************** Problem 159 ***************
Input:
test_table(lambda([z], expintegral_e(- 2, z)), 'em2, 2, 3.5D-14)


Result:
[1.7260580875699816D-7, [1.0, 1.839397205857212, 1.8393972, 
1.3855868896683887D-8], [0.5, 15.76979715252847, 15.769797, 
1.7260580875699816D-7]]

This differed from the expected result:
[]

********************** Problem 160 ***************
Input:
test_table(lambda([z], expintegral_e(- 3, z)), 'em3, 2, 2.9D-14)


Result:
[3.7194593573985912D-6, [1.0, 5.886071058743077, 5.886071, 
1.4639608281186156D-7], [0.5, 95.83184423459608, 95.83184, 
3.7194593573985912D-6]]

This differed from the expected result:
[]

********************** Problem 161 ***************
Input:
test_table(lambda([z], expintegral_e(- 4, z)), 'em4, 2, 1.0D-15)


Result:
[1.734463137381681D-5, [1.0, 23.91216367614375, 23.912163, 
8.953820298529536D-7], [0.5, 767.8678151961939, 767.8678, 
1.734463137381681D-5]]

This differed from the expected result:
[]

********************** Problem 162 ***************
Input:
test_complex_table(lambda([z], expintegral_e(2, z)), 'e2, 12, 3.9D-15)


Result:
[9.117784757308281D-8, [1.0 %i - 0.5, - 0.872308287488887 %i
 - 0.38635442441709, - 0.8723083 %i - 0.38635442, 2.7489955726759896D-8], 
[1.0 %i - 1.0, - 1.276552103694259 %i - 1.04975484772724, 
- 1.2765521 %i - 1.0497549, 2.4819616801512278D-8], 
[1.0 %i - 1.5, - 1.578309953986089 %i - 2.182553757827009, 
- 1.57831 %i - 2.1825538, 5.973147949630286D-8], 
[1.0 %i + 1.5, 0.0152091306647863 - 0.0662678635026172 %i, 
0.015209131 - 0.06626786 %i, 6.49177828856139D-10], 
[1.0 %i + 1.0, 0.0191599508550728 - 0.130516965065735 %i, 
0.01915995 - 0.13051696 %i, 3.88638332496455D-9], 
[1.0 %i + 0.5, 0.00591349589152433 - 0.260236353676038 %i, 
0.005913496 - 0.26023635 %i, 1.0018709344437298D-9], 
[- 0.5, 1.421611318268541 - 1.570796326794897 %i, 1.4216113 - 1.5707964 %i, 
4.467257797413341D-8], [- 1.0, 0.823164012103109 - 3.141592653589793 %i, 
0.823164 - 3.1415927 %i, 9.117784757308281D-8], 
[- 1.5, - 4.71238898038469 %i - 0.470239103356632, - 4.712389 %i - 0.4702391, 
1.1936048309629478D-8], [1.5, 0.073100786538481, 0.07310078, 
3.6076300558018914D-9], [1.0, 0.148495506775922, 0.14849551, 
3.4446056285108995D-9], [0.5, 0.326643862324553, 0.32664385, 
7.944899016454343D-9]]

This differed from the expected result:
[]

********************** Problem 164 ***************
Input:
                       expintegral_si(z)
test_table(lambda([z], -----------------), 'si_1, 50, 1.25D-10)
                               z


Result:
[2.7444709838064796D-8, [0.5, 0.986214836086134, 0.9862148, 
1.9515851601425993D-8], [0.49, 0.986756799305007, 0.9867568, 
2.3002180160602848D-9], [0.48, 0.987288128353627, 0.9872881, 
1.0944874895280066D-8], [0.47, 0.98780880105045, 0.9878088, 
2.253505992921845D-8], [0.46, 0.98831880035704, 0.9883188, 
5.691683790942648D-10], [0.45, 0.988818109485427, 0.9888181, 
4.499348671416215D-10], [0.44, 0.989306707578021, 0.9893067, 
1.9269304929458997D-8], [0.43, 0.989784578636919, 0.9897846, 
1.971360563679525D-8], [0.42, 0.99025170691678, 0.9902517, 
1.303484931103327D-8], [0.41, 0.990708072893106, 0.99070805, 
1.9781075555336258D-8], [0.4, 0.991153661616055, 0.99115366, 
4.17968426535964D-9], [0.39, 0.991588458390307, 0.9915885, 
1.492970014282946D-8], [0.38, 0.992012445033019, 0.99201244, 
3.8747239861081084D-9], [0.37, 0.992425607649452, 0.9924256, 
1.2906425927994292D-8], [0.36, 0.992827931418348, 0.99282795, 
2.048976399660063D-8], [0.35, 0.993219403055061, 0.9932194, 
2.7444709838064796D-8], [0.34, 0.993600006177934, 0.9936, 
4.6939530040646105D-9], [0.33, 0.993969728309115, 0.99396974, 
1.017431350280873D-8], [0.32, 0.994328557229314, 0.99432856, 
1.2156623485637397D-9], [0.31, 0.994676477916224, 0.9946765, 
7.1596936157547475D-9], [0.3, 0.995013478961587, 0.9950135, 
3.5434964962277604D-9], [0.29, 0.99533954921721, 0.9953396, 
2.3212447186615748D-8], [0.28, 0.995654675026736, 0.9956547, 
2.7159848037250356D-8], [0.27, 0.995958846056876, 0.99595886, 
1.8631997278362178D-8], [0.26, 0.996252052235776, 0.99625206, 
7.700747151062615D-9], [0.25, 0.996534281279029, 0.9965343, 
6.6505059237442765D-9], [0.24, 0.996805524329175, 0.99680555, 
2.433873247387197D-8], [0.23, 0.997065770827858, 0.9970658, 
1.1719139436650039D-8], [0.22, 0.997315012194797, 0.997315, 
2.262799358998535D-8], [0.21, 0.997553239072726, 0.9975532, 
9.740755646525656D-9], [0.2, 0.997780442565101, 0.99778044, 
3.272471182924619D-10], [0.19, 0.997996615178355, 0.9979966, 
1.3106098872839311D-8], [0.18, 0.998201748493499, 0.9982017, 
2.062637260991096D-8], [0.17, 0.998395835743436, 0.99839586, 
2.4451724089935567D-8], [0.16, 0.998578869632512, 0.99857885, 
2.3177892050085802D-8], [0.15, 0.998750843328009, 0.99875087, 
2.2131433574656967D-8], [0.14, 0.998911751155138, 0.99891174, 
1.2759447387544753D-8], [0.13, 0.999061587059797, 0.9990616, 
2.587140834897639D-9], [0.12, 0.999200345551108, 0.99920034, 
1.4654149005366435D-9], [0.11, 0.999328021751514, 0.999328, 
4.516712226454445D-9], [0.1, 0.999444611066222, 0.9994446, 
7.14623904496392D-9], [0.09, 0.999550109299193, 0.9995501, 
5.157957838619609D-9], [0.08, 0.999644512719569, 0.9996445, 
5.178990680754225D-9], [0.07, 0.999727817788793, 0.99972785, 
2.7403162183858853D-8], [0.06, 0.999800021607614, 0.9998, 
4.809164289021339D-9], [0.05, 0.999861121523197, 0.9998611, 
3.455236097238412D-10], [0.04, 0.999911115381635, 0.9999111, 
1.409300487420495D-8], [0.03, 0.999950001352215, 0.99995, 
9.649181675897012D-9], [0.02, 0.999977778045438, 0.99997777, 
1.0577938747147186D-8], [0.01, 0.999994444461358, 0.99999446, 
1.2306678121021264D-8]]

This differed from the expected result:
[]

********************** Problem 166 ***************
Input:
test_table(lambda([z], expintegral_si(z)), 'si_2, 230, 1.95D-10)


Result:
[9.050996996329275D-8, [10, 1.658347594218887, 1.6583476, 
1.2440048324791064D-8], [9.9, 1.663384074225765, 1.6633841, 
5.707401662391476D-9], [9.8, 1.667569609718684, 1.6675696, 
2.7579900141461167D-8], [9.7, 1.670844575071095, 1.6708446, 
2.0169972358985433D-8], [9.6, 1.673156973178305, 1.673157, 
3.5215237392804966D-9], [9.5, 1.674463342281438, 1.6744634, 
4.902257844108249D-8], [9.4, 1.674729171527111, 1.6747292, 
5.6492603262014995D-8], [9.3, 1.673929530868593, 1.6739296, 
4.1236814851686177D-8], [9.2, 1.672049443373055, 1.6720494, 
4.01824422624486D-8], [9.1, 1.669084318975057, 1.6690843, 
8.44344105743744D-9], [9.0, 1.665040075829596, 1.6650401, 
5.955400972368352D-8], [8.9, 1.659933483729443, 1.6599334, 
3.589161323702683D-8], [8.8, 1.653792198729559, 1.6537921, 
5.5861517189725873D-8], [8.7, 1.646654516334139, 1.6466545, 
2.9677949875406284D-8], [8.6, 1.638569677962151, 1.6385696, 
8.453258537599595D-8], [8.5, 1.629597099590377, 1.6295971, 
3.175743046313073D-8], [8.4, 1.619806558002927, 1.6198066, 
8.929779315991482D-8], [8.3, 1.609277562665416, 1.6092775, 
7.586426886696529D-8], [8.2, 1.598098488739656, 1.5980985, 
2.772457774469217D-8], [8.1, 1.586366668140627, 1.5863667, 
1.4698244399369287D-8], [8.0, 1.574186821706943, 1.5741868, 
1.9796542627403824D-8], [7.9, 1.561671082273599, 1.561671, 
6.367313476474123D-8], [7.8, 1.548937482495568, 1.5489374, 
4.2577049441661075D-8], [7.7, 1.536109213650978, 1.5361092, 
4.590308577689939D-9], [7.6, 1.523313779209461, 1.5233138, 
1.845201436090349D-8], [7.5, 1.510681530943383, 1.5106815, 
2.0971763881050265D-8], [7.4, 1.49834476488815, 1.4983448, 
1.4126437575257D-8], [7.3, 1.486436467283429, 1.4864365, 
1.8960772951714944D-8], [7.2, 1.475089034422231, 1.4750891, 
3.875892162774619D-8], [7.1, 1.464433234265804, 1.4644332, 
4.1059017075184556D-8], [7.0, 1.45459661424809, 1.4545966, 
2.44314148911684D-8], [6.9, 1.445702450717329, 1.4457024, 
1.7131208451814928D-8], [6.8, 1.437868429951191, 1.4378684, 
7.324647910422755D-8], [6.7, 1.431205373745042, 1.4312054, 
1.8138808233203463D-8], [6.6, 1.425816144088328, 1.4258162, 
3.4233510248782295D-8], [6.5, 1.421794274435883, 1.4217943, 
2.0875091433225634D-8], [6.4, 1.419222975775152, 1.419223, 
2.4839788670405483D-8], [6.3, 1.418174035300781, 1.418174, 
6.904174565391941D-9], [6.2, 1.418706826670233, 1.4187068, 
5.195862406992546D-8], [6.1, 1.420867376272552, 1.4208673, 
5.239712441706956D-8], [6.0, 1.424687551280506, 1.4246875, 
4.651213436623891D-8], [5.9, 1.430184328066035, 1.4301844, 
3.625281230767996D-8], [5.8, 1.437359167003231, 1.4373592, 
4.6825809230099935D-8], [5.7, 1.446197546935419, 1.4461975, 
3.716979435353096D-8], [5.6, 1.456668395465238, 1.4566684, 
1.8542630986218D-8], [5.5, 1.4687240726651, 1.4687241, 5.8919067846829876D-8], 
[5.4, 1.48230006900178, 1.4823, 2.589570113897821D-8], 
[5.3, 1.497315033623934, 1.497315, 1.5547513276814584D-8], 
[5.2, 1.513670979171406, 1.5136709, 5.784572265632448D-8], 
[5.1, 1.531253222025191, 1.5312532, 3.374373003239839D-9], 
[5.0, 1.549931244944673, 1.5499313, 4.282082954887301D-8], 
[4.9, 1.569558918979431, 1.569559, 5.910131850583866D-8], 
[4.8, 1.589975238588341, 1.5899752, 7.419669323383005D-10], 
[4.7, 1.611005212388553, 1.6110052, 2.5353946053741083D-8], 
[4.6, 1.632460373101602, 1.6324604, 1.7342935088038303D-8], 
[4.5, 1.654140414379244, 1.6541405, 5.803286562411358D-8], 
[4.4, 1.675833938782955, 1.675834, 1.7230266102785663D-9], 
[4.3, 1.697319810044146, 1.6973199, 5.5182599822956035D-8], 
[4.2, 1.718368603271793, 1.7183685, 7.299835580454328D-8], 
[4.1, 1.73874364552518, 1.7387437, 1.7308987576569734D-8], 
[4.0, 1.758203138949053, 1.7582031, 9.892804797573262D-9], 
[3.9, 1.77650134362973, 1.7765014, 7.353030406775929D-8], 
[3.8, 1.793390362527374, 1.7933904, 3.072976673124117D-8], 
[3.7, 1.808621674050195, 1.8086216, 2.907644036653778D-8], 
[3.6, 1.821948127372291, 1.8219482, 4.328963520983109D-8], 
[3.5, 1.833125398665997, 1.8331254, 4.580649992647068D-8], 
[3.4, 1.841913976158407, 1.8419139, 3.763606803985908D-8], 
[3.3, 1.848080785074575, 1.8480808, 3.079448473997104D-8], 
[3.2, 1.851400896148597, 1.8514009, 4.394522812312118D-8], 
[3.1, 1.851659306395344, 1.8516593, 8.452228694721953D-9], 
[3.0, 1.848652527999468, 1.8486525, 4.596669245238161D-8], 
[2.9, 1.842190202513648, 1.8421901, 5.6067420040051275D-8], 
[2.8, 1.832096583376508, 1.8320966, 6.685833886521664D-9], 
[2.7, 1.818212084018666, 1.818212, 5.17005507294499D-8], 
[2.6, 1.800394431618291, 1.8003944, 1.5762882998870964D-8], 
[2.5, 1.778520173443827, 1.7785202, 5.303475014706294D-8], 
[2.4, 1.752485527602261, 1.7524855, 1.391512682857865D-8], 
[2.3, 1.722207466345505, 1.7222074, 3.9320663614006435D-8], 
[2.2, 1.687624844764786, 1.6876248, 3.2638626024095174D-8], 
[2.1, 1.648698597043436, 1.6486987, 9.050996996329275D-8], 
[2.0, 1.605412976802695, 1.605413, 1.6750204778759326D-8], 
[1.99, 1.600844727464433, 1.6008447, 1.3403181453597313D-8], 
[1.98, 1.596232959065272, 1.5962329, 6.798250851147714D-8], 
[1.97, 1.591577694412615, 1.5915776, 4.5296098871716595D-8], 
[1.96, 1.586878958686857, 1.5868789, 6.292727494638939D-8], 
[1.95, 1.582136779442913, 1.5821368, 2.922166020269401D-8], 
[1.94, 1.577351186611574, 1.5773512, 2.5889952182112097D-8], 
[1.93, 1.572522154676365, 1.5725222, 8.714748034321929D-9], 
[1.92, 1.567649833455479, 1.5676498, 7.853115047140591D-9], 
[1.91, 1.562734202706542, 1.5627342, 4.354742522139077D-8], 
[1.9, 1.557775301874317, 1.5577753, 4.285637289491717D-8], 
[1.89, 1.55277317278385, 1.5527732, 6.444454392351417D-8], 
[1.88, 1.547727859640863, 1.5477278, 3.6383416279761605D-8], 
[1.87, 1.542639409031993, 1.5426394, 3.4299022289019376D-8], 
[1.86, 1.537507869924864, 1.5375079, 2.1730104382555737D-8], 
[1.85, 1.532333293667991, 1.5323333, 3.885384303181638D-8], 
[1.84, 1.527115733990534, 1.5271157, 3.136144477444702D-8], 
[1.83, 1.521855247001882, 1.5218552, 1.1902089314119735D-8], 
[1.82, 1.516551891191073, 1.5165519, 3.8964815818332D-8], 
[1.81, 1.511205663439852, 1.5112057, 9.777921805564915D-9], 
[1.8, 1.505816754457426, 1.5058168, 6.28262042390304D-8], 
[1.79, 1.500385166390463, 1.5003852, 1.1759246909548438D-9], 
[1.78, 1.49491096723762, 1.494911, 1.1808542810243239D-8], 
[1.77, 1.489394227371882, 1.4893942, 3.944463600191739D-8], 
[1.76, 1.483835019539014, 1.483835, 3.762067946055936D-8], 
[1.75, 1.478233418855845, 1.4782335, 3.775578849563033D-8], 
[1.74, 1.472589502808388, 1.4725895, 1.0010536843907403D-8], 
[1.73, 1.466903351249807, 1.4669033, 2.235423846030926D-8], 
[1.72, 1.461175046398209, 1.4611751, 3.7715865763843226D-8], 
[1.71, 1.455404672834282, 1.4554046, 3.3590202619393494D-8], 
[1.7, 1.44959231749877, 1.4495922, 8.479460689159168D-8], 
[1.69, 1.44373806968978, 1.443738, 8.598616663135772D-8], 
[1.68, 1.437841950524708, 1.437842, 6.092701321236405D-8], 
[1.67, 1.43190419458152, 1.4319042, 2.157676259884056D-9], 
[1.66, 1.425924828175218, 1.4259249, 6.901869076259004D-8], 
[1.65, 1.41990395000327, 1.419904, 4.360329719510503D-8], 
[1.64, 1.413841661104638, 1.4138417, 6.329111368330587D-8], 
[1.63, 1.407738064856116, 1.4077381, 2.4705346879372314D-8], 
[1.62, 1.401593266968506, 1.4015932, 5.865551799821844D-8], 
[1.61, 1.395407375482643, 1.3954073, 5.641373457265786D-8], 
[1.6, 1.389180500765246, 1.3891805, 4.027326738764714D-8], 
[1.59, 1.382912755504614, 1.3829128, 4.921014706837923D-10], 
[1.58, 1.376604254706165, 1.3766042, 5.529668056780679D-8], 
[1.57, 1.370255115687812, 1.3702551, 3.0398021877431347D-9], 
[1.56, 1.363865381663417, 1.3638654, 6.144617703540689D-9], 
[1.55, 1.357435326904047, 1.3574353, 1.8745672569764338D-8], 
[1.54, 1.350964999706314, 1.350965, 2.333445747737528D-8], 
[1.53, 1.344454526588688, 1.3444545, 3.125575354090415D-10], 
[1.52, 1.337904036356611, 1.3379041, 5.929310775698582D-8], 
[1.51, 1.331313660096924, 1.3313136, 5.00200196817957D-8], 
[1.5, 1.32468353117212, 1.3246835, 1.5847838819027515D-8], 
[1.49, 1.318013785214452, 1.3180138, 2.05514028017717D-9], 
[1.48, 1.311304560119879, 1.3113046, 9.124506261670717D-9], 
[1.47, 1.30455599604185, 1.304556, 1.6111775913429938D-8], 
[1.45, 1.290941422798322, 1.2909414, 6.518571171731935D-8], 
[1.44, 1.284075705169086, 1.2840756, 8.737886347809365D-8], 
[1.43, 1.277171149077178, 1.2771711, 1.4128447745065387D-8], 
[1.42, 1.270228070482014, 1.2702281, 7.702469972947767D-8], 
[1.41, 1.263246540865703, 1.2632465, 4.6108203921590984D-9], 
[1.4, 1.256226715997109, 1.2562268, 6.20332865075568D-8], 
[1.39, 1.249168753847277, 1.2491688, 2.233147000652025D-10], 
[1.38, 1.242072814581826, 1.2420728, 6.081626091614112D-9], 
[1.37, 1.234939060553186, 1.2349391, 3.780496848904136D-8], 
[1.36, 1.22776765629268, 1.2277676, 6.958461140627037D-8], 
[1.35, 1.220558768502462, 1.2205588, 5.952107917650551D-9], 
[1.34, 1.213312566047292, 1.2133125, 5.937157210311739D-8], 
[1.33, 1.206029219946172, 1.2060292, 4.32341362710531D-8], 
[1.32, 1.198708903363821, 1.1987089, 1.1495229434999032D-8], 
[1.31, 1.191351703679698, 1.1913518, 6.767497762183439D-8], 
[1.3, 1.183957973732959, 1.183958, 7.985590833037293D-8], 
[1.29, 1.176527805588157, 1.1765279, 5.219230003739028D-8], 
[1.28, 1.16906138090471, 1.1690614, 4.144331211541896D-8], 
[1.27, 1.161558883442916, 1.1615589, 1.694206197555559D-8], 
[1.26, 1.154020499054536, 1.1540205, 4.881228532482851D-8], 
[1.25, 1.146446415673234, 1.1464465, 5.0772688497957574D-8], 
[1.24, 1.138836823304878, 1.1388369, 3.7351860049383845D-8], 
[1.23, 1.131191914017685, 1.1311918, 6.43091278007546D-8], 
[1.22, 1.123511881932228, 1.1235119, 2.850630953510347D-8], 
[1.21, 1.115796923211299, 1.1157969, 4.260913843978642D-10], 
[1.2, 1.108047236049624, 1.1080472, 1.0883359546909332D-8], 
[1.19, 1.100263020663442, 1.100263, 2.1128835125949763D-8], 
[1.18, 1.092444385871779, 1.0924444, 3.398906134322033D-8], 
[1.17, 1.08459172231283, 1.0845917, 2.40174315990771D-8], 
[1.16, 1.076705143203255, 1.0767052, 7.415819469613893D-8], 
[1.15, 1.068784856738289, 1.0687848, 2.3783881974992482D-8], 
[1.14, 1.060831073080436, 1.0608311, 3.1341467199297313D-9], 
[1.13, 1.052844004348211, 1.052844, 4.3198176147285494D-8], 
[1.12, 1.044823864604731, 1.0448239, 2.0359257835167455D-8], 
[1.11, 1.036770869846182, 1.0367708, 4.9228505938359035D-8], 
[1.1, 1.028685237990133, 1.0286852, 2.5854817842230204D-8], 
[1.09, 1.020567188863733, 1.0205672, 1.0137537032051114D-8], 
[1.08, 1.012416944191764, 1.012417, 1.4617135057903852D-8], 
[1.07, 1.004234727584556, 1.0042347, 5.599184360605136D-8], 
[1.06, 0.996020666419293, 0.99602073, 6.789085704728137D-8], 
[1.05, 0.987775183879242, 0.9877752, 2.2686614586930887D-8], 
[1.04, 0.97949841142822, 0.97949845, 3.455948127673025D-8], 
[1.03, 0.971190580095347, 0.97119063, 5.129427127492647D-8], 
[1.02, 0.962851922732921, 0.96285194, 1.885261990963727D-8], 
[1.01, 0.954482674003555, 0.9544827, 5.951388271085989D-10], 
[1.0, 0.946083070367183, 0.94608307, 1.5195267266676638D-9], 
[0.99, 0.937653350067941, 0.93765336, 1.2683065597762777D-8], 
[0.98, 0.929193753120926, 0.92919374, 1.799824500547942D-8], 
[0.97, 0.920704521298819, 0.9207045, 3.731291775554979D-8], 
[0.96, 0.912185847256291, 0.91218585, 5.029554550617377D-10], 
[0.95, 0.903638077791821, 0.90363806, 1.2930523873855293D-8], 
[0.94, 0.895061409181762, 0.89506143, 2.4133515186264276D-8], 
[0.93, 0.886456090092991, 0.8864561, 1.7762516568708975D-8], 
[0.92, 0.877822370881284, 0.87782234, 3.134652437619678D-8], 
[0.91, 0.869160503577208, 0.8691605, 3.02304977717327D-8], 
[0.9, 0.860470689994216, 0.8604707, 2.2190689841217193D-8], 
[0.89, 0.851753289061095, 0.8517533, 5.406830538845497D-9], 
[0.88, 0.843008506034836, 0.8430085, 1.2184158459938033D-8], 
[0.87, 0.83423659950183, 0.8342366, 2.235485918600233D-8], 
[0.86, 0.825437829651006, 0.82543784, 1.414858552539755D-8], 
[0.85, 0.816612458259025, 0.8166124, 3.579274643339403D-8], 
[0.84, 0.807760695837057, 0.8077607, 1.9647562354840886D-8], 
[0.83, 0.798882912814422, 0.7988829, 1.1145873779483395D-8], 
[0.82, 0.789979322958982, 0.78997934, 1.5686952847815405D-8], 
[0.81, 0.781050194248152, 0.7810502, 1.0982560527672547D-8], 
[0.8, 0.772095796171435, 0.7720958, 3.274670645758704D-9], 
[0.79, 0.763116399714964, 0.76311636, 4.0004270895899197D-8], 
[0.78, 0.754112223603992, 0.75411224, 2.0048351756507543D-8], 
[0.77, 0.745083649110093, 0.7450837, 4.057954283709364D-8], 
[0.76, 0.736030898020125, 0.73603094, 3.822102467854194D-8], 
[0.75, 0.726954247150087, 0.7269542, 2.5424622962511023D-8], 
[0.74, 0.717853974733759, 0.71785396, 1.135866756207804D-8], 
[0.73, 0.708730360406627, 0.70873034, 2.040265989489143D-8], 
[0.72, 0.699583685189706, 0.69958365, 3.555439065383581D-8], 
[0.71, 0.690414176751687, 0.6904142, 1.3540671583989194D-8], 
[0.7, 0.68122222814565, 0.68122226, 3.185267194449892D-8], 
[0.69, 0.67200806986452, 0.6720081, 2.7307263450460084D-8], 
[0.68, 0.662771988307731, 0.662772, 1.1528237031654953D-8], 
[0.67, 0.653514271177913, 0.65351427, 5.1638134879183895D-9], 
[0.66, 0.644235207464145, 0.6442352, 1.3734744230831097D-8], 
[0.65, 0.634935031929854, 0.6349351, 4.9075242869456304D-8], 
[0.64, 0.625614146954035, 0.62561417, 1.930573056974083D-8], 
[0.63, 0.616272789913099, 0.6162728, 1.7208178215710745D-8], 
[0.62, 0.606911254772631, 0.60691124, 1.2764421630784284D-8], 
[0.61, 0.597529836699576, 0.5975298, 8.151144426093992D-9], 
[0.6, 0.588128832044956, 0.5881288, 2.688443356824166D-8], 
[0.59, 0.578708482120237, 0.5787085, 4.735211411865947D-8], 
[0.58, 0.569269197892671, 0.56926924, 4.200982517410523D-8], 
[0.57, 0.559811223068821, 0.55981123, 1.140536065591391D-8], 
[0.56, 0.550334858561573, 0.5503349, 1.225370449553509D-8], 
[0.55, 0.540840406380251, 0.5408404, 1.9035890641561082D-8], 
[0.54, 0.53132816961286, 0.53132814, 2.7923559908771267D-8], 
[0.53, 0.521798395555152, 0.52179843, 3.63181691387382D-8], 
[0.52, 0.512251503003589, 0.5122515, 6.688586573488919D-9], 
[0.51, 0.502687741425048, 0.50268775, 1.0821808338334904D-8]]

This differed from the expected result:
[]

********************** Problem 168 ***************
Input:
                       - %gamma - log(z) + expintegral_ci(z)
test_table(lambda([z], -------------------------------------), 'ci_1, 50, 
                                         2
                                        z
                                                                      1.95D-10)


Result:
[1.460848364498446D-8, [0.49, - 0.247512257922825, - 0.24751227, 
8.117023719833583D-9], [0.48, - 0.247612243450765, - 0.24761225, 
9.380694193650285D-9], [0.47, - 0.247710220256491, - 0.24771023, 
7.709817423373622D-9], [0.46, - 0.247806170819803, - 0.24780616, 
9.17772868813671D-9], [0.45, - 0.247900095979288, - 0.2479001, 
2.582952407514938D-9], [0.44, - 0.247991985702032, - 0.247992, 
8.321290795310077D-9], [0.43, - 0.248081859921118, - 0.24808185, 
1.1895795876126769D-8], [0.42, - 0.248169683406498, - 0.24816969, 
6.964061216585549D-9], [0.41, - 0.248255481286963, - 0.24825549, 
9.969751274541139D-9], [0.4, - 0.248339236353077, - 0.24833925, 
1.4330707814869115D-8], [0.39, - 0.248420980740501, - 0.24842097, 
1.2088729434145407D-8], [0.38, - 0.248500643530754, - 0.24850065, 
1.6299211702541783D-9], [0.37, - 0.248578281068603, - 0.2485783, 
1.4043052914969323D-8], [0.36, - 0.248653894464026, - 0.24865389, 
5.761633309342429D-9], [0.35, - 0.248727428168097, - 0.24872743, 
2.23521257058934D-9], [0.34, - 0.248798916814192, - 0.24879892, 
4.890100047116874D-9], [0.33, - 0.248868361684516, - 0.24886836, 
5.690601045937882D-10], [0.32, - 0.248935752474627, - 0.24893576, 
6.592908885494353D-9], [0.31, - 0.249001090630872, - 0.2490011, 
1.0028498753644755D-8], [0.3, - 0.249064382564483, - 0.24906437, 
1.1574683961290688D-8], [0.28, - 0.249184753814741, - 0.24918476, 
3.6563438943204574D-9], [0.27, - 0.249241857717456, - 0.24924186, 
1.0033232578088302D-9], [0.26, - 0.249296883296484, - 0.24929689, 
5.412583853336983D-9], [0.25, - 0.249349861801408, - 0.24934986, 
5.357048138421305D-10], [0.24, - 0.249400760569658, - 0.24940076, 
4.13409281807553D-9], [0.23, - 0.24944960805192, - 0.24944961, 
2.658224335094772D-9], [0.22, - 0.249496373894774, - 0.24949637, 
3.340803328422126D-9], [0.21, - 0.249541072218417, - 0.24954107, 
1.819134509695175D-9], [0.2, - 0.24958369326548, - 0.2495837, 
1.2994247816644489D-8], [0.19, - 0.249624252612013, - 0.24962427, 
1.460848364498446D-8], [0.18, - 0.249662756233198, - 0.24966274, 
1.421449855043555D-8], [0.17, - 0.249699146489436, - 0.24969915, 
9.339395368179737D-10], [0.16, - 0.249733480141779, - 0.24973348, 
2.310892421863997D-9], [0.15, - 0.24976575205838, - 0.24976574, 
1.3213508787135453D-8], [0.14, - 0.249795921398569, - 0.24979593, 
7.198881435410698D-9], [0.13, - 0.249824017483973, - 0.24982402, 
1.9767226744349387D-10], [0.12, - 0.249850041120156, - 0.24985005, 
8.494750181053945D-9], [0.11, - 0.249873990866446, - 0.249874, 
4.914498585861793D-9], [0.1, - 0.249895846235021, - 0.24989586, 
9.549395330044064D-9], [0.09, - 0.249915653558079, - 0.24991564, 
9.031597247854961D-9], [0.08, - 0.249933337957966, - 0.24993335, 
9.148013513371467D-9], [0.07, - 0.249948963054439, - 0.24994896, 
4.684716226055485D-10], [0.06, - 0.249962496121112, - 0.24996251, 
1.2557324235995537D-8], [0.05, - 0.249973949535926, - 0.24997395, 
3.2343070444085242D-9], [0.04, - 0.249983329066681, - 0.24998334, 
1.1435104446677613D-8], [0.03, - 0.249990618307009, - 0.24999063, 
8.86260023702512D-9], [0.02, - 0.249995828510352, - 0.24999583, 
8.354862079951175D-10], [0.01, - 0.249998953478215, - 0.24999896, 
3.440501022966558D-9]]

This differed from the expected result:
[]

********************** Problem 170 ***************
Input:
test_table(lambda([z], expintegral_ci(z)), 'ci_2, 230, 3.2D-8)


Result:
[4.0921519728343014D-8, [9.9, - 0.0367639220342721, - 0.036763955, 
3.287338357083058D-8], [9.6, - 0.00770707518648717, - 0.007707036, 
3.908615919812064D-8], [9.4, 0.0132524592393084, 0.0132524185, 
4.075104431677801D-8], [9.1, 0.045069292814333, 0.045069333, 
4.03515509894703D-8], [8.9, 0.0652804220983971, 0.065280385, 
3.678297888498605D-8], [2.9, 0.152895292229318, 0.15289533, 
3.9153433828431616D-8], [2.6, 0.253336647493076, 0.2533366, 
3.908319434753338D-8], [0.72, 0.121878962045631, 0.12187893, 
3.260942443850112D-8], [0.66, 0.0547577656612631, 0.054757733, 
3.276326615564429D-8], [0.6, - 0.0222706741633899, - 0.022270707, 
3.325016428856742D-8], [0.59, - 0.0361896076453615, - 0.03618957, 
3.662237413326608D-8], [0.54, - 0.110990422645755, - 0.11099046, 
3.459101227676342D-8], [0.53, - 0.127070840391468, - 0.1270708, 
4.0921519728343014D-8], [0.52, - 0.143553767666089, - 0.14355373, 
3.384040525578058D-8]]

This differed from the expected result:
[]

********************** Problem 172 ***************
Input:
                       - %gamma - log(z) + expintegral_ei(z)
test_table(lambda([z], -------------------------------------), 'ei_1, 50, 
                                         z
                                                                       5.9D-10)


Result:
[5.8710303063591596D-8, [0.5, 1.140302841043172, 1.1403029, 
5.54564618671094D-8], [0.49, 1.137167435501588, 1.1371675, 
1.826428075446529D-8], [0.48, 1.134046734273706, 1.1340468, 
5.8710303063591596D-8], [0.47, 1.13094067036582, 1.1309407, 
5.3696533885982944D-9], [0.46, 1.127849149421394, 1.1278491, 
4.7401130132129765D-8], [0.45, 1.124772077813334, 1.1247721, 
5.974954753185102D-9], [0.44, 1.121709389956142, 1.1217093, 
4.318490165466926D-8], [0.43, 1.118660993280183, 1.118661, 
5.274795378262809D-8], [0.42, 1.115626795930599, 1.1156268, 
1.6050601736594672D-8], [0.41, 1.112606733699592, 1.1126068, 
3.014012994739801D-8], [0.4, 1.109600715767426, 1.1096007, 
5.2582306286907965D-8], [0.39, 1.106608652014786, 1.1066086, 
2.278810184996871D-8], [0.38, 1.10363047958176, 1.1036304, 
5.6035922790798054D-8], [0.37, 1.100666109362316, 1.1006662, 
5.5989552105728535D-8], [0.36, 1.097715461710051, 1.0977155, 
3.53068561054215D-8], [0.35, 1.094778448764025, 1.0947784, 
3.022307004663105D-8], [0.34, 1.091855009416272, 1.091855, 
3.9717028998964565D-8], [0.33, 1.088945056790766, 1.088945, 
2.5624689481418272D-8], [0.32, 1.086048504679599, 1.0860485, 
2.0831026903422867D-8], [0.31, 1.083165293255687, 1.0831653, 
5.284190862653304D-9], [0.3, 1.080295337275311, 1.0802953, 
1.294974927290582D-8], [0.29, 1.077438552149512, 1.0774386, 
4.0761254593846274D-8], [0.28, 1.074594879304448, 1.0745949, 
2.3995915032770654D-8], [0.27, 1.071764235095078, 1.0717642, 
4.366928818555493D-9], [0.26, 1.068946536518064, 1.0689465, 
5.576702677423384D-8], [0.25, 1.066141726225776, 1.0661417, 
1.6392895929584483D-9], [0.24, 1.063349717988058, 1.0633497, 
5.827859528295676D-9], [0.23, 1.060570446939301, 1.0605705, 
3.15000301398527D-8], [0.22, 1.057803832082966, 1.0578039, 
3.716447016799407D-8], [0.21, 1.055049805325837, 1.0550498, 
2.8294892207014755D-8], [0.2, 1.05230829896601, 1.0523083, 
2.203313553827968D-8], [0.19, 1.049579233518555, 1.0495793, 
2.9214904495589167D-8], [0.18, 1.046862546262107, 1.0468626, 
5.597177987759494D-8], [0.17, 1.044158158702213, 1.0441581, 
5.762036470180476D-8], [0.16, 1.041466004951541, 1.041466, 
7.255617884283083D-9], [0.15, 1.03878601950015, 1.038786, 
3.4157381589849933D-8], [0.14, 1.036118125313915, 1.0361181, 
2.444347013685899D-8], [0.13, 1.033462257792194, 1.0334623, 
2.8203289481609772D-8], [0.12, 1.030818350738206, 1.0308183, 
7.575668981019135D-9], [0.11, 1.02818633444455, 1.0281863, 
1.3186004954590658D-8], [0.1, 1.02556614162192, 1.0255661, 
4.054770119665818D-8], [0.09, 1.022957705412846, 1.0229577, 
2.2803287924588744D-8], [0.08, 1.020360957458272, 1.020361, 
1.0802998939851705D-8], [0.07, 1.017775835624844, 1.0177759, 
5.75865211072113D-8], [0.06, 1.015202271436958, 1.0152023, 
1.2422294970448888D-8], [0.05, 1.012640201652125, 1.0126402, 
3.615610211227249D-8], [0.04, 1.010089559618506, 1.0100895, 
4.297879652170877D-8], [0.03, 1.007550282435743, 1.0075502, 
4.287275445769012D-8], [0.02, 1.005022305710187, 1.0050223, 
1.8341412166833493D-8], [0.01, 1.002505565932813, 1.0025055, 
2.508503471609913D-8]]

This differed from the expected result:
[]

********************** Problem 174 ***************
Input:
test_table(lambda([z], expintegral_ei(z)), 'ei_2, 150, 5.7D-10)


Result:
[3.7293708654573265D-7, [2.0, 4.95423435600189, 4.954234, 
2.3277190930315328D-7], [1.99, 4.917381166272917, 4.9173813, 
1.203481767575454D-7], [1.98, 4.880710860676912, 4.8807106, 
2.588702709971358D-7], [1.97, 4.844221605577938, 4.8442216, 
1.3628475237226212D-8], [1.96, 4.807911576204781, 4.8079114, 
1.8017817016158233D-7], [1.95, 4.771778956463698, 4.7717786, 
3.7293708654573265D-7], [1.94, 4.735821938750024, 4.7358217, 
2.1481203571482865D-7], [1.93, 4.700038298217866, 4.7000384, 
1.3485708549865194D-7], [1.92, 4.664427096792072, 4.6644273, 
1.8363395337672728D-7], [1.91, 4.628986123590729, 4.6289864, 
2.3505184909566879D-7], [1.9, 4.593713603056668, 4.5937138, 
1.5731930869122834D-7], [1.89, 4.55860776716038, 4.558608, 
2.879543652412053D-7], [1.88, 4.523666855203292, 4.523667, 
3.4698039996783336D-9], [1.87, 4.488889113619341, 4.488889, 
1.0375736803069913D-7], [1.86, 4.454272795774792, 4.4542727, 
4.873499737101383D-8], [1.85, 4.41981616176619, 4.419816, 
1.446153117257154D-7], [1.84, 4.385517478216351, 4.3855176, 
1.1898213525540768D-7], [1.83, 4.351375018068293, 4.351375, 
8.492853353914143D-8], [1.82, 4.317387060377013, 4.317387, 
4.365741101963749D-8], [1.81, 4.283551487655846, 4.2835517, 
2.0530680000518942D-7], [1.8, 4.249867397227006, 4.2498674, 
4.204301351506956D-8], [1.79, 4.216332680954584, 4.216333, 
2.314904845590604D-7], [1.78, 4.182945640212261, 4.1829457, 
8.808974083507337D-8], [1.77, 4.149704581408296, 4.1497045, 
1.2507894986413248D-7], [1.76, 4.116607815761954, 4.1166077, 
1.4974632911446406D-7], [1.75, 4.083653659076957, 4.0836535, 
2.0906474951232212D-7], [1.74, 4.05084043151181, 4.0508404, 
5.370419220440681D-8], [1.73, 4.018166457346847, 4.0181665, 
8.470637524737867D-8], [1.72, 3.98563006474786, 3.98563, 
2.9347469343576904D-8], [1.71, 3.953229585526178, 3.9532294, 
1.5818853116300602D-7], [1.7, 3.920963354894996, 3.9209633, 
6.754148040855057D-8], [1.69, 3.888829711221824, 3.8888295, 
2.41541037393489D-7], [1.68, 3.856826615048226, 3.8568268, 
1.6717833650758962D-7], [1.67, 3.824953173279707, 3.8249533, 
1.4436250506122406D-7], [1.66, 3.793207349940321, 3.7932074, 
5.705735928174249D-8], [1.65, 3.761587493455304, 3.7615876, 
1.2632619039720794D-7], [1.64, 3.730091954101777, 3.730092, 
9.454324301216843D-8], [1.63, 3.698719083733987, 3.698719, 
5.9075783376272284D-8], [1.62, 3.667467235503287, 3.667467, 
1.1819371659171907D-7], [1.61, 3.636334763572638, 3.6363347, 
1.0590357035766829D-7], [1.6, 3.605320022825404, 3.60532, 
4.601876302245955D-8], [1.59, 3.574421368568179, 3.5744212, 
2.0119452193156917D-7], [1.58, 3.543637156227401, 3.543637, 
1.1895017903995608D-7], [1.57, 3.512965741039475, 3.5129657, 
6.18707733934798D-8], [1.56, 3.482405114083044, 3.4824052, 
7.161641901731741D-8], [1.55, 3.451954357855243, 3.4519546, 
2.453399474688922D-7], [1.54, 3.42161146012766, 3.4216115, 
8.734243328589741D-8], [1.53, 3.391374772138005, 3.3913748, 
5.429326943584556D-8], [1.52, 3.36124264327703, 3.3612428, 
1.2787165148964164D-7], [1.51, 3.331213420733392, 3.3312135, 
5.354028953519219D-8], [1.5, 3.301285449129798, 3.3012855, 
5.616500198257768D-8], [1.49, 3.271457070150023, 3.271457, 
1.1328661964071784D-7], [1.48, 3.241726622156432, 3.2417266, 
1.473016464359489D-8], [1.47, 3.212092439797571, 3.2120924, 
4.020040300645178D-8], [1.46, 3.182552853605388, 3.1825528, 
3.9121744954684345D-8], [1.45, 3.153106189581635, 3.153106, 
2.1538424777034493D-7], [1.44, 3.123750768772978, 3.1237507, 
8.21274697138108D-8], [1.43, 3.094484558484798, 3.0944848, 
2.475759930398169D-7], [1.42, 3.065306566267479, 3.0653067, 
9.724570482205763D-8], [1.41, 3.036214746225189, 3.0362148, 
8.226602199457034D-8], [1.4, 3.007207395091002, 3.0072074, 
1.4447620877433565D-9], [1.39, 2.978282802330397, 2.978283, 
1.261363995475051D-7], [1.38, 2.949439249637091, 2.9494393, 
3.754857802462652D-8], [1.37, 2.920675010413484, 2.920675, 
2.8877897850776435D-8], [1.36, 2.891988349235009, 2.8919883, 
7.179970618054199D-8], [1.35, 2.863377521297661, 2.8633776, 
4.9808296154196796D-8], [1.34, 2.834840771847904, 2.8348408, 
2.688229194802716D-9], [1.33, 2.806376335594146, 2.8063762, 
1.1679837008671257D-7], [1.32, 2.777982436098926, 2.7779822, 
2.0114409249316623D-7], [1.31, 2.749656947891076, 2.7496572, 
2.0619217577788618D-7], [1.3, 2.721398745643024, 2.7213988, 
8.47707939399811D-8], [1.29, 2.69320567755704, 2.6932058, 
1.5587801804883838D-7], [1.28, 2.665075916114946, 2.665076, 
1.0126481431171896D-7], [1.27, 2.637007619290508, 2.6370077, 
9.402736278474322D-8], [1.26, 2.608998929804918, 2.608999, 
8.409583873714155D-8], [1.25, 2.581047974355475, 2.581048, 
3.742430987330181D-8], [1.24, 2.553152862816157, 2.5531528, 
6.320983381158385D-8], [1.23, 2.525311687408673, 2.5253117, 
2.104164487093385D-8], [1.22, 2.497522521842527, 2.4975224, 
1.677165504254674D-7], [1.21, 2.469783420422556, 2.4697833, 
1.1430073021401199D-7], [1.2, 2.442092417122244, 2.4420922, 
2.368701692567754D-7], [1.19, 2.414447524621127, 2.4144473, 
2.1703445707288438D-7], [1.18, 2.386846404531805, 2.3868465, 
1.3782659324945712D-7], [1.17, 2.359287681939388, 2.3592877, 
5.6860661068469653D-8], [1.16, 2.33176897019157, 2.331769, 
1.9371417803171198D-8], [1.15, 2.304288186379815, 2.3042881, 
3.749980992395763D-8], [1.14, 2.276843220880777, 2.2768433, 
8.852168909001534D-8], [1.13, 2.249431936135132, 2.2494318, 
8.760913061678366D-8], [1.12, 2.22205216537491, 2.222052, 
6.805435281975747D-8], [1.11, 2.194701711296593, 2.1947017, 
3.9696251175058705D-8], [1.1, 2.167378344676949, 2.1673782, 
1.574973831353077D-7], [1.09, 2.140079802928458, 2.1400797, 
6.621886328161963D-8], [1.08, 2.112803788590984, 2.1128037, 
9.100492404101601D-8], [1.07, 2.085547967756059, 2.085548, 
4.371431083782795D-8], [1.06, 2.058309643814105, 2.0583098, 
1.496581849558254D-7], [1.05, 2.031087054324975, 2.0310872, 
1.057854981389994D-7], [1.04, 2.003877421043899, 2.0038776, 
2.1872660926902654D-7], [1.03, 1.976678247024941, 1.9766784, 
1.2440450203321518D-7], [1.02, 1.949486989841722, 1.9494871, 
1.002690570572895D-7], [1.01, 1.922301059517643, 1.922301, 
5.5167881374273975D-9], [1.0, 1.895117816355937, 1.8951178, 
5.6651346724834184D-8], [0.99, 1.867934568663446, 1.8679346, 
1.595416909694336D-8], [0.98, 1.840748570361644, 1.8407485, 
2.1853953313666352D-8], [0.97, 1.813557018477923, 1.8135569, 
1.0891676582858167D-7], [0.96, 1.786356888354229, 1.7863569, 
3.761012612457648D-8], [0.95, 1.75914557942131, 1.7591456, 
3.806373616299652D-8], [0.94, 1.731919939562302, 1.73192, 
6.432868970840389D-8], [0.93, 1.704676910472791, 1.7046769, 
4.3941418503834484D-8], [0.92, 1.677413362333055, 1.6774133, 
1.7949814967721522D-8], [0.91, 1.650126090403156, 1.650126, 
1.1002595834419537D-7], [0.9, 1.622811648539636, 1.6228117, 
2.653208008851493D-8], [0.89, 1.595466996788589, 1.5954671, 
9.38181003995453D-8], [0.88, 1.568088520580831, 1.5680885, 
1.0913309589355435D-8], [0.87, 1.54067267754668, 1.5406727, 
1.7672717733674403D-8], [0.86, 1.513215830327429, 1.5132158, 
5.006925052342126D-8], [0.85, 1.48571424185058, 1.4857142, 
4.4691766731830285D-8], [0.84, 1.458163905963761, 1.458164, 
7.070555052557381D-8], [0.83, 1.430561199269614, 1.4305613, 
1.0482279333423605D-7], [0.82, 1.402901890272749, 1.4029019, 
2.379072494562706D-9], [0.81, 1.375181789952775, 1.3751818, 
4.213790205653822D-9], [0.8, 1.34739658137547, 1.3473965, 
8.84174014004202D-8], [0.79, 1.31954181297227, 1.3195418, 
1.029215601633382D-9], [0.78, 1.291612724694672, 1.2916129, 
1.3884597738211824D-7], [0.77, 1.263604906724996, 1.263605, 
9.18635656432798D-8], [0.76, 1.235513292603643, 1.2355133, 
3.690227723396333D-8], [0.75, 1.207332816001222, 1.2073328, 
3.350134147872552D-8], [0.74, 1.179058235266696, 1.1790582, 
4.110623463837726D-8], [0.73, 1.150684123595872, 1.1506841, 
5.324997998101821D-9], [0.72, 1.122204858524702, 1.1222048, 
7.794608913869183D-8], [0.71, 1.093614439936745, 1.0936145, 
1.9101036086155432D-8], [0.7, 1.064907160330286, 1.0649072, 
3.2853612497163454D-8], [0.69, 1.036076569508875, 1.0360765, 
2.379354313575277D-8], [0.68, 1.007116141689958, 1.0071161, 
6.235951399702344D-8], [0.67, 0.978019090574383, 0.97801906, 
3.187000663373851D-8], [0.66, 0.948778353376467, 0.9487783, 
8.170135756824237D-8], [0.65, 0.919386397983824, 0.91938645, 
4.849215895497139D-8], [0.64, 0.889835906088535, 0.88983595, 
4.762392835644391D-8], [0.63, 0.860118702152098, 0.8601187, 
1.4999235187218574D-8], [0.62, 0.830226431643056, 0.8302264, 
1.028685447934663D-8], [0.61, 0.80015036299002, 0.80015033, 
2.815496780161908D-8], [0.6, 0.769881362341855, 0.7698813, 
5.4263088911099544D-8], [0.59, 0.739409683962088, 0.73940974, 
6.077744407750885D-8], [0.58, 0.708725668228369, 0.7087257, 
2.2613305450391863D-8], [0.57, 0.677818619702549, 0.67781866, 
3.626516364985122D-8], [0.56, 0.646677497227749, 0.6466775, 
3.178676988291329D-9], [0.55, 0.615290694629434, 0.61529064, 
5.2844765896509216D-8], [0.54, 0.583645998917765, 0.58364594, 
5.909080003085876D-8], [0.53, 0.551730353521638, 0.55173045, 
1.0044640996742515D-7], [0.52, 0.51953057075929, 0.51953065, 
8.319426192393564D-8], [0.51, 0.487032135664453, 0.48703218, 
3.9399633833259173D-8]]

This differed from the expected result:
[]

********************** Problem 176 ***************
Input:
                           - z
test_table(lambda([z], z %e    expintegral_ei(z)), 'ei_3, 80, 8.95D-10)


Result:
[7.11937788722139D-8, [10, 1.131470204734107, 1.1314702, 
1.3344489957489714D-9], [9.9, 1.133328753064262, 1.1333288, 
4.2368782926516246D-8], [9.8, 1.135241126389987, 1.1352412, 
2.4466030756897794D-8], [9.7, 1.137209526860258, 1.1372095, 
7.784822786405243D-9], [9.6, 1.139236177521317, 1.1392362, 
3.425541628132578D-8], [9.5, 1.141323475952624, 1.1413234, 
2.8725145595487334D-8], [9.3, 1.145689884714774, 1.1456898, 
3.962962979997542D-8], [9.2, 1.147974254824841, 1.1479743, 
2.124035392014889D-9], [9.1, 1.150329714998787, 1.1503297, 
5.945747671987078D-9], [9.0, 1.152759208708925, 1.1527592, 
1.4334840203744648D-8], [8.9, 1.155265728989902, 1.1552657, 
4.009372234214936D-8], [8.8, 1.157852384875808, 1.1578524, 
2.6394333829671268D-8], [8.7, 1.160522480720962, 1.1605225, 
1.9783461757683085D-8], [8.6, 1.163279343110298, 1.1632793, 
4.814264653596467D-8], [8.5, 1.166126525811749, 1.1661265, 
3.617246635556626D-8], [8.4, 1.169067628292738, 1.1690676, 
7.061658813256599D-9], [8.3, 1.172106370361888, 1.1721064, 
1.4869130149364196D-8], [8.2, 1.175246682122572, 1.1752467, 
3.3423082301808904D-8], [8.1, 1.178492496710012, 1.1784925, 
4.9371530641550976D-8], [8.0, 1.181847986987208, 1.1818479, 
5.7032679023905075D-8], [7.9, 1.18531733021159, 1.1853173, 
5.230326438621091D-8], [7.8, 1.188904874329788, 1.1889049, 
7.147568314991304D-9], [7.7, 1.192615069839843, 1.192615, 
3.764379852277955D-8], [7.6, 1.196452404831645, 1.1964524, 
2.5604960818270683D-8], [7.5, 1.20042149959963, 1.2004215, 
4.707735268283386D-8], [7.4, 1.204527022537445, 1.204527, 
2.083037964339951D-9], [7.3, 1.208773690819054, 1.2087737, 
4.1366309488921615D-8], [7.2, 1.213166271863775, 1.2131662, 
3.4986333163899985D-8], [7.1, 1.217709475511823, 1.2177094, 
5.340031172806903D-8], [7.0, 1.222408052360531, 1.222408, 
3.8986240902261216D-9], [6.9, 1.227266678970671, 1.2272667, 
9.697294744981377D-9], [6.8, 1.232289941762835, 1.2322899, 
3.144636750995744D-8], [6.7, 1.23748231994129, 1.2374823, 
1.05998596566792D-8], [6.6, 1.242848037217774, 1.242848, 
1.4556265082177333D-9], [6.5, 1.248391155001701, 1.2483912, 
3.573478624119275D-9], [6.4, 1.254115411188984, 1.2541155, 
5.111417800129914D-8], [6.3, 1.260024172989148, 1.2600242, 
1.6959887494394366D-8], [6.2, 1.266120385472969, 1.2661203, 
7.087488573809253D-8], [6.1, 1.272406362972935, 1.2724063, 
2.332754944767146D-8], [6.0, 1.278883860489562, 1.2788838, 
4.567785505393829D-8], [5.9, 1.28555384257821, 1.2855538, 
2.9597558182103967D-8], [5.8, 1.292416382167732, 1.2924165, 
7.11937788722139D-8], [5.7, 1.299470549389905, 1.2994705, 
5.528515867325723D-9], [5.6, 1.306714113875272, 1.306714, 
5.595290830662236D-8], [5.5, 1.314143565742119, 1.3141435, 
2.7267081925685943D-8], [5.4, 1.321753780748053, 1.3217537, 
4.043738410786091D-8], [5.3, 1.329537830030309, 1.3295379, 
3.846944673924213D-8], [5.2, 1.337486770714324, 1.3374867, 
2.6787321694143884D-8], [5.1, 1.345589219478911, 1.3455892, 
5.855972196044945D-8], [5.0, 1.353831277455286, 1.3538313, 
1.3743444604585875D-8], [4.9, 1.362196045815311, 1.3621961, 
4.202190795332683D-8], [4.8, 1.370663296387288, 1.3706633, 
1.1131855881529873D-8], [4.7, 1.379209109745605, 1.379209, 
6.815014552685739D-8], [4.6, 1.387805270507905, 1.3878052, 
4.7042939099739556D-8], [4.5, 1.396419029629746, 1.396419, 
1.8679580326974587D-8], [4.4, 1.40501241552323, 1.4050124, 
4.6367346628883865D-8], [4.3, 1.413541702269772, 1.4135417, 
2.7655819856420294D-8], [4.2, 1.421956828352642, 1.4219568, 
5.078001041880498D-8], [4.1, 1.430200564740897, 1.4302006, 
1.2041329711109938D-8], [4.0, 1.438208031454483, 1.438208, 
4.7483840637241315D-8], [3.9, 1.445905757514778, 1.4459058, 
4.711931578249562D-8], [3.8, 1.45321090469606, 1.453211, 
4.520170615585073D-8], [3.7, 1.460030310408191, 1.4600303, 
6.898327242765845D-9], [3.6, 1.466259664703816, 1.4662597, 
5.32374682116199D-8], [3.5, 1.471782388590955, 1.4717824, 
5.731663810237819D-8], [3.4, 1.476468702329417, 1.4764687, 
2.0040292980638696D-8], [3.3, 1.480174493205792, 1.4801745, 
4.826759703036032D-8], [3.2, 1.482740189754691, 1.4827402, 
2.595159065421626D-8], [3.1, 1.483989692303967, 1.4839897, 
2.3272205273983104D-8], [3.0, 1.483729204045923, 1.4837292, 
3.923258007354491D-8], [2.9, 1.481746164357827, 1.4817462, 
3.238899881630175D-8], [2.8, 1.477808184374438, 1.4778082, 
5.2701368158381D-8], [2.7, 1.471662156151138, 1.4716622, 
7.583298433644359D-9], [2.6, 1.463033388072492, 1.4630334, 
4.965638988885246D-8], [2.5, 1.451625159305666, 1.4516251, 
5.058679430902657D-8], [2.4, 1.437118330160175, 1.4371183, 
3.830531647430746D-8], [2.3, 1.419171525093862, 1.4191716, 
4.6637705475305324D-8], [2.2, 1.397422003048055, 1.397422, 
4.6985738411109423D-8], [2.1, 1.371486774813859, 1.3714868, 
8.213790092526096D-9]]

This differed from the expected result:
[]

********************** Problem 178 ***************
Input:
                       %gamma + log(z) + expintegral_e1(z)
test_table(lambda([z], -----------------------------------), 'e1_1, 50, 
                                        z
                                                                      1.65D-10)


Result:
[3.01545161063288D-8, [0.5, 0.887684158235497, 0.88768417, 
8.195930378818161D-9], [0.49, 0.889703290055263, 0.8897033, 
1.628206947046351D-8], [0.48, 0.89173090683872, 0.8917309, 
2.259556985961808D-9], [0.47, 0.893767042512985, 0.89376706, 
1.633634982844967D-8], [0.46, 0.895811749408228, 0.89581174, 
1.2824518225151849D-8], [0.45, 0.897865080246312, 0.89786506, 
2.3254735248556813D-8], [0.44, 0.899927069669654, 0.8999271, 
1.0007928152866441D-8], [0.43, 0.901997770959346, 0.90199775, 
2.5922267221645257D-8], [0.42, 0.904077237795837, 0.90407723, 
5.9118341333430635D-9], [0.41, 0.906165505552262, 0.9061655, 
2.4938553888631532D-8], [0.4, 0.908262628479968, 0.9082626, 
1.804448235276368D-8], [0.39, 0.910368661237469, 0.9103687, 
1.971651086840609D-8], [0.38, 0.912483639944396, 0.91248363, 
7.3798509525602185D-9], [0.37, 0.914607619842087, 0.91460764, 
2.4239028229011694D-8], [0.36, 0.916740650216573, 0.91674066, 
5.6824743799310795D-9], [0.35, 0.918882787061507, 0.9188828, 
1.6612389241998926D-10], [0.34, 0.921034067516993, 0.9210341, 
3.01545161063288D-8], [0.33, 0.923194548175822, 0.9231945, 
2.0549783985579495D-8], [0.32, 0.925364286056854, 0.92536426, 
3.0151703023229004D-8], [0.31, 0.927543319084884, 0.92754334, 
2.3028611129127796D-8], [0.3, 0.929731704890454, 0.9297317, 
2.1755969137338127D-8], [0.29, 0.931929501538576, 0.9319295, 
2.7174649863681566D-8], [0.28, 0.934136747755716, 0.93413675, 
5.58188051336117D-10], [0.27, 0.93635350223139, 0.9363535, 
2.4263548947800473D-9], [0.26, 0.938579824098156, 0.9385798, 
2.6353404569690042D-8], [0.25, 0.940815752901521, 0.94081575, 
6.117310658027009D-9], [0.23, 0.945316667482596, 0.9453167, 
4.842538370297689D-9], [0.22, 0.947581760600491, 0.94758177, 
7.435397297861357D-9], [0.21, 0.949856681931723, 0.9498567, 
1.6581307771268428D-8], [0.2, 0.952141482574226, 0.95214146, 
1.881766431566234D-8], [0.19, 0.954436224193044, 0.95443624, 
1.8387369626893246D-8], [0.18, 0.956740955153358, 0.956741, 
2.0226585628613236D-8], [0.17, 0.959055737878673, 0.9590557, 
1.6118876677850835D-8], [0.16, 0.961380624850241, 0.9613806, 
2.3920980307678974D-8], [0.15, 0.963715668844682, 0.9637157, 
3.6482985521502087D-9], [0.14, 0.966060933442699, 0.96606094, 
3.008259530368207D-9], [0.13, 0.968416472154704, 0.96841645, 
1.9746867252479205D-8], [0.12, 0.970782340559507, 0.97078234, 
9.866006900338675D-10], [0.11, 0.973158598119088, 0.9731586, 
1.7292123288825678D-10], [0.1, 0.975545302912348, 0.9755453, 
1.5780084794414506D-8], [0.09, 0.977942513388852, 0.9779425, 
1.2951633099334003D-8], [0.08, 0.980350290169223, 0.9803503, 
2.540160781716594D-8], [0.07, 0.982768688864253, 0.9827687, 
2.5563695493779903D-8], [0.06, 0.985197771747799, 0.9851978, 
1.0768680613892911D-8], [0.05, 0.987637596968141, 0.9876376, 
1.7527070683698298D-8], [0.04, 0.990088226684883, 0.9900882, 
2.273872756752837D-9], [0.03, 0.992549720259819, 0.9925497, 
2.8335186419425895D-9], [0.02, 0.995022139265618, 0.9950221, 
2.1174035191862117D-8], [0.01, 0.997505545211263, 0.99750555, 
4.048872348505483D-10]]

This differed from the expected result:
[]

********************** Problem 180 ***************
Input:
test_table(lambda([z], expintegral_e1(z)), 'e1_2, 150, 5.35D-10)


Result:
[4.3975793118100626D-8, [1.99, 0.0495822898716462, 0.04958229, 
1.5228259001021094D-9], [1.97, 0.0509769858440833, 0.050976988, 
2.0840687925405277D-9], [1.96, 0.0516902541736034, 0.051690258, 
3.912124339755518D-9], [1.95, 0.052414376088944, 0.05241438, 
3.924998756565934D-9], [1.94, 0.0531495359810036, 0.05314954, 
3.996308478582122D-9], [1.93, 0.0538959308000537, 0.053895928, 
2.834412711483214D-9], [1.92, 0.054653734413948, 0.05465373, 
4.170503602185516D-9], [1.91, 0.05542315107476, 0.055423148, 
3.0983615395552278D-9], [1.9, 0.0562043800513739, 0.05620438, 
1.4464850289774844D-9], [1.89, 0.0569976245487987, 0.056997623, 
1.2542067939769197D-9], [1.88, 0.0578030917995926, 0.05780309, 
1.1378284911489622D-9], [1.86, 0.0594515441954895, 0.059451547, 
2.3245051924969395D-9], [1.85, 0.060294964801981, 0.060294967, 
2.3427467465975127D-9], [1.84, 0.061151479285836, 0.061151482, 
2.8790238110198985D-9], [1.83, 0.062021316479721, 0.06202132, 
2.3433781581871926D-9], [1.82, 0.0629047098482253, 0.062904716, 
5.689799645325344D-9], [1.81, 0.0638019083772418, 0.0638019, 
8.824896521875125D-9], [1.8, 0.064713133742794, 0.06471313, 
5.831703134284716D-9], [1.79, 0.0656386445959293, 0.06563864, 
5.56308853150167D-9], [1.77, 0.0675335405169341, 0.06753354, 
2.771458340600219D-9], [1.76, 0.0685034476360717, 0.06850345, 
7.590690298542313D-10], [1.75, 0.0694886846046386, 0.06948868, 
2.7518210765631324D-9], [1.73, 0.0715062530072502, 0.071506254, 
1.367730706469672D-9], [1.72, 0.0725391514261332, 0.07253915, 
7.112589683888615D-10], [1.71, 0.0735885139554713, 0.07358852, 
6.332996072000441D-9], [1.7, 0.0746546392771182, 0.074654646, 
6.940704802560482D-9], [1.69, 0.0757378324264737, 0.07573784, 
9.000852507767831D-9], [1.68, 0.0768384181788066, 0.07683841, 
6.788025197490555D-9], [1.67, 0.0779566885298711, 0.077956684, 
4.5961361938573475D-9], [1.66, 0.0790929815810433, 0.07909298, 
2.1498910013351136D-9], [1.65, 0.0802476294483895, 0.080247626, 
3.739809448233267D-9], [1.64, 0.0814209714607681, 0.08142097, 
1.4825378980010129D-9], [1.63, 0.0826133543479771, 0.08261336, 
2.0634799147156713D-9], [1.62, 0.0838251324348162, 0.083825134, 
1.306085795071965D-9], [1.61, 0.0850566678412688, 0.08505667, 
2.168821067183302D-9], [1.59, 0.0875804993147387, 0.0875805, 
2.7184949707992345D-9], [1.58, 0.088873560489797, 0.088873565, 
4.7071939263121365D-9], [1.57, 0.0901879096476475, 0.090187915, 
5.0218661867829084D-9], [1.56, 0.0915239671759822, 0.09152396, 
6.943247560231569D-9], [1.55, 0.0928821146937398, 0.09288211, 
3.0251531002445375D-9], [1.54, 0.0942627908550812, 0.094262786, 
4.645497958533085D-9], [1.53, 0.095666428164595, 0.09566642, 
4.72461544887004D-9], [1.52, 0.0970934690410904, 0.09709346, 
6.097059607190758D-9], [1.51, 0.0985443660935913, 0.09854437, 
5.641425798730282D-10], [1.5, 0.100019582406632, 0.10001958, 
7.907071247759134D-10], [1.48, 0.103044879310055, 0.10304488, 
3.1066702960158565D-9], [1.47, 0.104595941152795, 0.104595944, 
3.132598055954894D-9], [1.46, 0.106173285402842, 0.10617329, 
6.399564503323241D-9], [1.45, 0.107777432155057, 0.10777744, 
6.902770022243487D-9], [1.44, 0.109408913909508, 0.10940892, 
8.583950258933548D-9], [1.43, 0.111068295883065, 0.111068286, 
9.881382281862194D-9], [1.42, 0.112756096928569, 0.11275609, 
8.552523342308938D-9], [1.41, 0.114472908600134, 0.1144729, 
5.2888819018770405D-9], [1.4, 0.116219316770879, 0.11621931, 
4.818288310004526D-9], [1.39, 0.117995921663739, 0.11799592, 
3.86665047202861D-9], [1.38, 0.119803338283628, 0.11980334, 
9.593075084302072D-10], [1.37, 0.121642196865489, 0.121642195, 
2.1771691949279415D-9], [1.36, 0.123513143338955, 0.12351315, 
3.8959621362355534D-9], [1.35, 0.125416839810317, 0.12541685, 
5.272919378906948D-9], [1.34, 0.127353965062625, 0.12735397, 
1.1734897220616602D-9], [1.33, 0.129325215074694, 0.12932523, 
1.0874593531218224D-8], [1.32, 0.131331303559897, 0.13133131, 
6.116273348899526D-9], [1.31, 0.133372987079128, 0.13337298, 
9.703143510897405D-9], [1.3, 0.135450967845535, 0.13545096, 
8.63990801125425D-9], [1.29, 0.137566040345858, 0.13756603, 
1.0320375581907015D-8], [1.28, 0.139718995048213, 0.139719, 
5.499606048342542D-10], [1.27, 0.141910643179409, 0.14191064, 
7.939262025580263D-10], [1.26, 0.144141817403217, 0.14414181, 
9.251017923928018D-9], [1.25, 0.14641337252591, 0.14641337, 
1.5589983748398595D-9], [1.24, 0.148726186230366, 0.1487262, 
8.866603951052099D-9], [1.22, 0.153479219114744, 0.15347923, 
1.4269388393106652D-8], [1.21, 0.155921315078474, 0.15592133, 
1.000907323689404D-8], [1.2, 0.15840842488308, 0.15840843, 
8.315848731843545D-9], [1.19, 0.160941552707382, 0.16094157, 
1.8289856601461096D-8], [1.18, 0.163521761737628, 0.16352175, 
9.97619167830699D-9], [1.17, 0.166150051554138, 0.16615003, 
1.808016925064493D-8], [1.16, 0.168827543681243, 0.16882753, 
9.959318869601219D-9], [1.15, 0.171555360194527, 0.17155536, 
5.003296499328513D-9], [1.14, 0.174334655307638, 0.17433465, 
1.0036337011465335D-8], [1.13, 0.1771666165327, 0.17716661, 
5.576507561277921D-9], [1.12, 0.180052465892587, 0.18005247, 
8.248533467369867D-9], [1.11, 0.18299346118785, 0.18299347, 
1.0434617142562885D-8], [1.1, 0.185990897321253, 0.1859909, 
2.4800013431747203D-9], [1.09, 0.1890461076831, 0.18904611, 
7.0000512331080955D-9], [1.08, 0.192160465600705, 0.19216047, 
6.673121666356252D-9], [1.07, 0.195335385855601, 0.1953354, 
1.7229154242182076D-8], [1.06, 0.198572365235255, 0.19857235, 
1.2706683150121023D-8], [1.05, 0.201872829111943, 0.20187281, 
1.8390545614144216D-8], [1.04, 0.205238364684497, 0.20523836, 
7.498179188658582D-9], [1.03, 0.208670569217628, 0.20867056, 
1.267237045854408D-8], [1.02, 0.212171090175192, 0.21217108, 
1.2446920022446406D-8], [1.01, 0.215741627233562, 0.21574162, 
7.765826287586819D-9], [1.0, 0.21938393439552, 0.21938394, 
5.705149574986024D-9], [0.99, 0.223099822210752, 0.22309983, 
5.555666954260019D-9], [0.97, 0.230759878855807, 0.23075989, 
1.0031598635107386D-8], [0.96, 0.234707996902578, 0.23470798, 
1.5554540266915495D-8], [0.95, 0.238737528506695, 0.23873752, 
4.950939325176762D-9], [0.94, 0.242850627766837, 0.24285063, 
3.708611945318907D-9], [0.93, 0.247049497994834, 0.2470495, 
2.4170221379904433D-9], [0.92, 0.25133641818721, 0.25133643, 
7.35562194487116D-9], [0.91, 0.255713746376861, 0.25571376, 
1.4475953047377033D-8], [0.9, 0.260183950096418, 0.26018393, 
1.969938395740556D-8], [0.89, 0.264749502985638, 0.2647495, 
5.810421643825947D-9], [0.88, 0.269413048581865, 0.26941305, 
5.407545744517961D-9], [0.87, 0.274177298486146, 0.2741773, 
1.4364805955846549D-8], [0.86, 0.279045063143023, 0.27904508, 
1.2035123175824225D-8], [0.85, 0.284019256513796, 0.28401926, 
5.084791254716947D-9], [0.84, 0.28910293166011, 0.2891029, 
1.9710952425811D-8], [0.83, 0.294299164138768, 0.29429916, 
8.665058504053746D-9], [0.82, 0.299611239345012, 0.29961124, 
1.2803696436414214D-9], [0.81, 0.30504253789044, 0.30504254, 
2.823835276721809D-9], [0.8, 0.31059657185002, 0.3105966, 
1.3423722966532381D-8], [0.79, 0.316276991432701, 0.316277, 
5.895103627473475D-9], [0.78, 0.322087627107156, 0.32208762, 
1.137877725376768D-8], [0.77, 0.328032357849251, 0.32803234, 
1.3269554732797673D-8], [0.76, 0.334115326959189, 0.33411533, 
5.546171299997127D-10], [0.75, 0.34034081291123, 0.34034082, 
1.0023874397191435D-8], [0.74, 0.346713272755093, 0.34671327, 
1.9622376501438055D-9], [0.73, 0.353237351899018, 0.35323736, 
8.816847973935893D-9], [0.72, 0.359917894568238, 0.3599179, 
1.4338698173244069D-8], [0.71, 0.366759996269185, 0.36676, 
1.058383602980939D-8], [0.7, 0.373768851690307, 0.37376884, 
1.5430464628263252D-8], [0.69, 0.380950012194368, 0.38095, 
8.33198665617374D-9], [0.68, 0.388309237475992, 0.38830924, 
2.8651948036362285D-9], [0.67, 0.395852550665782, 0.39585257, 
1.5099599237622385D-8], [0.66, 0.40358625425334, 0.40358627, 
1.4171648188288088D-8], [0.65, 0.411516995098005, 0.41151696, 
3.0662427707994766D-8], [0.64, 0.419651592649238, 0.41965157, 
2.4713293966804883D-8], [0.63, 0.427997342433123, 0.42799735, 
8.259626427253863D-9], [0.62, 0.436561849709903, 0.43656185, 
2.9836548787187667D-9], [0.61, 0.445353099420695, 0.44535312, 
2.114471925329653D-8], [0.6, 0.454379481381588, 0.4543795, 
1.7576999966628648D-8], [0.59, 0.463649873596889, 0.46364984, 
3.443406260128512D-8], [0.58, 0.47317344944201, 0.47317344, 
9.939293443839148D-9], [0.57, 0.482960041341522, 0.48296005, 
3.996155129026846D-9], [0.56, 0.493019956344585, 0.49301997, 
1.1926670651085658D-8], [0.55, 0.503364068887344, 0.5033641, 
1.7263779517051603D-8], [0.54, 0.514003862545915, 0.5140039, 
1.0325484245399252D-8], [0.53, 0.524951541888684, 0.5249515, 
2.4306744506041866D-8], [0.52, 0.53621981965252, 0.5362198, 
4.3975793118100626D-8], [0.51, 0.547822363009794, 0.54782236, 
6.785733641656577D-9]]

This differed from the expected result:
[]

********************** Problem 182 ***************
Input:
                           z
test_table(lambda([z], z %e  expintegral_e1(z)), 'e1_3, 80, 2.5D-8)


Result:
[3.4419629812987296D-8, [8.8, 0.906000463972584, 0.90600044, 
2.86202584964812D-8], [8.4, 0.90227469340172, 0.9022747, 
3.4419629812987296D-8], [6.7, 0.882404952903928, 0.882405, 
3.013974314569623D-8], [6.5, 0.879512879957103, 0.8795129, 
2.6117420892646237D-8], [5.8, 0.868138043933266, 0.868138, 
2.8663032503040142D-8], [5.6, 0.864473433440933, 0.86447346, 
2.8663864504174796D-8], [5.3, 0.858568279016425, 0.85856825, 
2.788346020743404D-8], [4.6, 0.842495535131151, 0.84249556, 
2.551490618785124D-8], [4.4, 0.837188209513243, 0.8371882, 
2.5251921109692432D-8], [4.2, 0.831498596494583, 0.8314986, 
2.6399703756396775D-8], [3.4, 0.80391613046248, 0.80391616, 
2.582948166462984D-8], [3.0, 0.786251220765954, 0.78625125, 
2.6163214372765253D-8], [2.6, 0.764882716546596, 0.76488274, 
2.681201627385832D-8], [2.4, 0.752404836541559, 0.7524048, 
2.7543450853428908D-8]]

This differed from the expected result:
[]

165/185 tests passed

The following 20 problems failed: (103 104 105 106 107 108 159 160 161 162 164 166 168 170 172 174 176 178 180 182)
Running tests in rtest_signum: 44/44 tests passed
Running tests in rtest_lambert_w: 
********************** Problem 8 ***************
Input:
closeto(lambert_w(- 0.3671875), - 0.9398864, 5.0D-15)


Result:
6.889563253231756D-9

This differed from the expected result:
true

********************** Problem 9 ***************
Input:
closeto(lambert_w(- 0.25), - 0.35740295, 1.0D-16)


Result:
5.656105084295149D-9

This differed from the expected result:
true

********************** Problem 11 ***************
Input:
closeto(lambert_w(0.5), 0.3517337, 1.0D-16)


Result:
3.09292147449014D-9

This differed from the expected result:
true

********************** Problem 12 ***************
Input:
closeto(lambert_w(2.0), 0.8526055, 2.0D-16)


Result:
1.9665199135765477D-8

This differed from the expected result:
true

********************** Problem 13 ***************
Input:
closeto(lambert_w(16.0), 2.0531926, 1.0D-16)


Result:
1.0195361532794323D-7

This differed from the expected result:
true

********************** Problem 14 ***************
Input:
closeto(lambert_w(128.0), 3.5773952, 1.0D-16)


Result:
9.782228316268515D-8

This differed from the expected result:
true

********************** Problem 15 ***************
Input:
closeto(lambert_w(2048.0), 5.856984, 1.0D-16)


Result:
2.451072411702171D-8

This differed from the expected result:
true

********************** Problem 17 ***************
Input:
closeto(lambert_w(2 %i + 3.0), 0.31512994 %i + 1.126054, 1.0D-16)


Result:
2.6024253057845D-8

This differed from the expected result:
true

27/35 tests passed

The following 8 problems failed: (8 9 11 12 13 14 15 17)
Running tests in rtest_elliptic: 78/78 tests passed
Running tests in rtest_integrate: 739/739 tests passed
Running tests in rtest_integrate_special: 52/52 tests passed
Running tests in rtest_ask: 6/6 tests passed
Running tests in rtest_sqrt: 
********************** Problem 15 ***************
Input:
closeto(sqrt(%i + 0.5), 0.55589294 %i + 0.8994537, 1.0D-15)


Result:
3.297221496410248D-8

This differed from the expected result:
true

********************** Problem 17 ***************
Input:
closeto(sqrt(%i - 0.5), 0.8994537 %i + 0.55589294, 1.0D-15)


Result:
3.297221489546265D-8

This differed from the expected result:
true

********************** Problem 19 ***************
Input:
closeto(sqrt(- %i - 0.5), 0.55589294 - 0.8994537 %i, 1.0D-15)


Result:
3.297221489546265D-8

This differed from the expected result:
true

********************** Problem 21 ***************
Input:
closeto(sqrt(0.5 - %i), 0.8994537 - 0.55589294 %i, 1.0D-15)


Result:
3.297221496410248D-8

This differed from the expected result:
true

303/307 tests passed (not counting 5 expected errors)

The following 4 problems failed: (15 17 19 21)

Error summary:
Error#1= found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest1.mac, problem#1#:
(8)
Error#1= found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest4.mac, problem#1#:
(19)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest7.mac, problem#1#:
(40 41)
Error#1= found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest9.mac, problem#1#:
(19)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest10.mac, problem#1#:
(13 19)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest14.mac, problem#1#:
(3 6 148 149 150 151 152 153 154 155 156 157 167 168 169 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 273 274 275 276 277 278 279 280 281 282 283 284 285)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest15.mac, problem#1#:
(231 232 234 235 237 238 240 241 243 244)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest16.mac, problem#1#:
(185 186 187 189 190 194 195)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest3.mac, problem#1#:
(14 18 69 78 80 82)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest8.mac, problem#1#:
(8 37 65 66 67 74 81 82 83 92 101 107 120 121 122 123 124 126 127 128 129 130 131)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtestmt19937.mac, problem#1#:
(4 6 7 8 11 13 14 15)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtestsum.mac, problem#1#:
(37 38)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest_trig.mac, problem#1#:
(16 56 58 85)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtestint.mac, problem#1#:
(123 124)
Error#1= found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest_dot.mac, problem#1#:
(6)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest_gamma.mac, problem#1#:
(51 52 53 57 58 59 179 180 352 354 356 358 360 362 364 366 368 371 373 375 377 379 381 383 385 387 389 391 393 395 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 430 433 435 459 461 463 465 467 635 670 671 672)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest_expintegral.mac, problem#1#:
(103 104 105 106 107 108 159 160 161 162 164 166 168 170 172 174 176 178 180 182)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest_lambert_w.mac, problem#1#:
(8 9 11 12 13 14 15 17)
Error#1=s found in /var/tmp/portage/sci-mathematics/maxima-5.21.1/work/maxima-5.21.1/tests/rtest_sqrt.mac, problem#1#:
(15 17 19 21)
288 tests failed out of 8,367 total tests.
(LOOP WITH ERRS = 'NIL FOR TESTENTRY IN TESTS-TO-RUN DO (IF (ATOM TESTENTRY) (PROGN (SETF TEST-FILE TESTENTRY) (SETF EXPECTED-FAILURES NIL)) (PROGN (SETF TEST-FILE (SECOND TESTENTRY)) (SETF EXPECTED-FAILURES (CDDR TESTENTRY)))) (FORMAT T (INTL:GETTEXT "Running tests in ~a: ") (IF (SYMBOLP TEST-FILE) (SUBSEQ (PRINT-INVERT-CASE TEST-FILE) 1) TEST-FILE)) (OR (ERRSET (PROGN (MULTIPLE-VALUE-SETQ (TESTRESULT TEST-COUNT) (TEST-BATCH ($FILE_SEARCH TEST-FILE $FILE_SEARCH_TESTS) EXPECTED-FAILURES :SHOW-EXPECTED DISPLAY_KNOWN_BUGS :SHOW-ALL DISPLAY_ALL :SHOWTIME TIME)) (SETF TESTRESULT (REST TESTRESULT)) (INCF TOTAL-COUNT TEST-COUNT) (WHEN TESTRESULT (INCF ERROR-COUNT (LENGTH (CDR TESTRESULT))) (SETQ ERRS (APPEND ERRS (LIST TESTRESULT)))))) (PROGN (SETQ ERROR-BREAK-FILE (FORMAT NIL "~a" TEST-FILE)) (SETQ ERRS (APPEND ERRS (LIST (LIST ERROR-BREAK-FILE "error break")))) (FORMAT T (INTL:GETTEXT "~%Caused an error break: ~a~%") TEST-FILE))) FINALLY (COND ((NULL ERRS) (FORMAT T (INTL:GETTEXT "~%~%No unexpected errors found out of ~:D tests.~%") TOTAL-COUNT)) (T (FORMAT T (INTL:GETTEXT "~%Error summary:~%")) (MAPCAR #'(LAMBDA (X) (LET ((S (IF (> (LENGTH (REST X)) 1) "s" ""))) (FORMAT T (INTL:GETTEXT "Error~a found in ~a, problem~a:~%~a~%") S (FIRST X) S (SORT (REST X) #'<)))) ERRS) (FORMAT T (INTL:GETTEXT "~&~:D test~P failed out of ~:D total tests.~%") ERROR-COUNT ERROR-COUNT TOTAL-COUNT)))) took 710,233 milliseconds (710.233 seconds) to run 
                    with 1 available CPU core.
During that period, 697,060 milliseconds (697.060 seconds) were spent in user mode
                    4,972 milliseconds (4.972 seconds) were spent in system mode
46,550 milliseconds (46.550 seconds) was spent in GC.
 1,562,640,136 bytes of memory allocated.
 2,011 minor page faults, 14 major page faults, 0 swaps.


More information about the Openmcl-devel mailing list