__ieee754_j0
return(u/v + tpi*(__ieee754_j0(x)*__ieee754_log(x)));
a = __ieee754_j0(x);
z = __ieee754_j0(x);
if(n==0) return(__ieee754_j0(x));
extern double __ieee754_j0 __P((double));
return __ieee754_j0(x);
double z = __ieee754_j0(x);