diff options
Diffstat (limited to '2.3-1/src/c/elementaryFunctions/Trigonometry/coth/zcoths.c')
-rw-r--r-- | 2.3-1/src/c/elementaryFunctions/Trigonometry/coth/zcoths.c | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/2.3-1/src/c/elementaryFunctions/Trigonometry/coth/zcoths.c b/2.3-1/src/c/elementaryFunctions/Trigonometry/coth/zcoths.c new file mode 100644 index 00000000..8b3b19f5 --- /dev/null +++ b/2.3-1/src/c/elementaryFunctions/Trigonometry/coth/zcoths.c @@ -0,0 +1,26 @@ +/* Copyright (C) 2016 - IIT Bombay - FOSSEE + + This file must be used under the terms of the CeCILL. + This source file is licensed as described in the file COPYING, which + you should have received as part of this distribution. The terms + are also available at + http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt + Author: Shamik Guha + Organization: FOSSEE, IIT Bombay + Email: toolbox@scilab.in +*/ + +#include "coth.h" +#include "tanh.h" +#include "tan.h" +#include <math.h> +#include "doubleComplex.h" +#include "division.h" + +doubleComplex zcoths(doubleComplex z) +{ + + doubleComplex out; + out = zrdivs(DoubleComplex(1,0),ztanhs(z)); + return out; +} |