fabsf
float fabsf(float);
#define fabs(x) __tg_impl_full(x, x, x, fabs, fabsf, fabsl, \
DEF_STD(fabsf);
PROTO_NORMAL(fabsf);
w = one-fabsf(x);
else z=atanf(fabsf(y/x)); /* safe to do y/x */
t = expm1f(fabsf(x));
t = expf(fabsf(x));
if (ix < 0x42b17180) return half*expf(fabsf(x));
w = expf(half*fabsf(x));
x = fabsf(x);
y = fabsf(x);
tmp = tmp*logf(fabsf(v*tmp));
x = fabsf(x);
nadj = logf(pi/fabsf(t*x));
ax = fabsf(x);
t = fabsf(x);
x = fabsf(x);
p = fabsf(p);
t = expm1f(fabsf(x));
if (ix < 0x42b17180) return h*expf(fabsf(x));
w = expf((float)0.5*fabsf(x));
if((ix|(iy+1))==0) return one/fabsf(x);
w = logf(fabsf(x))+ln2;
t = fabsf(x);
w =log1pf(fabsf(x)+t/(one+sqrtf(one+t)));
x = fabsf(x);
if(fabsf(x) > 1.0f) {
if(fabsf(x) <= 0.5f) {
if(fabsf(x) <= 0.5f) {
r = scale * fabsf((0.5f * y) / t);
t = scale * fabsf((0.5f * y) / r);
r = fabsf(y);
if ((fabsf(x) > 4.0f) || (fabsf(y) > 4.0f)) {
while (fabsf(t/d) > MACHEPF)
if(fabsf(d) < 0.25f)
x = fabsf(2.0f * crealf(z));
y = fabsf(2.0f * cimagf(z));
s = fabsf(x)-one;
x = fabsf(x);
s = fabsf(x)-one;
x = fabsf(x);
DEF_STD(fabsf);
if(ix==0) return (float)-1.0/fabsf(x);
y = fabsf(y);
t = expm1f(two*fabsf(x));
t = expm1f(-two*fabsf(x));
assert(fabsf(lgammaf(3.0F) - (float)M_LN2) < FLT_EPSILON && signgam == 1);
if (fabsf(i) > 0x1.0p-4f)