Back to index

glibc  2.9
Functions
w_j1l.c File Reference
#include <math.h>
#include "math_private.h"
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions

long double __j1l (long double x)
 weak_alias (__j1l, j1l)

Function Documentation

long double __j1l ( long double  x)

Definition at line 31 of file w_j1l.c.

{
#ifdef _IEEE_LIBM
       return __ieee754_j1l(x);
#else
       long double z;
       z = __ieee754_j1l(x);
       if(_LIB_VERSION == _IEEE_ || __isnanl(x) ) return z;
       if(fabsl(x)>X_TLOSS) {
               return __kernel_standard(x,x,236); /* j1(|x|>X_TLOSS) */
       } else
           return z;
#endif
}

Here is the call graph for this function:

weak_alias ( __j1l  ,
j1l   
)

Definition at line 47 of file w_j1l.c.

{
#ifdef _IEEE_LIBM
       return __ieee754_y1l(x);
#else
       long double z;
       z = __ieee754_y1l(x);
       if(_LIB_VERSION == _IEEE_ || __isnanl(x) ) return z;
        if(x <= 0.0){
                if(x==0.0)
                    /* d= -one/(x-x); */
                    return __kernel_standard(x,x,210);
                else
                    /* d = zero/(x-x); */
                    return __kernel_standard(x,x,211);
        }
       if(x>X_TLOSS) {
               return __kernel_standard(x,x,237); /* y1(x>X_TLOSS) */
       } else
           return z;
#endif
}

Here is the call graph for this function: