Текст подпрограммы и версий
zp61r_c.zip  zp61d_c.zip 
Тексты тестовых примеров
tzp61r_c.zip  tzp61d_c.zip 

Функция:  zp61r_c

Назначение

Вычисление значений присоединенного полинома Лежандра первого рода от мнимых аргументов.

Математическое описание

Подпрограмма - функция zp61r_c вычисляет значения полинома Лежандра первого рода от мнимых аргументов  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.

Использование

    real zp61r_c (integer *m, integer *n, real *x)

Параметры

m, n - заданные значения  m  и  n  (тип: целый);
x - заданное значение мнимого аргумента (тип: вещественный).

Версии

zp61d_c - вычисление значений присоединенного полинома Лежандра первого рода от мнимых аргументов в режиме удвоенной точности; при этом параметр x должен иметь тип double .

Вызываемые подпрограммы: нет

Замечания по использованию: нет

Пример использования

int main(void)
{
    /* Local variables */
    extern float zp61r_c(int *, int *, float *);
    static int m, n;
    static float x, y;

    m = 3;
    n = 4;
    x = .3f;
    y = (float)zp61r_c(&m, &n, &x);

    printf("\n %16.7e \n", y);
    return 0;
} /* main */


Результат:           y = 35.8468