1/* e_gammaf_r.c -- float version of e_gamma_r.c. 2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. 3 */ 4 5/* 6 * ==================================================== 7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 8 * 9 * Developed at SunPro, a Sun Microsystems, Inc. business. 10 * Permission to use, copy, modify, and distribute this 11 * software is freely granted, provided that this notice 12 * is preserved. 13 * ==================================================== 14 */ 15 16#ifndef lint
| 1/* e_gammaf_r.c -- float version of e_gamma_r.c. 2 * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. 3 */ 4 5/* 6 * ==================================================== 7 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 8 * 9 * Developed at SunPro, a Sun Microsystems, Inc. business. 10 * Permission to use, copy, modify, and distribute this 11 * software is freely granted, provided that this notice 12 * is preserved. 13 * ==================================================== 14 */ 15 16#ifndef lint
|
17static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_gammaf_r.c 97409 2002-05-28 17:51:46Z alfred $";
| 17static char rcsid[] = "$FreeBSD: head/lib/msun/src/e_gammaf_r.c 97413 2002-05-28 18:15:04Z alfred $";
|
18#endif 19 20/* __ieee754_gammaf_r(x, signgamp) 21 * Reentrant version of the logarithm of the Gamma function 22 * with user provide pointer for the sign of Gamma(x). 23 * 24 * Method: See __ieee754_lgammaf_r 25 */ 26 27#include "math.h" 28#include "math_private.h" 29
| 18#endif 19 20/* __ieee754_gammaf_r(x, signgamp) 21 * Reentrant version of the logarithm of the Gamma function 22 * with user provide pointer for the sign of Gamma(x). 23 * 24 * Method: See __ieee754_lgammaf_r 25 */ 26 27#include "math.h" 28#include "math_private.h" 29
|
30 float __ieee754_gammaf_r(float x, int *signgamp)
| 30float 31__ieee754_gammaf_r(float x, int *signgamp)
|
31{ 32 return __ieee754_lgammaf_r(x,signgamp); 33}
| 32{ 33 return __ieee754_lgammaf_r(x,signgamp); 34}
|