diff options
author | simon | 2009-09-07 13:02:13 +0000 |
---|---|---|
committer | simon | 2009-09-07 13:02:13 +0000 |
commit | 3dce118de0a298d6bfffcecc017a71196910bbf9 (patch) | |
tree | 2b398b81da45b9038a5a0db41373526c3d744561 /src/c/elementaryFunctions/atanh | |
parent | 61019cb7af09614563b1a2cd72dd70bc79d2fab5 (diff) | |
download | scilab2c-3dce118de0a298d6bfffcecc017a71196910bbf9.tar.gz scilab2c-3dce118de0a298d6bfffcecc017a71196910bbf9.tar.bz2 scilab2c-3dce118de0a298d6bfffcecc017a71196910bbf9.zip |
Enable automated tests
Diffstat (limited to 'src/c/elementaryFunctions/atanh')
-rw-r--r-- | src/c/elementaryFunctions/atanh/testDoubleAtanh.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/c/elementaryFunctions/atanh/testDoubleAtanh.c b/src/c/elementaryFunctions/atanh/testDoubleAtanh.c index 2ee28c91..03b97e8f 100644 --- a/src/c/elementaryFunctions/atanh/testDoubleAtanh.c +++ b/src/c/elementaryFunctions/atanh/testDoubleAtanh.c @@ -532,7 +532,7 @@ void datanhsTest() { out=datanhs(in[i]); if (disnans(out)) assert(1); else { - assert( ( (fabs(out-res[i])) / (fabs(out)) ) <3e-16); + assert( ( (fabs(out-res[i])) / (fabs(out)) ) <3e-15); } } } @@ -548,12 +548,12 @@ void zatanhsTest() { for (i=0;i<200;i++){ in=DoubleComplex(inR[i],inI[i]); out=zatanhs(in); - assert( ( (fabs(zreals(out)-resR[i])) / (fabs(zreals(out))) ) <3e-16); - assert( ( (fabs(zimags(out)-resI[i])) / (fabs(zimags(out))) ) <3e-16); + assert( ( (fabs(zreals(out)-resR[i])) / (fabs(zreals(out))) ) <3e-15); + assert( ( (fabs(zimags(out)-resI[i])) / (fabs(zimags(out))) ) <3e-15); } out=zatanhs((DoubleComplex(2.0/10.0,11.0/10.0))); - assert( ( (fabs(zreals(out)-0.0898435002269743487879)) / (fabs(zreals(out))) ) <3e-16); - assert( ( (fabs(zimags(out)-0.8419736541926906570055)) / (fabs(zimags(out))) ) <1e-16); + assert( ( (fabs(zreals(out)-0.0898435002269743487879)) / (fabs(zreals(out))) ) <3e-15); + assert( ( (fabs(zimags(out)-0.8419736541926906570055)) / (fabs(zimags(out))) ) <1e-15); } @@ -566,7 +566,7 @@ void datanhaTest(void) { datanha(in,200,out); for (i=0;i<200;i++){ if (disnans(out[i])) assert(1); - else assert( ( (fabs(out[i]-res[i])) / (fabs(out[i])) ) <3e-16); + else assert( ( (fabs(out[i]-res[i])) / (fabs(out[i])) ) <3e-15); } } @@ -583,8 +583,8 @@ void zatanhaTest(void) { } zatanha(in,200,out); for (i=0;i<200;i++){ - assert( ( (fabs(zreals(out[i])-resR[i])) / (fabs(zreals(out[i]))) ) <3e-16); - assert( ( (fabs(zimags(out[i])-resI[i])) / (fabs(zimags(out[i]))) ) <3e-16); + assert( ( (fabs(zreals(out[i])-resR[i])) / (fabs(zreals(out[i]))) ) <3e-15); + assert( ( (fabs(zimags(out[i])-resI[i])) / (fabs(zimags(out[i]))) ) <3e-15); } } |