summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/cos/zcoss.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/elementaryFunctions/cos/zcoss.c')
-rw-r--r--src/elementaryFunctions/cos/zcoss.c16
1 files changed, 7 insertions, 9 deletions
diff --git a/src/elementaryFunctions/cos/zcoss.c b/src/elementaryFunctions/cos/zcoss.c
index c5fe96bc..12000191 100644
--- a/src/elementaryFunctions/cos/zcoss.c
+++ b/src/elementaryFunctions/cos/zcoss.c
@@ -5,21 +5,19 @@
** Made by Bruno JOFRET <bruno.jofret@inria.fr>
**
** Started on Thu Dec 7 12:05:48 2006 jofret
-** Last update Mon Feb 5 17:25:27 2007 jofret
+** Last update Fri Feb 23 16:35:32 2007 jofret
**
** Copyright INRIA 2006
*/
-#include "doubleComplex.h"
-
-double dcoss(double);
-double dcoshs(double);
-double dsins(double);
-double dsinhs(double);
+#include "cos.h"
+#include "sin.h"
+#include "cosh.h"
+#include "sinh.h"
doubleComplex zcoss(doubleComplex z) {
- double real = creal(z);
- double imag = cimag(z);
+ double real = zreals(z);
+ double imag = zimags(z);
return DoubleComplex(dcoss(real) * dcoshs(imag),
-dsins(real) * dsinhs(imag));