Home | History | Annotate | Download | only in fdlibm
      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 /* __ieee754_gamma(x)
     16  * Return the logarithm of the Gamma function of x.
     17  *
     18  * Method: call __ieee754_gamma_r
     19  */
     20 
     21 #include "fdlibm.h"
     22 
     23 extern int signgam;
     24 
     25 #ifdef __STDC__
     26 	double __ieee754_gamma(double x)
     27 #else
     28 	double __ieee754_gamma(x)
     29 	double x;
     30 #endif
     31 {
     32 	return __ieee754_gamma_r(x,&signgam);
     33 }
     34