summaryrefslogtreecommitdiff
path: root/2.3-1/src/c/elementaryFunctions/Trigonometry/coth/zcoths.c
blob: 2eed86bbcfe85e6c2ef811152eeca25be8f05f7d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#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;
}