1 files changed, 14 insertions, 0 deletions
diff --git a/1151/CH4/EX4.21/example21.sce b/1151/CH4/EX4.21/example21.sce
new file mode 100755
index 000000000..962d7bcf0
--- /dev/null
+++ b/1151/CH4/EX4.21/example21.sce
@@ -0,0 +1,14 @@
+ // bode p l o t 
+s=%s;
+sys = syslin('c',10/(s*(0.2*s +1)*(0.05*s +1)))
+bode(sys)
+show_margins (sys ,'bode' )
+gm= g_margin (sys)
+pm= p_margin (sys)
+disp (gm ," g a in margin=")
+disp (pm ," phas e margin=")
+if (gm <=0 | pm <=0)
+printf (" system is unstable ")
+else
+printf (" system is stable ")
+end