coshl
extern long double coshl(long double x);
long double cosh_val = coshl (__real__ x);
den = (coshl (2.0 * __real__ x) + cos2ix);