diff options
Diffstat (limited to 'src/c/elementaryFunctions/sinh/testDoubleSinh.c')
| -rw-r--r-- | src/c/elementaryFunctions/sinh/testDoubleSinh.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/c/elementaryFunctions/sinh/testDoubleSinh.c b/src/c/elementaryFunctions/sinh/testDoubleSinh.c index 6509d1c2..d4223852 100644 --- a/src/c/elementaryFunctions/sinh/testDoubleSinh.c +++ b/src/c/elementaryFunctions/sinh/testDoubleSinh.c @@ -445,8 +445,8 @@ void zsinhsTest(void) { for (i=0;i<200;i++){ in=DoubleComplex(inR[i],inI[i]); out=zsinhs(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); } } @@ -485,8 +485,8 @@ mon_test=DoubleComplexMatrix(mon_testR,mon_testI,9); zsinha(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); } zsinha(mon_test,9,mon_out); for (i=0;i<9;i++){ |