#include "coth.h" #include void dcotha(double* in,int size,double* out) { double val; int i=0; for(i=0;i