diff options
Diffstat (limited to 'libm/e_jn.c')
| -rw-r--r-- | libm/e_jn.c | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/libm/e_jn.c b/libm/e_jn.c index 5f7d95adf..2133905e4 100644 --- a/libm/e_jn.c +++ b/libm/e_jn.c @@ -200,22 +200,7 @@ double __ieee754_jn(int n, double x) if(sgn==1) return -b; else return b; } -/* - * wrapper jn(int n, double x) - */ -#ifndef _IEEE_LIBM -double jn(int n, double x) -{ - double z = __ieee754_jn(n, x); - if (_LIB_VERSION == _IEEE_ || isnan(x)) - return z; - if (fabs(x) > X_TLOSS) - return __kernel_standard((double)n, x, 38); /* jn(|x|>X_TLOSS,n) */ - return z; -} -#else strong_alias(__ieee754_jn, jn) -#endif double __ieee754_yn(int n, double x) { @@ -274,25 +259,4 @@ double __ieee754_yn(int n, double x) if(sign>0) return b; else return -b; } -/* - * wrapper yn(int n, double x) - */ -#ifndef _IEEE_LIBM -double yn(int n, double x) /* wrapper yn */ -{ - double z = __ieee754_yn(n, x); - if (_LIB_VERSION == _IEEE_ || isnan(x)) - return z; - if (x <= 0.0) { - if(x == 0.0) /* d= -one/(x-x); */ - return __kernel_standard((double)n, x, 12); - /* d = zero/(x-x); */ - return __kernel_standard((double)n, x, 13); - } - if (x > X_TLOSS) - return __kernel_standard((double)n, x, 39); /* yn(x>X_TLOSS,n) */ - return z; -} -#else strong_alias(__ieee754_yn, yn) -#endif |