examp65.m

ADSP TOOLBOX: Version 2.0 and gui m-files

clc,echo on 
%EXAMPLE 65 
[n, d]=lpp('c1', 3, 3)                     % Analog lowpass prototype (order=3)
S=10000;F=[2000 4000];FN=F/S;              % Frequency data
[NB, DB]=lp2iir('bp', 'a', n, d, 1, FN)    % Direct design for bilinear
[N2, D2]=s2zinvar(n, d, 1, 'i', 0);        % Digital LPP by impulse invariance
[NI, DI]=lp2iir('bp', 'd', N2, D2, 1, FN)  % Convert to required filter
echo off %end of example