1 files changed, 16 insertions, 0 deletions
diff --git a/1499/CH5/EX5.22/s22.sce b/1499/CH5/EX5.22/s22.sce
new file mode 100644
index 000000000..7b6388f49
--- /dev/null
+++ b/1499/CH5/EX5.22/s22.sce
@@ -0,0 +1,16 @@
+s=%s;
+
+g=(5/(s*(s+1)*(s^0.2+2*s+5)));
+
+G=syslin('c',g)
+fmin=0.01;
+fmax=100;
+bode(G,fmin,fmax)
+show_margins(G)
+xtitle("uncompensated system")
+[gm,freqGM]=g_margin(G)
+[pm,freqPM]=p_margin(G)
+disp(gm,"gain_margin=")
+disp((freqGM*2*%pi),"gain margin freq=");
+disp(pm,"phase margin=")
+disp((freqPM*2*%pi),"phase margin freq=");