clear;
iter = 5;
wav = 'db2';
%wav = 'morl';
[phi,psi,xval] = wavefun(wav,iter);
pole=zeros(1,500)
pole(1:97)=phi(1:97)
figure
%plot( xval,psi,'red');
hold on
for i=0:10
pole(1+(i*32):97+(i*32))= pole(1+(i*32):97+(i*32)) + (1-0.5*(i+1)) * phi(1:97)
end
plot (pole(100:300))