Home | History | Annotate | Download | only in src
      1 
      2 /* @(#)e_gamma.c 1.3 95/01/18 */
      3 /*
      4  * ====================================================
      5  * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
      6  *
      7  * Developed at SunSoft, a Sun Microsystems, Inc. business.
      8  * Permission to use, copy, modify, and distribute this
      9  * software is freely granted, provided that this notice
     10  * is preserved.
     11  * ====================================================
     12  *
     13  */
     14 
     15 #include <sys/cdefs.h>
     16 __FBSDID("$FreeBSD$");
     17 
     18 /* __ieee754_gamma(x)
     19  * Return the logarithm of the Gamma function of x.
     20  *
     21  * Method: call __ieee754_gamma_r
     22  */
     23 
     24 #include "math.h"
     25 #include "math_private.h"
     26 
     27 extern int signgam;
     28 
     29 double
     30 __ieee754_gamma(double x)
     31 {
     32 	return __ieee754_gamma_r(x,&signgam);
     33 }
     34