|
Текст подпрограммы и версий ( Фортран ) sf30r.zip sf30d.zip |
Тексты тестовых примеров ( Фортран ) tsf30r.zip tsf30d.zip |
|
Текст подпрограммы и версий ( Си ) sf30r_c.zip sf30d_c.zip |
Тексты тестовых примеров ( Си ) tsf30r_c.zip tsf30d_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) sf30r_p.zip , sf30e_p.zip |
Тексты тестовых примеров ( Паскаль ) tsf30r_p.zip , tsf30e_p.zip |
Вычисление значений интегрального синуса.
Функция SF30R вычисляет значения интегрального синуса
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 FUNCTION SF30R (X)
Параметры
| X - | заданное значение аргумента x (тип: вещественный). |
Версии
| SF30D - | вычисление значений интегрального синуса c повышенной точностью. |
Вызываемые подпрограммы: нет
Замечания по использованию
| Для функции SF30D параметр X имеет тип DOUBLE PRECISION. |
X = 3.14159265359
Y = SF30R (X)
Результат:
Y = 1.851937052001