История изменений
Исправление
dikiy,
(текущая версия)
:
это мои потуги реализовать то, что я описал в прошлом треде на maple. При это f инициализируется так:
N:=7; unassign('f'); f:=[];
for j from 1 to N do
f:=[op(f), unapply(orthopoly[H](j,t),t)];
end do:
Исходная версия
dikiy,
:
это мои потуги реализовать то, что я описал в прошлом треде на maple. При это f инициализируется так:
[code]
N:=7; unassign('f'); f:=[];
for j from 1 to N do
f:=[op(f), unapply(orthopoly[H](j,t),t)];
end do:
[/code]