1*190a67d7Smartynas /* w_gammaf_r.c -- float version of w_gamma_r.c.
2*190a67d7Smartynas * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com.
3*190a67d7Smartynas */
4*190a67d7Smartynas
5*190a67d7Smartynas /*
6*190a67d7Smartynas * ====================================================
7*190a67d7Smartynas * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
8*190a67d7Smartynas *
9*190a67d7Smartynas * Developed at SunPro, a Sun Microsystems, Inc. business.
10*190a67d7Smartynas * Permission to use, copy, modify, and distribute this
11*190a67d7Smartynas * software is freely granted, provided that this notice
12*190a67d7Smartynas * is preserved.
13*190a67d7Smartynas * ====================================================
14*190a67d7Smartynas */
15*190a67d7Smartynas
16*190a67d7Smartynas /*
17*190a67d7Smartynas * wrapper float gammaf_r(float x, int *signgamp)
18*190a67d7Smartynas */
19*190a67d7Smartynas
20*190a67d7Smartynas #include "math.h"
21*190a67d7Smartynas #include "math_private.h"
22*190a67d7Smartynas
23*190a67d7Smartynas float
gammaf_r(float x,int * signgamp)24*190a67d7Smartynas gammaf_r(float x, int *signgamp) /* wrapper lgammaf_r */
25*190a67d7Smartynas {
26*190a67d7Smartynas return lgammaf_r(x,signgamp);
27*190a67d7Smartynas }
28