diff options
| author | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
| commit | 7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch) | |
| tree | 449d555969bfd7befe906877abab098c6e63a0e8 /3889/CH7/EX7.3/Ex7_3.sce | |
| parent | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff) | |
| download | Scilab-TBC-Uploads-master.tar.gz Scilab-TBC-Uploads-master.tar.bz2 Scilab-TBC-Uploads-master.zip | |
Diffstat (limited to '3889/CH7/EX7.3/Ex7_3.sce')
| -rw-r--r-- | 3889/CH7/EX7.3/Ex7_3.sce | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/3889/CH7/EX7.3/Ex7_3.sce b/3889/CH7/EX7.3/Ex7_3.sce new file mode 100644 index 000000000..ddc6c19ed --- /dev/null +++ b/3889/CH7/EX7.3/Ex7_3.sce @@ -0,0 +1,31 @@ +//Example 7.3
+//page 432
+//Control Systems: Principles and Design
+//M Gopal, Second Edition, Tata McGraw-Hill
+//Chapter:Compensator Design Using Root Locus
+
+xdel(winsid())//close all graphics Windows
+clear;
+clc;
+//transfer function
+s=%s;
+P=1/((s)*(s+1)*(s+2));
+
+//Root locus plot using evans root locus
+f=figure()
+evans(P)
+title("Root locus of 1/(s*(s+1)*(s+2)",'fontsize',5)
+h=legend('');
+h.visible="OFF"
+zoom_rect([-2 -1.5 2 1.5]*kpure(P)/3)
+a=gca();
+a.x_location="origin"
+a.y_location="origin"
+a.parent.background=8;
+legends(['root locus';'';'asymptotic directions';'open loop poles'],[2,3,1,-2],with_box=%f,opt="ur",2.8)
+sgrid();
+K=poly(0,'K')
+R= routh_t(P,K);
+disp(R,'Routh Array=')
+kval= kpure(P)
+disp(kval,'Limiting Gain Kmax=')
|