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

Poch1() Function Poch1 ( A As  Double, X As  Double, Optional Info As  Long  ) Relative Pochhammer's symbol ((a)x - 1)/x Purpose Computes the relative Pochhammer's symbol. Poch1(a, x) = ((a)x - 1)/x = (Γ(a + x)/Γ(a) - 1)/x Returns Double Relative Pochhammer's symbol Poch1(a, x). Parameters [in] A Argument a. [in] X Argument x. (If A = 0 or a negative integer, X <> 0) [out] Info (Optional) = 0: Successful exit. = -1: The argument X had an illegal value. (When A = 0 or a negative integer, X = 0) = 1: Floating point range error.