Текст подпрограммы и версий
sf21r_c.zip  		Тексты тестовых примеров
tsf21r_c.zip 

Функция:  sf21r_c

Назначение

Вычисление значений гамма-функции вещественного аргумента.

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

Функция sf21r_c вычисляет значения гамма-функции 

                   ∞
     Г (x)  =  ∫ t x - 1 e - t dt
                   0

для вещественных значений аргумента  x.

J.F.Hart, E.W.Cheney, C.L.Lawson et al, Computer Approximations, Wiley, New York, 1968.

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

    real sf21r_c (real *x, integer *ierr)

   Параметры
x - заданное значение аргумента x (тип: вещественный);
ierr - целая переменная, служащая для сообщения об ошибках, обнаруженных в ходе работы функции; при этом:
ierr=65 - когда значение аргумента pавно нулю или целому отрицательному числу; значение функции полагается равным 3.4e38;
ierr=66 - если значение аргумента больше чем 21.43; значение функции полагается равным 3.4e38. 
   Версии:  нет 
   Вызываемые подпрограммы
utsf10_c - подпрограмма выдачи диагностических сообщений при работе функции sf21r_c. 
   Замечания по использованию:  нет

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

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

    x = 1.25f;
    y = (float)sf21r_c(&x, &ierr);

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


Результаты:

       y  =  0.906402477054,    ierr  =  0