demoas.m

AFD - Advanced Filter Design using MATLABMiroslav D. Lutovac, Dejan V. Tosicversion 1.00 released 15

clear all; close all
fig1 = figure;

echo off
speca = [3.000,  3.225,  0.2,   40];
dstable = ...
[8  1.0428  1.0832  7.5786e-2   0.21709  2.9772  3.0925
 9  1.0220  1.0981  1.8469e-2   0.21709  2.9370  3.1556
10  1.0114  1.1201  3.6867e-3   0.21709  2.8791  3.1888
11  1.0059  1.1517  5.7868e-4   0.21709  2.8002  3.2062
12  1.0030  1.1966  6.7599e-5   0.21709  2.6951  3.2152
13  1.0016  1.2616  5.3913e-6   0.21709  2.5563  3.2199
14  1.0008  1.3595  2.5331e-7   0.21709  2.3722  3.2224
15  1.0004  1.5191  5.2851e-9   0.21709  2.1229  3.2236
16  1.0002  1.8222  2.5187e-11  0.21709  1.7698  3.2243];

Nmin = min(dstable(:,1));
Nmax = max(dstable(:,1));
Nlength = length(dstable(:,1));
Nindex = 0;
Xmin = min(dstable(:,2));
Xmax = max(dstable(:,3));
Emin = min(dstable(:,4));
Emax = max(dstable(:,5));
FPmin = min(dstable(:,6));
FPmax = max(dstable(:,7));

Xmin1 = dstable(1,2);
Xmax1 = dstable(1,3);
Emin1 = dstable(1,4);
Emax1 = dstable(1,5);
FPmin1 = dstable(1,6);
FPmax1 = dstable(1,7);

cubeaxis = [1, Xmax*1.01, 0, Emax*1.01, FPmin*0.99, FPmax*1.01];
caseaxis = [Xmin1*0.99, Xmax1, 0, Emax1*1.01, FPmin1, FPmax1];

initview = [-40,30];
cubeview = initview;
caseview = [-20 40];
set(fig1, 'Name', 'Advanced Filter Design Analog Space', 'NumberTitle', 'off')

Nindex=afdscubp(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(3)
Nindex=afdscubp(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(1)
Nindex=afdscubp(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(1)
Nindex=afdscubp(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(1)
grid;pause(3)
grid;pause(3)
Nindex=afdscubm(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(1),clf
Nindex=afdscubm(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(1),clf
Nindex=afdscubm(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(1),clf
afdscube(dstable); cubeview=initview; view(cubeview); axis(cubeaxis);pause(3), clf
Nindex=afdscubm(dstable,Nindex,Nlength);cubeview=initview;view(cubeview);axis(cubeaxis);pause(3)
cubeview=cubeview+[10 0];  view(cubeview);pause(3)
cubeview=cubeview+[10 0];  view(cubeview);pause(1)
cubeview=cubeview+[10 0];  view(cubeview);pause(1)
cubeview=cubeview+[10 0];  view(cubeview);pause(3)
cubeview=cubeview+[-10 0]; view(cubeview);pause(1)
cubeview=cubeview+[-10 0]; view(cubeview);pause(1)
cubeview=cubeview+[-10 0]; view(cubeview);pause(1)
cubeview=cubeview+[-10 0]; view(cubeview);pause(3)
cubeview=cubeview+[0 -10]; view(cubeview);pause(1)
cubeview=cubeview+[0 -10]; view(cubeview);pause(1)
cubeview=cubeview+[0 -10]; view(cubeview);pause(3)
cubeview=cubeview+[0 10];  view(cubeview);pause(1)
cubeview=cubeview+[0 10];  view(cubeview);pause(1)
cubeview=cubeview+[0 10];  view(cubeview);pause(3)
afdspla1;pause(3)
afdspla2;pause(3)
afdspla3;pause(3)
view(2);pause(3)
cubeview=initview; view(cubeview);pause(3)
afdscase(dstable,speca);cubeview=caseview;view(cubeview);axis(caseaxis);pause(5), clf
echo off
disp(' ')
disp(' ')
disp(' Invoke this toolbox by executing')
disp('                         afdspace')
disp('---------------------------------')
disp(' ')
disp(' ')
afdspace