diff options
| author | torset | 2009-02-27 13:30:30 +0000 |
|---|---|---|
| committer | torset | 2009-02-27 13:30:30 +0000 |
| commit | 05fb6a62c83ae7cea37aa2795e61697b3560f135 (patch) | |
| tree | e4135e36ec029b677faeb18125b19fa4a6d11a6c /src/elementaryFunctions/log/testDoubleLog.c | |
| parent | 3ce979f5740261766f4248864c0758d6cb6af857 (diff) | |
| download | scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.tar.gz scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.tar.bz2 scilab2c-05fb6a62c83ae7cea37aa2795e61697b3560f135.zip | |
change precision for tests : put it to 3e-16 for double and 3e-6 for float
Diffstat (limited to 'src/elementaryFunctions/log/testDoubleLog.c')
| -rw-r--r-- | src/elementaryFunctions/log/testDoubleLog.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/elementaryFunctions/log/testDoubleLog.c b/src/elementaryFunctions/log/testDoubleLog.c index 94f8357f..424b9db2 100644 --- a/src/elementaryFunctions/log/testDoubleLog.c +++ b/src/elementaryFunctions/log/testDoubleLog.c @@ -852,7 +852,7 @@ void dlogsTest(void) { for (i=0;i<200;i++){ out=dlogs(in[i]); - assert(( (fabs(out-res[i]))/(fabs(out)) )<1e-15); + assert(( (fabs(out-res[i]))/(fabs(out)) )<3e-16); } for (i=0;i<200;i++){ @@ -878,15 +878,15 @@ void zlogsTest(void) { for (i=0;i<200;i++){ in=DoubleComplex(inR[i],inI[i]); out=zlogs(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); } for (i=0;i<200;i++){ in2=DoubleComplex(in2R[i],in2I[i]); out=zlogs(in2); - assert(( (fabs(zreals(out)-res2R[i]))/(fabs(zreals(out))) )<1e-15); + assert(( (fabs(zreals(out)-res2R[i]))/(fabs(zreals(out))) )<3e-16); assert(( (fabs(zimags(out)-res2I[i]))/(fabs(zimags(out))) )<1e-16); } } @@ -901,7 +901,7 @@ void dlogaTest(void) { dloga(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); } dloga(in2,200,out); @@ -927,15 +927,15 @@ void zlogaTest(void) { zloga(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); } in2=DoubleComplexMatrix(in2R,in2I,200); zloga(in2,200,out); for (i=0;i<200;i++){ - assert(( (fabs(zreals(out[i])-res2R[i]))/(fabs(zreals(out[i]))) )<1e-15); + assert(( (fabs(zreals(out[i])-res2R[i]))/(fabs(zreals(out[i]))) )<3e-16); assert(( (fabs(zimags(out[i])-res2I[i]))/(fabs(zimags(out[i]))) )<1e-16); } |