summaryrefslogtreecommitdiff
path: root/52/CH5/EX5.8/Example5_8.sce
blob: f4480f66bcf40d74fe4d139b734ef0514ecaa974 (plain)
1
2
3
4
5
6
7
8
9
10
11
//Example 5.8
//To Find out the order of the poles of the Type 1 Lowpass Chebyshev Filter
clear;
clc ;
close ;
ap=1;//dB
as=40;//dB
op=1000*%pi;
os=2000*%pi;
N=acosh(sqrt((10^(0.1*as)-1)/(10^(0.1*ap)-1)))/acosh(os/op);
disp(ceil(N),'Order of the filter, N =');