1 2 3 4 5 6 7 8 9 10 11 12 13 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]);*/ } }