|
Текст подпрограммы и версий sf71r_c.zip |
Тексты тестовых примеров tsf71r_c.zip |
Вычисление функции двойного показательного распределения вероятностей.
sf71r_c вычисляет вероятность P того, что случайная величина, имеющая двойное показательное распределение с параметрами λ, A, меньше или pавна значению x:
x
P = λ/2 ∫ e - λ |z - A| dz , λ > 0
-∞
Справочник по специальным функциям. Под ред. M.Абрамовица, И.Стеган, M., "Hаука", 1979.
int sf71r_c (real *x, real *rl, real *a, real *p,
integer *ierr)
Параметры
| x - | заданное значение аргумента (тип: вещественный); |
| rl, a - | параметры λ, A двойного показательного pаспределения (тип: вещественный); |
| p - | вещественная переменная, содержащая вычисленное значение вероятности; |
| ierr - | целая переменная, служащая для сообщения об ошибках; при этом: |
| ierr=65 - | когда λ ≤ 0; значение p полагается равным нулю. |
Версии: нет
Вызываемые подпрограммы
| utsf16_c - | подпрограмма выдачи диагностических сообщений при работе подпрограммы sf71r_c. |
Замечания по использованию: нет
int main(void)
{
/* Local variables */
extern int sf71r_c(float *, float *, float *, float *, int *);
static float p;
static int ierr;
static float c_b1 = -.5f;
static float c_b2 = 1.f;
static float c_b3 = 0.f;
sf71r_c(&c_b1, &c_b2, &c_b3, &p, &ierr);
printf("\n %16.7e %5i \n",p,ierr);
return 0;
} /* main */
Результаты: p = 0.3032653298574 , ierr = 0