Текст подпрограммы и версий ( Фортран ) sf79r.zip |
Тексты тестовых примеров ( Фортран ) tsf79r.zip |
Текст подпрограммы и версий ( Си ) sf79r_c.zip |
Тексты тестовых примеров ( Си ) tsf79r_c.zip |
Текст подпрограммы и версий ( Паскаль ) sf79r_p.zip |
Тексты тестовых примеров ( Паскаль ) tsf79r_p.zip |
Вычисление обратной функции распределения вероятностей Коши.
SF79R вычисляет значение x такое, что F (X, λ ,A) = P, где F (Х, λ, А) - функция распределения Коши:
x F(X, λ, A) = 1/πλ ∫ dz / (λ2 + (A - Z)2) , λ > 0 -∞
Справочник по специальным функциям. Под ред. M.Абрамовица, И.Стеган. M.: "Hаука", 1979.
SUBROUTINE SF79R (P, RL, A, X, IERR)
Параметры
P - | заданное значение аргумента (тип: вещественный); |
RL, A - | параметры λ, A распределения Коши (тип: вещественный); |
X - | вещественная переменная, содержащая вычисленное значение функции; |
IERR - | целая переменная, служащая для сообщения об ошибках, при этом: |
IERR=65 - | когда λ ≤ 0; |
IERR=66 - | когда P < 0 либо P > 1; значение x в обоих случаях полагается равным нулю. |
Версии: нет
Вызываемые подпрограммы
UTSF16 - | подпрограмма выдачи диагностических сообщений при работе подпрограммы SF79R. |
Замечания по использованию: нет
CALL SF79R (0.5, 1.0, 1.0, X, IERR) Результаты: X = 1.000 000 000 005 , IERR = 0