summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/tanh/testDoubleTanh.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/elementaryFunctions/tanh/testDoubleTanh.c')
-rw-r--r--src/elementaryFunctions/tanh/testDoubleTanh.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/src/elementaryFunctions/tanh/testDoubleTanh.c b/src/elementaryFunctions/tanh/testDoubleTanh.c
index 975d0a68..bd76c92e 100644
--- a/src/elementaryFunctions/tanh/testDoubleTanh.c
+++ b/src/elementaryFunctions/tanh/testDoubleTanh.c
@@ -430,7 +430,7 @@ void dtanhsTest(void) {
for (i=0;i<200;i++){
out=dtanhs(in[i]);
- assert(( (fabs(out-res[i]))/(fabs(out)) )<1e-15);
+ assert(( (fabs(out-res[i]))/(fabs(out)) )<3e-16);
}
}
@@ -445,8 +445,8 @@ void ztanhsTest(void) {
for (i=0;i<200;i++){
in=DoubleComplex(inR[i],inI[i]);
out=ztanhs(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);
}
}
@@ -458,7 +458,7 @@ void dtanhaTest(void) {
dtanha(in,200,out);
for (i=0;i<200;i++){
- assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<1e-15);
+ assert(( (fabs(out[i]-res[i]))/(fabs(out[i])) )<3e-16);
}
}
@@ -475,8 +475,8 @@ void ztanhaTest(void) {
ztanha(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);
}
}