|
Текст подпрограммы и версий ( Фортран ) pa16c.zip pa16p.zip |
Тексты тестовых примеров ( Фортран ) tpa16c.zip tpa16p.zip |
|
Текст подпрограммы и версий ( Си ) pa16c_c.zip pa16p_c.zip |
Тексты тестовых примеров ( Си ) tpa16c_c.zip tpa16p_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) pa16c_p.zip pa16z_p.zip |
Тексты тестовых примеров ( Паскаль ) tpa16c_p.zip tpa16z_p.zip |
Возведение комплексного числа в комплексную степень.
Подпрограмма PA16C выполняет возведение заданного комплексного числа a + i b в комплексную степень c + i d по формуле
x + i y = ( a + i b )c + id = ecr - dp ( cos v + i sin v ) ,
где v = cq + dr ,
r = ln (a2 + b2)1/2 ,
q = arctg (b/a) .
SUBROUTINE PA16C (A, B, C, D, X, Y)
Параметры
| A, B - | вещественная и мнимая части заданного комплексного числа a + ib (тип: вещественный); |
| C, D - | вещественная и мнимая части заданной комплексной степени c + id, в которую необходимо возвести число a + ib (тип: вещественный); |
| X, Y - | вещественные переменные, значения которых на выходе полагаются равными вещественной и мнимой частям числа (a + ib) c + id . |
Версии
| PA16P - | возведение комплексного числа в комплексную степень в режиме удвоенной точности; при этом параметры A, B, C, D, X и Y должны иметь тип DOUBLE PRECISION. |
Вызываемые подпрограммы
|
PA02R - PA02D | вычисление модуля комплексного числа в режимах одинарной и удвоенной точности; используются в подпрограммах PA16C и PA16P соответственно. |
Замечания по использованию: нет
A = 2.0
B = 1.0
C = 1.0
D = -1.0
CALL PA16C (A, B, C, D, X, Y)
Результаты:
X = 3.35026
Y = -1.18915