examp50.m

ADSP TOOLBOX: Version 2.0 and gui m-files

clc,echo on 
%EXAMPLE 50 
n=0:8; x=tri((n-4)/4);
F=-2:0.01:1.99; W=2*pi*F;
X=freqz(x,[1 zeros(1,8)],W); 
G=freqz(conv(x,x),[1 zeros(1,16)],W);
H=freqz(x.*x,[1 zeros(1,8)],W);
plot(F,abs(X)),grid,pause(2)
plot(F,abs(X).^2,F,abs(G),':'),grid,pause(2)
Yp=convp(X,X)/length(X);
plot(F,abs(Yp),F,abs(H),':'),grid
echo off %end of example