@ -44,7 +44,7 @@ const cl_F cosh (const cl_F& x)
if (TheLfloat(x)->len >= infty) {
var cl_LF xx = extend(x,TheLfloat(x)->len+1);
var cl_LF_cosh_sinh_t hyp = cl_coshsinh_ratseries(xx);
return cln/float.hyp.cosh,x);
return cl_float(hyp.cosh,x);
} else
#endif
if (TheLfloat(x)->len >= 600) {
@ -47,8 +47,8 @@ const cosh_sinh_t cosh_sinh (const cl_F& x)
return cosh_sinh_t(
cln/float.hyp.cosh,x),
cln/float.hyp.sinh,x)
cl_float(hyp.cosh,x),
cl_float(hyp.sinh,x)
);
@ -33,7 +33,7 @@ const cl_F sinh (const cl_F& x)
return cln/float.hyp.sinh,x);
return cl_float(hyp.sinh,x);
if ((TheLfloat(x)->len >= 500)