|
Текст подпрограммы и версий ( Фортран ) sf25r.zip sf25d.zip |
Тексты тестовых примеров ( Фортран ) tsf25r.zip tsf25d.zip |
|
Текст подпрограммы и версий ( Си ) sf25r_c.zip sf25d_c.zip |
Тексты тестовых примеров ( Си ) tsf25r_c.zip tsf25d_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) sf25r_p.zip , sf25e_p.zip |
Тексты тестовых примеров ( Паскаль ) tsf25r_p.zip , tsf25e_p.zip |
Вычисление функции Бесселя первого рода первого порядка J1 (x).
SF25R вычисляет функцию Бесселя первого рода первого порядка J1 (x) для вещественных значений x.
J.F.Hart, E.W.Cheney, C.L.Lawson et al, Computer Approximations, Wiley, New York, 1968.
REAL FUNCTION SF25R (X)
Параметры
| X - | заданное значение аргумента x (тип: вещественный). |
Версии
| SF25D - | вычисление функции Бесселя первого рода первого порядка J1 (x) с повышенной точностью. |
Вызываемые подпрограммы: нет
Замечания по использованию
|
Для функции SF25D параметр X имеет тип DOUBLE PRECISION. Если значение X меньше нуля, то вычисляется J1 ( | x | ). |
X = 0.5
Y = SF25R (X)
Результат:
Y = 0.242268457674