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