1 /* Copyright (C) 1994 DJ Delorie, see COPYING.DJ for details */ 2 #include <math.h> 3 4 #ifdef _MSC_VER 5 #pragma function(cosh) 6 #endif 7 8 /* 9 * @implemented 10 */ 11 double cosh(double x) 12 { 13 const double ebig = exp(fabs(x)); 14 return (ebig + 1.0/ebig) / 2.0; 15 } 16