Текст подпрограммы и версий
sf30r_c.zip  sf30d_c.zip  		Тексты тестовых примеров
tsf30r_c.zip  tsf30d_c.zip 

Функция:  sf30r_c

Назначение

Вычисление значений интегрального синуса.

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

Функция sf30r_c вычисляет значения интегрального синуса 

                   x
     Si (x) = ∫ sin t / t dt
                 0

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

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

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

    real sf30r_c (real *x)

   Параметры
x - заданное значение аргумента  x (тип: вещественный). 
   Версии
sf30d_c - вычисление значений интегрального синуса c повышенной точностью. 
   Вызываемые подпрограммы:  нет 
   Замечания по использованию
  Для функции sf30d_c параметр x имеет тип double.

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

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

    x = 3.14159265359f;
    y = (float)sf30r_c(&x);

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


Результат:
         y = 1.851937052001