diff options
| -rw-r--r-- | src/elementaryFunctions/acos/testCplxAcos.c | 5 | ||||
| -rw-r--r-- | src/elementaryFunctions/asin/testDoubleAsin.c | 2 |
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); } } |