Mercurial > octave

diff src/mappers.cc @ 10049:44e889c67abe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mappers.cc: Change test tolerance from 1e-16 to eps.
author Ben Abbott <bpabbott@mac.com>
date Sat, 02 Jan 2010 12:16:55 -0500
parents 1bb1ed717d2f
children cd96d29c5efa
line wrap: on
line diff
--- a/src/mappers.cc	Sat Jan 02 12:09:01 2010 -0500
+++ b/src/mappers.cc	Sat Jan 02 12:16:55 2010 -0500
@@ -589,10 +589,10 @@
 
 /*
 %% middle region
-%!assert (erf (erfinv ([-0.9 -0.3 0 0.4 0.8])), [-0.9 -0.3 0 0.4 0.8], 1e-16)
+%!assert (erf (erfinv ([-0.9 -0.3 0 0.4 0.8])), [-0.9 -0.3 0 0.4 0.8], eps)
 %!assert (erf (erfinv (single ([-0.9 -0.3 0 0.4 0.8]))), single ([-0.9 -0.3 0 0.4 0.8]), 1e-8)
 %% tail region
-%!assert (erf (erfinv ([-0.999 -0.99 0.9999 0.99999])), [-0.999 -0.99 0.9999 0.99999], 1e-16)
+%!assert (erf (erfinv ([-0.999 -0.99 0.9999 0.99999])), [-0.999 -0.99 0.9999 0.99999], eps)
 %!assert (erf (erfinv (single ([-0.999 -0.99 0.9999 0.99999]))), single ([-0.999 -0.99 0.9999 0.99999]), 1e-8)
 %% backward - loss of accuracy
 %!assert (erfinv (erf ([-3 -1 -0.4 0.7 1.3 2.8])), [-3 -1 -0.4 0.7 1.3 2.8], -1e-12)