Текст подпрограммы и версий ( Фортран )
sf24r.zip  sf24d.zip 
Тексты тестовых примеров ( Фортран )
tsf24r.zip  tsf24d.zip 
Текст подпрограммы и версий ( Си )
sf24r_c.zip  sf24d_c.zip 
Тексты тестовых примеров ( Си )
tsf24r_c.zip  tsf24d_c.zip 
Текст подпрограммы и версий ( Паскаль )
sf24r_p.zip , sf24e_p.zip
Тексты тестовых примеров ( Паскаль )
tsf24r_p.zip , tsf24e_p.zip

Функция:  SF24R

Назначение

Вычисление функции Бесселя первого рода нулевого порядка   J0 (x).

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

SF24R вычисляет функцию Бесселя первого рода нулевого порядка  J0 (x) для вещественных значений  x.

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

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

    REAL  FUNCTION  SF24R (X) 

Параметры

X - заданное значение аргумента x (тип: вещественный).

Версии

SF24D - вычисление функции Бесселя первого рода нулевого порядка J0 (x) с повышенной точностью.

Вызываемые подпрограммы: нет

Замечания по использованию

 

Для функции SF24D параметр X имеет тип DOUBLE PRECISION.

Если значение X меньше нуля, то вычисляется   J0 ( | X | ).

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

         X = 0.5
         Y = SF24R (X)

Результат:

       Y  =  0.938469807240