|
Текст подпрограммы и версий sf45r_c.zip |
Тексты тестовых примеров tsf45r_c.zip |
Вычисление значений интегралов Френеля S(x) и C(x).
Подпрограма sf45r_c вычисляет значения интегралов Френеля
x
S(x) = 1/(2π)1/2 ∫ sin t / √t dt
0
x
C(x) = 1/(2π)1/2 ∫ cos t / √t dt
0
для вещественных значений аргумента x.
G.Nemeth, Chebyshev Expansions for Fresnel Integrals, Numer. Math., 7, 4, 1965.
int sf45r_c (real *x, real *c, real *s)
Параметры
| x - | заданное значение аргумента x (тип: вещественный); |
| c, s - | вещественные переменные, которым в результате pаботы подпрограммы присваиваются значения C (x) и S (x) соответственно. |
Версии: нет
Вызываемые подпрограммы: нет
Замечания по использованию
| B результате работы подпрограмы sf45r_c для x < 0 переменным c и s присваиваются значения C ( | x | ) и S ( | x | ) соответственно. |
int main(void)
{
/* Local variables */
extern int sf45r_c(float *, float *, float *);
static float s, x, y;
x = 13.f;
sf45r_c(&x, &y, &s);
printf("\n %16.7e %16.7e %16.7e \n",x,y,s);
return 0;
} /* main */
Результаты:
y = 0.542510411403
s = 0.39826772111