diff options
Diffstat (limited to 'src/elementaryFunctions/cosh/zcoshs.c')
-rw-r--r-- | src/elementaryFunctions/cosh/zcoshs.c | 11 |
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))); } |