|
Текст подпрограммы и версий ( Фортран ) sf72r.zip |
Тексты тестовых примеров ( Фортран ) tsf72r.zip |
|
Текст подпрограммы и версий ( Си ) sf72r_c.zip |
Тексты тестовых примеров ( Си ) tsf72r_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) sf72r_p.zip |
Тексты тестовых примеров ( Паскаль ) tsf72r_p.zip |
Вычисление обратной функции двойного показательного распределения вероятностей.
SF72R вычисляет значение x такое, что F (x, λ, A) = Р, где F (x, λ, A) - функция двойного показательного распределения вероятностей:
x
F (x, λ, A) = λ/2 ∫ e - λ |z - A| dz , λ > 0
-∞
Справочник по специальным функциям. Под ред. M.Абрамовица, И.Стеган. M.: "Hаука", 1979.
SUBROUTINE SF72R (P, RL, A, X, IERR)
Параметры
| P - | заданное значение аргумента (тип: вещественный); |
| RL, A - | параметры λ, A обратной функции двойного показательного распределения (тип: вещественный); |
| X - | вещественная переменная, содержащая вычисленное значение функции; |
| IERR - | целая переменная, служащая для сообщения об ошибках; при этом: |
| IERR=65 - | когда λ ≤ 0; |
| IERR=66 - | когда P < 0 либо P > 1; |
| значение X в обоих случаях полагается равным нулю. |
Версии: нет
Вызываемые подпрограммы
| UTSF16 - | подпрограмма выдачи диагностических сообщений при работе подпрограммы SF72R. |
Замечания по использованию: нет
CALL SF72R (0.5, 1.0, 0.0, X, IERR) Результаты: X = 0.0 , IERR = 0