diff options
Diffstat (limited to 'src/elementaryFunctions/log10/testDoubleLog10.c')
-rw-r--r-- | src/elementaryFunctions/log10/testDoubleLog10.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/elementaryFunctions/log10/testDoubleLog10.c b/src/elementaryFunctions/log10/testDoubleLog10.c index 55c764d4..5f67225c 100644 --- a/src/elementaryFunctions/log10/testDoubleLog10.c +++ b/src/elementaryFunctions/log10/testDoubleLog10.c @@ -430,7 +430,7 @@ void dlog10sTest(void) { for (i=0;i<200;i++){ out=dlog10s(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 zlog10sTest(void) { for (i=0;i<200;i++){ in=DoubleComplex(inR[i],inI[i]); out=zlog10s(in); - assert(( (fabs(zreals(out)-resR[i]))/(fabs(zreals(out))) )<1e-14); - 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 dlog10aTest(void) { dlog10a(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 zlog10aTest(void) { zlog10a(in,200,out); for (i=0;i<200;i++){ - assert(( (fabs(zreals(out[i])-resR[i]))/(fabs(zreals(out[i]))) )<1e-14); - 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); } } |