Mercurial > octave-nkf
changeset 10049:44e889c67abe
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 | e6441e13acb2 |
| children | dc88a0b6472c |
| files | src/ChangeLog src/mappers.cc |
| diffstat | 2 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Sat Jan 02 12:09:01 2010 -0500 +++ b/src/ChangeLog Sat Jan 02 12:16:55 2010 -0500 @@ -1,5 +1,6 @@ 2010-01-02 Ben Abbott <bpabbott@mac.com> + * mappers.cc: Change test tolerance from 1e-16 to eps. * lex.ll: Mac OSX's flex converts EOF to 0. 2009-12-30 Jaroslav Hajek <highegg@gmail.com>
--- 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)