summaryrefslogtreecommitdiffstats
path: root/lib/msun/src/w_j0.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib/msun/src/w_j0.c')
-rw-r--r--lib/msun/src/w_j0.c30
1 files changed, 1 insertions, 29 deletions
diff --git a/lib/msun/src/w_j0.c b/lib/msun/src/w_j0.c
index 93a9c70..e1a4f85 100644
--- a/lib/msun/src/w_j0.c
+++ b/lib/msun/src/w_j0.c
@@ -15,7 +15,7 @@ static char rcsid[] = "$FreeBSD$";
#endif
/*
- * wrapper j0(double x), y0(double x)
+ * wrapper j0(double x)
*/
#include "math.h"
@@ -39,31 +39,3 @@ static char rcsid[] = "$FreeBSD$";
return z;
#endif
}
-
-#ifdef __STDC__
- double y0(double x) /* wrapper y0 */
-#else
- double y0(x) /* wrapper y0 */
- double x;
-#endif
-{
-#ifdef _IEEE_LIBM
- return __ieee754_y0(x);
-#else
- double z;
- z = __ieee754_y0(x);
- if(_LIB_VERSION == _IEEE_ || isnan(x) ) return z;
- if(x <= 0.0){
- if(x==0.0)
- /* d= -one/(x-x); */
- return __kernel_standard(x,x,8);
- else
- /* d = zero/(x-x); */
- return __kernel_standard(x,x,9);
- }
- if(x>X_TLOSS) {
- return __kernel_standard(x,x,35); /* y0(x>X_TLOSS) */
- } else
- return z;
-#endif
-}
OpenPOWER on IntegriCloud