Cgamma Cgamr Clngam Gamdratio Gamdratio_sub Gamma Gamma1pm1 Gamma1pm1_sub Gamr Gamr_sub Gamratio Gamratio_sub Lngam Lngam_sub Lngams Lngams_sub Poch Poch1 Poch1_sub Poch_sub

Lngam_sub() Sub Lngam_sub ( Ret As  Double, X As  Double, Optional Info As  Long  ) Logarithm of gamma function ln(Γ(x)) (Subroutine version) Purpose Computes the logarithm of the gamma function at x, where x is not 0, -1, -2, ... Parameters [out] Ret Logarithm of the gamma function ln(Gamma(x)). [in] X Argument x (X <> 0 and X <> negative integer) (If X < 0, computes the real part = ln(|Γ(X)|)) [out] Info (Optional) = 0: Successful exit. = -1: The argument X had an illegal value. (X = 0 or negative integer) = 1: Floating point range error.