function [ summa ] = polysum(p,q)
% polysum  laskee argumenttina annettujen 
% polynomivektorien summan
%  Kutsu:
%  S=polysum(p,q);

np=length(p);
nq=length(q);
m=max(np,nq);
S=zeros(2,m);
S(1,m-np+1:end)=p;
S(2,m-nq+1:end)=q;
summa=sum(S);
end

