blob: bb07bfd75aade92d2f893d89ea268a162995972e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
//there is a pole at the origin and contribution of gain k
k=10^(14/20) //20*log(k)=14
disp("equation of starting line is y=-20*log(w)+14")
wc1=10^(0)
disp(wc1,"hence at wc1, 14=-20*log(wc1)+14. that is wc1 = ")
y1=poly([1 1/wc1],'s','coeff')
disp("equation of next line is y=-40*log(w)+14")
wc2=10^(40/40) //-40*log(wc2)=-40
disp(wc2,"wc2=")
y2=poly([1 1/wc2],'s','coeff')
wc3=50 //given
y3=poly([1 1/wc3],'s','coeff')
TF= k*(y2)/((y1)*(y3))
disp(TF,"transfer function = ")
|
