jsr

pc,gamma double gamma(x)

double x; If x is passed (in fr0) returns ln |(x)| (in fr0). The sign of (x) is returned in the external integer The following C program might be used to calculate :

y = gamma(x);

if (y > 88.)

error( );

y = exp(y);

if(signgam)

y = y; The c-bit is set on negative integral arguments and the maximum value is returned. There is no error return for C programs. No error return from C.