diff options
author | torset | 2009-02-27 13:30:30 +0000 |
---|---|---|
committer | torset | 2009-02-27 13:30:30 +0000 |
commit | 05fb6a62c83ae7cea37aa2795e61697b3560f135 (patch) | |
tree | e4135e36ec029b677faeb18125b19fa4a6d11a6c /src/elementaryFunctions/acos/testCplxAcos.c | |
parent | 3ce979f5740261766f4248864c0758d6cb6af857 (diff) | |
download | scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.tar.gz scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.tar.bz2 scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.zip |
change precision for tests : put it to 3e-16 for double and 3e-6 for float
Diffstat (limited to 'src/elementaryFunctions/acos/testCplxAcos.c')
-rw-r--r-- | src/elementaryFunctions/acos/testCplxAcos.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/elementaryFunctions/acos/testCplxAcos.c b/src/elementaryFunctions/acos/testCplxAcos.c index 76974af1..4053bb58 100644 --- a/src/elementaryFunctions/acos/testCplxAcos.c +++ b/src/elementaryFunctions/acos/testCplxAcos.c @@ -611,14 +611,14 @@ void zacossTest(void){ for (i=0;i<200;i++){ - assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 1e-15); - assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 1e-15); + assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 3e-16); + assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 3e-16); } out[0]=zacoss(DoubleComplex(0.2,0.1)); printf ("%1.20f + %1.20f *i\n",zreals(out[0]),zimags(out[0])); - assert ( ( fabs(zreals(out[0]) - 1.3704927556955963652285) / fabs(zreals(out[0])) ) < 1e-15); - assert ( ( fabs(zimags(out[0]) - (- 0.1018639159801242727310)) / fabs(zimags(out[0])) ) < 1e-15); + assert ( ( fabs(zreals(out[0]) - 1.3704927556955963652285) / fabs(zreals(out[0])) ) < 3e-16); + assert ( ( fabs(zimags(out[0]) - (- 0.1018639159801242727310)) / fabs(zimags(out[0])) ) < 3e-16); } @@ -660,8 +660,8 @@ void zacosaTest(void){ } zacosa(tIn,200,out); for (i=0;i<200;i++){ - assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 1e-15); - assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 1e-15); + assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 3e-16); + assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 3e-16); } } |