summaryrefslogtreecommitdiff
path: root/src/elementaryFunctions/cosh/zcoshs.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/elementaryFunctions/cosh/zcoshs.c')
-rw-r--r--src/elementaryFunctions/cosh/zcoshs.c11
1 files changed, 5 insertions, 6 deletions
diff --git a/src/elementaryFunctions/cosh/zcoshs.c b/src/elementaryFunctions/cosh/zcoshs.c
index 816e9022..d80fd091 100644
--- a/src/elementaryFunctions/cosh/zcoshs.c
+++ b/src/elementaryFunctions/cosh/zcoshs.c
@@ -5,18 +5,17 @@
** Made by Bruno JOFRET <bruno.jofret@inria.fr>
**
** Started on Thu Dec 7 12:05:48 2006 jofret
-** Last update Tue Feb 6 10:48:24 2007 jofret
+** Last update Fri Feb 23 16:48:33 2007 jofret
**
** Copyright INRIA 2006
*/
-#include "doubleComplex.h"
-
-doubleComplex zcoss(doubleComplex);
+#include "cosh.h"
+#include "cos.h"
doubleComplex zcoshs(doubleComplex z) {
- double real = creal(z);
- double minusImag = -cimag(z);
+ double real = zreals(z);
+ double minusImag = -zimags(z);
return (zcoss(DoubleComplex(minusImag, real)));
}