summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/acos/testCplxAcos.c
diff options
context:
space:
mode:
authortorset2009-02-27 13:30:30 +0000
committertorset2009-02-27 13:30:30 +0000
commit05fb6a62c83ae7cea37aa2795e61697b3560f135 (patch)
treee4135e36ec029b677faeb18125b19fa4a6d11a6c /src/elementaryFunctions/acos/testCplxAcos.c
parent3ce979f5740261766f4248864c0758d6cb6af857 (diff)
downloadscilab2c-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/acos/testCplxAcos.c')
-rw-r--r--src/elementaryFunctions/acos/testCplxAcos.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/src/elementaryFunctions/acos/testCplxAcos.c b/src/elementaryFunctions/acos/testCplxAcos.c
index 76974af1..4053bb58 100644
--- a/src/elementaryFunctions/acos/testCplxAcos.c
+++ b/src/elementaryFunctions/acos/testCplxAcos.c
@@ -611,14 +611,14 @@ void zacossTest(void){
for (i=0;i<200;i++){
- assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 1e-15);
- assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 1e-15);
+ assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 3e-16);
+ assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 3e-16);
}
out[0]=zacoss(DoubleComplex(0.2,0.1));
printf ("%1.20f + %1.20f *i\n",zreals(out[0]),zimags(out[0]));
- assert ( ( fabs(zreals(out[0]) - 1.3704927556955963652285) / fabs(zreals(out[0])) ) < 1e-15);
- assert ( ( fabs(zimags(out[0]) - (- 0.1018639159801242727310)) / fabs(zimags(out[0])) ) < 1e-15);
+ assert ( ( fabs(zreals(out[0]) - 1.3704927556955963652285) / fabs(zreals(out[0])) ) < 3e-16);
+ assert ( ( fabs(zimags(out[0]) - (- 0.1018639159801242727310)) / fabs(zimags(out[0])) ) < 3e-16);
}
@@ -660,8 +660,8 @@ void zacosaTest(void){
}
zacosa(tIn,200,out);
for (i=0;i<200;i++){
- assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 1e-15);
- assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 1e-15);
+ assert ( ( fabs(zreals(out[i]) - zreals(tRes[i])) / fabs(zreals(out[i])) ) < 3e-16);
+ assert ( ( fabs(zimags(out[i]) - zimags(tRes[i])) / fabs(zimags(out[i])) ) < 3e-16);
}
}