Текст подпрограммы и версий zp42r_c.zip |
Тексты тестовых примеров tzp42r_c.zip |
Отыскание коэффициентов разложения заданного многочлена по многочленам Чебышева.
Пусть известны коэффициенты А = ( a1, a2, ..., aN ) разложения многочлена Р (Х) по степеням Х
N P(X) = ∑ ak X k -1 k =1
Подпрограмма вычисляет коэффициенты В = ( b1, b2, ..., bN ) разложения этого многочлена по многочленам Чебышева { Тk (Х) } :
N P(X) = ∑ bk Tk -1(X) k =1
int zp42r_c (real *a, real *b, real *c, integer *n)
Параметры
a - | вектор заданных коэффициентов разложения многочлена по степеням аргумента (тип: вещественный); |
b - | вектор искомых коэффициентов разложения многочлена по многочленам Чебышева (тип: вещественный); |
c - | рабочий вектор размерности n на (n + 1)/2 (тип: вещественный); |
n - | размерность векторов a и b (тип: целый). |
Версии: нет
Вызываемые подпрограммы: нет
Замечания по использованию: нет
int main(void) { /* Initialized data */ static float a[3] = { 0.f,1.f,2.f }; /* Local variables */ extern int zp42r_c(float *, float *, float *, int *); static float b[3], c__[6]; static int n; n = 3; zp42r_c(a, b, c__, &n); printf("\n %16.7e %16.7e %16.7e \n", b[0], b[1], b[2]); return 0; } /* main */ Результат: b = ( 1., 1., 1. )