summaryrefslogtreecommitdiff
path: root/29/CH7/EX7.17.18/exa7_17_18.sce
blob: e1e47b1991737450048ceb97bb9d0648d9930596 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//caption:gain_phase_plot
//example 7.17.18
//page 256
k=1; 
s=%s; 
G=syslin('c',k/(s*(0.5*s+1)*(0.25*s+1))); 
// freq range to plot 
fmin=0.1; 
fmax=7; 
black(G, fmin, fmax) 
xgrid 
xtitle('Gain phase plot')
disp("for GM=8 db, K=2.23") 
disp("for PM=20 deg. , K=2.69")