summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authortorset2009-01-30 16:04:42 +0000
committertorset2009-01-30 16:04:42 +0000
commitbfe3bcdf991c908a9eafe14b2852d5384f858dfa (patch)
treed385313b88b5bb21ed3f2bf718780aa318085071 /src
parent41e48677e3f27ba5fb962e8247d85b0f0f069757 (diff)
downloadscilab2c-bfe3bcdf991c908a9eafe14b2852d5384f858dfa.tar.gz
scilab2c-bfe3bcdf991c908a9eafe14b2852d5384f858dfa.tar.bz2
scilab2c-bfe3bcdf991c908a9eafe14b2852d5384f858dfa.zip
Update tests
Diffstat (limited to 'src')
-rw-r--r--src/elementaryFunctions/acos/testCplxAcos.c5
-rw-r--r--src/elementaryFunctions/asin/testDoubleAsin.c2
2 files changed, 6 insertions, 1 deletions
diff --git a/src/elementaryFunctions/acos/testCplxAcos.c b/src/elementaryFunctions/acos/testCplxAcos.c
index 5bccbf05..76974af1 100644
--- a/src/elementaryFunctions/acos/testCplxAcos.c
+++ b/src/elementaryFunctions/acos/testCplxAcos.c
@@ -614,6 +614,11 @@ void zacossTest(void){
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);
}
+
+ 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);
}
diff --git a/src/elementaryFunctions/asin/testDoubleAsin.c b/src/elementaryFunctions/asin/testDoubleAsin.c
index f8353442..5e21bca8 100644
--- a/src/elementaryFunctions/asin/testDoubleAsin.c
+++ b/src/elementaryFunctions/asin/testDoubleAsin.c
@@ -476,7 +476,7 @@ void zasinaTest(void) {
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-1);
+ assert( ( (fabs(zimags(out[i])-resI[i])) / (fabs(zimags(out[i]))) ) <1e-15);
}
}