clear all;

%% FSDATA
p1 = pz(1);
p2 = pz(4, 20);
z1 = pz(20);
pzm1 = pzmodel(2.3, [p1 p2], z1);
r = resp(pzm1, plist('f1', 0.01, 'f2', 100, 'nf', 1000, 'scale', 'log'));

%% TSDATA
fs = 10;
nsecs = 1000;

ats = ao(plist('tsfcn', 'randn(size(t))', 'fs', fs, 'nsecs', nsecs));

%% CDATA

ac = ao(1:100);

%% SPECWIN
s = specwin('Hanning', 1000);

