__ieee754_log
return __ieee754_log(x)+ln2; /* acosh(huge)=log(2x) */
return __ieee754_log(2.0*x-one/(x+__ieee754_sqrt(t-one)));
return(u00 + tpi*__ieee754_log(x));
return(u/v + tpi*(__ieee754_j0(x)*__ieee754_log(x)));
return(x*(u/v) + tpi*(__ieee754_j1(x)*__ieee754_log(x)-one/x));
tmp = tmp*__ieee754_log(fabs(v*tmp));
return -__ieee754_log(-x);
} else return -__ieee754_log(x);
nadj = __ieee754_log(pi/fabs(t*x));
r = -__ieee754_log(x);
r += __ieee754_log(z); break;
t = __ieee754_log(x);
r = x*(__ieee754_log(x)-one);
z = y*log10_2lo + ivln10*__ieee754_log(x);
extern double __ieee754_log __P((double));
w = __ieee754_log(fabs(x))+ln2;
w = __ieee754_log(2.0*t+one/(__ieee754_sqrt(x*x+one)+t));
return __ieee754_log(x);
z = __ieee754_log(x);