|
Текст подпрограммы и версий sf24r_c.zip sf24d_c.zip |
Тексты тестовых примеров tsf24r_c.zip tsf24d_c.zip |
Вычисление функции Бесселя первого рода нулевого порядка J0 (x).
sf24r_c вычисляет функцию Бесселя первого рода нулевого порядка J0 (x) для вещественных значений x.
J.F.Hart, E.W.Cheney, C.L.Lawson et al, Computer Approximations, Wiley, New York, 1968.
real sf24r_c (real *x)
Параметры
| x - | заданное значение аргумента x (тип: вещественный). |
Версии
| sf24d_c - | вычисление функции Бесселя первого рода нулевого порядка J0 (x) с повышенной точностью. |
Вызываемые подпрограммы: нет
Замечания по использованию
|
Для функции sf24d_c параметр x имеет тип double. Если значение x меньше нуля, то вычисляется J0 ( | x | ). |
int main(void)
{
/* Local variables */
extern float sf24r_c(float *);
static float r__, x;
x = .5f;
r__ = (float)sf24r_c(&x);
printf("\n %16.7e %16.7e \n",x, r__);
return 0;
} /* main */
Результат:
r__ = 0.938469807240