Back to index

glibc  2.9
Functions
w_jnl.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 __jnl (int n, long double x)
 weak_alias (__jnl, jnl)

Function Documentation

long double __jnl ( int  n,
long double  x 
)

Definition at line 53 of file w_jnl.c.

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

Here is the call graph for this function:

weak_alias ( __jnl  ,
jnl   
)

Definition at line 69 of file w_jnl.c.

{
#ifdef _IEEE_LIBM
       return __ieee754_ynl(n,x);
#else
       long double z;
       z = __ieee754_ynl(n,x);
       if(_LIB_VERSION == _IEEE_ || __isnanl(x) ) return z;
        if(x <= 0.0){
                if(x==0.0)
                    /* d= -one/(x-x); */
                    return __kernel_standard((double)n,x,212);
                else
                    /* d = zero/(x-x); */
                    return __kernel_standard((double)n,x,213);
        }
       if(x>X_TLOSS) {
           return __kernel_standard((double)n,x,239); /* yn(x>X_TLOSS,n) */
       } else
           return z;
#endif
}

Here is the call graph for this function: