summaryrefslogtreecommitdiff
path: root/src/c/elementaryFunctions/Trigonometry/coth/dcotha.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/c/elementaryFunctions/Trigonometry/coth/dcotha.c')
-rw-r--r--src/c/elementaryFunctions/Trigonometry/coth/dcotha.c14
1 files changed, 14 insertions, 0 deletions
diff --git a/src/c/elementaryFunctions/Trigonometry/coth/dcotha.c b/src/c/elementaryFunctions/Trigonometry/coth/dcotha.c
new file mode 100644
index 00000000..f6304f58
--- /dev/null
+++ b/src/c/elementaryFunctions/Trigonometry/coth/dcotha.c
@@ -0,0 +1,14 @@
+#include "coth.h"
+#include <math.h>
+
+void dcotha(double* in,int size,double* out)
+{
+ double val;
+ int i=0;
+ for(i=0;i<size;i++)
+ {
+ out[i]=cosh(in[i])/sinh(in[i]);
+ /*printf("The cotangent of %lf is %lf\n", in[i], out[i]);*/
+ }
+}
+