|
Текст подпрограммы и версий ( Фортран ) zp61r.zip zp61d.zip |
Тексты тестовых примеров ( Фортран ) tzp61r.zip tzp61d.zip |
|
Текст подпрограммы и версий ( Си ) zp61r_c.zip zp61d_c.zip |
Тексты тестовых примеров ( Си ) tzp61r_c.zip tzp61d_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) zp61r_p.zip zp61e_p.zip |
Тексты тестовых примеров ( Паскаль ) tzp61r_p.zip tzp61e_p.zip |
Вычисление значений присоединенного полинома Лежандра первого рода от мнимых аргументов
Подпрограмма - функция ZP61R вычисляет значения полинома Лежандра первого рода от мнимых аргументов i x :
dm Pn ( i x )
Pnm ( i x ) = ( ( i x )2 - 1 )m/2 ------------------- ,
dxm
где 1 dn
Pn ( i x ) = --------- ------------ ( ( i x )2 - 1 )n -
2n n! dxn
- полином Лежандра первого рода n-ой степени
Абрамовиц М., Стиган И. Справочник по специальным функциям. М.: Наука, 1979
FUNCTION ZP61R (M, N, X)
Параметры
| M, N - | заданные значения m и n (тип: целый); |
| X - | заданное значение мнимого аргумента (тип: вещественный) |
Версии
| ZP61D - | вычисление значений присоединенного полинома Лежандра первого рода от мнимых аргументов в режиме удвоенной точности; при этом параметр X должен иметь тип DOUBLE PRECISION |
Вызываемые подпрограммы: нет
Замечания по использованию: нет
M = 3
N = 4
X = 0.3
Y = ZP61R (M, N, X)
Результат: Y = 35.8468