summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/asin
diff options
context:
space:
mode:
Diffstat (limited to 'src/elementaryFunctions/asin')
-rw-r--r--src/elementaryFunctions/asin/testDoubleAsin.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/elementaryFunctions/asin/testDoubleAsin.c b/src/elementaryFunctions/asin/testDoubleAsin.c
index e35633f1..f8353442 100644
--- a/src/elementaryFunctions/asin/testDoubleAsin.c
+++ b/src/elementaryFunctions/asin/testDoubleAsin.c
@@ -467,14 +467,13 @@ void zasinaTest(void) {
double inI[]= ISOURCE;
double resR[]= RRESULT;
double resI[]= IRESULT;
- doubleComplex out[200],in[200];
+ doubleComplex out[200],*in;
int i=0;
- for (i=0;i<200;i++){
- in[i] = DoubleComplex(inR[i],inI[i]);
- }
+ in= DoubleComplexMatrix(inR,inI,200);
zasina(in,200,out);
+
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);