Текст подпрограммы и версий
sfg8r_c.zip  sfg8d_c.zip  		Тексты тестовых примеров
tsfg8r_c.zip  tsfg8d_c.zip 

Функция:  sfg8r_c

Назначение

Вычисление логарифмической производной ψ (1 + x) гамма - функции.

Математическое описание

Функция sfg8r_c вычисляет логарифмическую производную 

                         ψ(1+x)  =  d (ln Г(1+x)) / dx  =  Г '(1+x) / Г(1+x)

гамма - функции. Функцию  ψ называют еще пси - функцией. Значения  x - вещественные,
причем  x ≠ - 1, - 2, ... .

Янке Е., Эмде Ф., Леш Ф. Специальные функции. М.: Наука, 1977.

Использование 

    real sfg8r_c (real *x, integer *ierr)

   Параметры
x - заданное значение аргумента, x ≠ - 1, - 2, ... (тип: вещественный);
ierr - целая переменная, служащая для сообщения об ошибках; при этом:
ierr=65 - когда заданное значение аргумента x равно целому отрицательному числу; в этом случае значение sfg8r_c полагается равным наибольшему положительному вещественному числу, представимому на используемой машине. 
   Версии
sfg8d_c - вычисление логарифмической производной ψ (1 + x) гамма - функции в режиме удвоенной точности; при этом параметр x должен иметь тип double. 
   Вызываемые подпрограммы:  нет 
   Замечания по использованию:  нет

Пример использования 

int main(void)
{
    /* Local variables */
    static int ierr;
    extern float sfg8r_c(float *, int *);
    static float x, y;

    x = 0.f;
    y = (float)sfg8r_c(&x, &ierr);

    printf("\n %16.7e \n", y);
    printf("\n %5i \n", ierr);
    return 0;
} /* main */


Результаты:

       ierr = 0, 
       y = -0.5772157