Mercurial > hg > octave-lojdl
changeset 11929:ec4877888285 release-3-0-x
use relative tols in randp tests
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Fri, 23 Jan 2009 14:10:55 +0100 |
parents | 553874dbba84 |
children | 5032328e940b |
files | src/ChangeLog src/DLD-FUNCTIONS/rand.cc |
diffstat | 2 files changed, 6 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2009-01-23 Jaroslav Hajek <highegg@gmail.com> + + * DLD-FUNCTIONS/ranpd.cc: Use relative tolerance for randp tests. + 2008-12-26 Francesco Potortì <pot@gnu.org> * data.cc (resize): Add cross reference to postpad.
--- a/src/DLD-FUNCTIONS/rand.cc +++ b/src/DLD-FUNCTIONS/rand.cc @@ -938,7 +938,7 @@ %!test %! % Test fixed state %! randp("state",1); -%! assert(randp(1e9,1,6),[999915677 999976657 1000047684 1000019035 999985749 999977692],1e-6) +%! assert(randp(1e9,1,6),[999915677 999976657 1000047684 1000019035 999985749 999977692],-1e-6) %!test %! % Test fixed state %! randp("seed",1); @@ -951,7 +951,7 @@ %!test %! % Test fixed state %! randp("seed",1); -%! assert(randp(1e9,1,6),[1000006208 1000012224 999981120 999963520 999963072 999981440],1e-6) +%! assert(randp(1e9,1,6),[1000006208 1000012224 999981120 999963520 999963072 999981440],-1e-6) %!test %! if (__random_statistical_tests__) %! % statistical tests may fail occasionally.