Revert accidental checkin.

This commit is contained in:
Christopher Faylor 2003-12-05 06:15:18 +00:00
parent 576593dd72
commit f36d3b6a0d
4 changed files with 1 additions and 22 deletions

View File

@ -30,8 +30,3 @@
{ {
return exp (lgamma_r(x,signgamp)); return exp (lgamma_r(x,signgamp));
} }
double gamma(double x)
{
return gamma_r(x, &(_REENT_SIGNGAM(_REENT)));
}

View File

@ -422,9 +422,3 @@ static double zero= 0.00000000000000000000e+00;
if(hx<0) r = nadj - r; if(hx<0) r = nadj - r;
return r; return r;
} }
double
lgamma(double x)
{
return lgamma_r(x, &(_REENT_SIGNGAM(_REENT)));
}

View File

@ -16,7 +16,7 @@
/* gammaf_r(x, signgamp) /* gammaf_r(x, signgamp)
* Reentrant version of the logarithm of the Gamma function * Reentrant version of the logarithm of the Gamma function
* with user provided pointer for the sign of Gamma(x). * with user provide pointer for the sign of Gamma(x).
* *
* Method: See lgammaf_r * Method: See lgammaf_r
*/ */
@ -32,8 +32,3 @@
{ {
return expf (lgammaf_r(x,signgamp)); return expf (lgammaf_r(x,signgamp));
} }
float gammaf(float x)
{
return gammaf_r(x, &(_REENT_SIGNGAM(_REENT)));
}

View File

@ -244,8 +244,3 @@ static float zero= 0.0000000000e+00;
if(hx<0) r = nadj - r; if(hx<0) r = nadj - r;
return r; return r;
} }
float lgammaf(float x)
{
return lgammaf_r(x, &(_REENT_SIGNGAM(_REENT)));
}