diff options
Diffstat (limited to 'scilab2c/src/elementaryFunctions/atanh/testDoubleAtanh.c')
| -rw-r--r-- | scilab2c/src/elementaryFunctions/atanh/testDoubleAtanh.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/scilab2c/src/elementaryFunctions/atanh/testDoubleAtanh.c b/scilab2c/src/elementaryFunctions/atanh/testDoubleAtanh.c index d7e68080..2ee28c91 100644 --- a/scilab2c/src/elementaryFunctions/atanh/testDoubleAtanh.c +++ b/scilab2c/src/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)) ) <1e-15); + assert( ( (fabs(out-res[i])) / (fabs(out)) ) <3e-16); } } } @@ -548,11 +548,11 @@ 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))) ) <1e-15); - assert( ( (fabs(zimags(out)-resI[i])) / (fabs(zimags(out))) ) <1e-15); + assert( ( (fabs(zreals(out)-resR[i])) / (fabs(zreals(out))) ) <3e-16); + assert( ( (fabs(zimags(out)-resI[i])) / (fabs(zimags(out))) ) <3e-16); } out=zatanhs((DoubleComplex(2.0/10.0,11.0/10.0))); - assert( ( (fabs(zreals(out)-0.0898435002269743487879)) / (fabs(zreals(out))) ) <1e-15); + assert( ( (fabs(zreals(out)-0.0898435002269743487879)) / (fabs(zreals(out))) ) <3e-16); assert( ( (fabs(zimags(out)-0.8419736541926906570055)) / (fabs(zimags(out))) ) <1e-16); } @@ -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])) ) <1e-15); + else assert( ( (fabs(out[i]-res[i])) / (fabs(out[i])) ) <3e-16); } } @@ -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]))) ) <1e-15); - assert( ( (fabs(zimags(out[i])-resI[i])) / (fabs(zimags(out[i]))) ) <1e-15); + 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); } } |