|
Текст подпрограммы и версий ( Фортран ) zp41r.zip zp41d.zip |
Тексты тестовых примеров ( Фортран ) tzp41r.zip tzp41d.zip |
|
Текст подпрограммы и версий ( Си ) zp41r_c.zip |
Тексты тестовых примеров ( Си ) tzp41r_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) zp41r_p.zip zp41e_p.zip |
Тексты тестовых примеров ( Паскаль ) tzp41r_p.zip tzp41e_p.zip |
Восстановление коэффициентов многочлена, заданного разложением по многочленам Чебышева.
Пусть известны коэффициенты А = ( a1, a2, ..., aN ) разложения многочлена Р (Х) по многочленам Чебышева { Тk (Х) } :
N
P(X) = ∑ ak Tk -1(X)
k =1
Подпрограмма вычисляет коэффициенты В = ( b1, b2, ..., bN ) разложения этого многочлена по степеням Х:
N
P(X) = ∑ bk X k -1
k =1
SUBROUTINE ZP41R (A, B, N)
Параметры
| A - | вектор заданных коэффициентов разложения многочлена по многочленам Чебышева (тип: вещественный); |
| B - | вектор искомых коэффициентов разложения многочлена по степеням аргумента (тип: вещественный); |
| N - | размерность векторов А и В (тип: целый). |
Версии
| ZP41D - | восстановление коэффициентов многочлена, заданного разложением по многочленам Чебышева, для данных двойной точности. |
Вызываемые подпрограммы: нет
Замечания по использованию: нет
DIMENSION A(3), B(3)
DATA A(1), A(2), A(3) /3*1./
N = 3
CALL ZP41R (A, B, N)
Результат: В = ( 0., 1., 2. )