examp63.m

ADSP TOOLBOX: Version 2.0 and gui m-files

clc,echo on 
%EXAMPLE 63 
A=[1 20];fp=[1500 3500];
fs=[1000 4000];S=10000;
[n1, d1] = dfdiir('bw','bp','bili',A,S,fp,fs);      % Bilinear
[n2, d2] = dfdiir('c1','bp','impu',A,S,fp,fs);      % Impulse invariant
[n3, d3] = dfdiir('el','bp','matc',A,S,fp,fs);      % Matched z
F=0:0.005:0.5;w=2*pi*F; f=10000*F;                  % Frequency array
h1=freqz(n1,d1,w);h2=freqz(n2,d2,w);h3=freqz(n3,d3,w); 
plot(f,abs([h1;h2;h3])),grid                        % Plot spectrum
echo off %end of example