diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1499/CH5 | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '1499/CH5')
48 files changed, 306 insertions, 0 deletions
diff --git a/1499/CH5/EX5.1.1/q1.png b/1499/CH5/EX5.1.1/q1.png Binary files differnew file mode 100644 index 000000000..4554130c0 --- /dev/null +++ b/1499/CH5/EX5.1.1/q1.png diff --git a/1499/CH5/EX5.1.1/q1.sce b/1499/CH5/EX5.1.1/q1.sce new file mode 100644 index 000000000..5d1216950 --- /dev/null +++ b/1499/CH5/EX5.1.1/q1.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(1/(s^2+2*s+4));
+
+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=");
diff --git a/1499/CH5/EX5.1/q1.png b/1499/CH5/EX5.1/q1.png Binary files differnew file mode 100644 index 000000000..d535312c8 --- /dev/null +++ b/1499/CH5/EX5.1/q1.png diff --git a/1499/CH5/EX5.1/q1.sce b/1499/CH5/EX5.1/q1.sce new file mode 100644 index 000000000..36a06ff0b --- /dev/null +++ b/1499/CH5/EX5.1/q1.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(1/(1+2*s));
+
+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=");
diff --git a/1499/CH5/EX5.10/s10.jpeg b/1499/CH5/EX5.10/s10.jpeg Binary files differnew file mode 100644 index 000000000..05a0c27da --- /dev/null +++ b/1499/CH5/EX5.10/s10.jpeg diff --git a/1499/CH5/EX5.10/s10.sce b/1499/CH5/EX5.10/s10.sce new file mode 100644 index 000000000..0829b715a --- /dev/null +++ b/1499/CH5/EX5.10/s10.sce @@ -0,0 +1,8 @@ +syms K
+H=syslin('c',(K/(s*((0.02*s)+1)*((0.04*s+1)))
+fmin=0.1;
+fmax=100;
+bode(H,fmin,fmax)
+show_margins(H)
+// for phase margin =30
+printf("From bode plot it can be seen that gain should be reduced by 4db")
diff --git a/1499/CH5/EX5.11/s11.jpeg b/1499/CH5/EX5.11/s11.jpeg Binary files differnew file mode 100644 index 000000000..e31e5a837 --- /dev/null +++ b/1499/CH5/EX5.11/s11.jpeg diff --git a/1499/CH5/EX5.11/s11.sce b/1499/CH5/EX5.11/s11.sce new file mode 100644 index 000000000..3ac596930 --- /dev/null +++ b/1499/CH5/EX5.11/s11.sce @@ -0,0 +1,18 @@ +s=%s;
+
+
+
+g=(100*(3+s)/(s*(s+2)*(s^2+4*s+100)));
+
+G=syslin('c',g)
+fmin=0.001;
+fmax=1000;
+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=");
diff --git a/1499/CH5/EX5.12/s12.png b/1499/CH5/EX5.12/s12.png Binary files differnew file mode 100644 index 000000000..0ab89dc12 --- /dev/null +++ b/1499/CH5/EX5.12/s12.png diff --git a/1499/CH5/EX5.12/s12.sce b/1499/CH5/EX5.12/s12.sce new file mode 100644 index 000000000..dc5a97e97 --- /dev/null +++ b/1499/CH5/EX5.12/s12.sce @@ -0,0 +1,18 @@ +s=%s;
+
+
+
+g=(1000*(1+0.2*s)/(s*(s*0.1+1)));
+
+G=syslin('c',g)
+fmin=0.001;
+fmax=1000;
+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=");
diff --git a/1499/CH5/EX5.13/s13.jpeg b/1499/CH5/EX5.13/s13.jpeg Binary files differnew file mode 100644 index 000000000..6fb913840 --- /dev/null +++ b/1499/CH5/EX5.13/s13.jpeg diff --git a/1499/CH5/EX5.13/s13.sce b/1499/CH5/EX5.13/s13.sce new file mode 100644 index 000000000..be5e6204f --- /dev/null +++ b/1499/CH5/EX5.13/s13.sce @@ -0,0 +1,8 @@ +syms K
+H=syslin('c',(K*(s+20)/(s+1)*(s+2)*(s+10))
+fmin=0.1;
+fmax=100;
+bode(H,fmin,fmax)
+show_margins(H)
+// for phase margin =30
+printf("From bode plot it can be seen that gain should be reduced by 4db")
diff --git a/1499/CH5/EX5.18/s18.png b/1499/CH5/EX5.18/s18.png Binary files differnew file mode 100644 index 000000000..592d31834 --- /dev/null +++ b/1499/CH5/EX5.18/s18.png diff --git a/1499/CH5/EX5.18/s18.sce b/1499/CH5/EX5.18/s18.sce new file mode 100644 index 000000000..896d95355 --- /dev/null +++ b/1499/CH5/EX5.18/s18.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(0.5/(s*(s^2+s+1)));
+
+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=");
diff --git a/1499/CH5/EX5.20/s20.png b/1499/CH5/EX5.20/s20.png Binary files differnew file mode 100644 index 000000000..592d31834 --- /dev/null +++ b/1499/CH5/EX5.20/s20.png diff --git a/1499/CH5/EX5.20/s20.sce b/1499/CH5/EX5.20/s20.sce new file mode 100644 index 000000000..e0ac18b83 --- /dev/null +++ b/1499/CH5/EX5.20/s20.sce @@ -0,0 +1,18 @@ +s=%s;
+
+
+syms K
+h=syslin('c',(K/(s*(s+1)*(0.1*s+1))))
+
+H=syslin('c',h)
+fmin=0.001;
+fmax=1000;
+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=");
diff --git a/1499/CH5/EX5.22/s22.png b/1499/CH5/EX5.22/s22.png Binary files differnew file mode 100644 index 000000000..592d31834 --- /dev/null +++ b/1499/CH5/EX5.22/s22.png 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=");
diff --git a/1499/CH5/EX5.23/s23.png b/1499/CH5/EX5.23/s23.png Binary files differnew file mode 100644 index 000000000..4ef6f6948 --- /dev/null +++ b/1499/CH5/EX5.23/s23.png diff --git a/1499/CH5/EX5.23/s23.sce b/1499/CH5/EX5.23/s23.sce new file mode 100644 index 000000000..cabc7a2e6 --- /dev/null +++ b/1499/CH5/EX5.23/s23.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(10/(s*(0.01*s+1)*(0.1*s+1)));
+
+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=");
diff --git a/1499/CH5/EX5.29/s29.png b/1499/CH5/EX5.29/s29.png Binary files differnew file mode 100644 index 000000000..5fb9356b5 --- /dev/null +++ b/1499/CH5/EX5.29/s29.png diff --git a/1499/CH5/EX5.29/s29.sce b/1499/CH5/EX5.29/s29.sce new file mode 100644 index 000000000..b0b7c6136 --- /dev/null +++ b/1499/CH5/EX5.29/s29.sce @@ -0,0 +1,9 @@ +s=%s;
+H=syslin('c',1/((s+4)*(s+2)))
+nyquist(H)
+show_margins(H,'nyquist')
+printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
+printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
+printf("System is stable")
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.30/s30.png b/1499/CH5/EX5.30/s30.png Binary files differnew file mode 100644 index 000000000..9734414d1 --- /dev/null +++ b/1499/CH5/EX5.30/s30.png diff --git a/1499/CH5/EX5.30/s30.sce b/1499/CH5/EX5.30/s30.sce new file mode 100644 index 000000000..eac28c35d --- /dev/null +++ b/1499/CH5/EX5.30/s30.sce @@ -0,0 +1,9 @@ +s=%s;
+H=syslin('c',1/(s*(s+2)))
+nyquist(H)
+show_margins(H,'nyquist')
+printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
+printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
+printf("System is stable")
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.31/s31.png b/1499/CH5/EX5.31/s31.png Binary files differnew file mode 100644 index 000000000..88a2b900e --- /dev/null +++ b/1499/CH5/EX5.31/s31.png diff --git a/1499/CH5/EX5.31/s31.sce b/1499/CH5/EX5.31/s31.sce new file mode 100644 index 000000000..bda215bef --- /dev/null +++ b/1499/CH5/EX5.31/s31.sce @@ -0,0 +1,9 @@ +s=%s;
+H=syslin('c',1/(s*(s+1)*(1+2*s)))
+nyquist(H)
+show_margins(H,'nyquist')
+printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
+printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
+printf("System is stable")
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.32/s32.png b/1499/CH5/EX5.32/s32.png Binary files differnew file mode 100644 index 000000000..0e9849639 --- /dev/null +++ b/1499/CH5/EX5.32/s32.png diff --git a/1499/CH5/EX5.32/s32.sce b/1499/CH5/EX5.32/s32.sce new file mode 100644 index 000000000..b9f8ed5ae --- /dev/null +++ b/1499/CH5/EX5.32/s32.sce @@ -0,0 +1,9 @@ +s=%s;
+H=syslin('c',1/(s*(s+1)*(1+s)))
+nyquist(H)
+show_margins(H,'nyquist')
+printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
+printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
+printf("System is stable")
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.37/s37.png b/1499/CH5/EX5.37/s37.png Binary files differnew file mode 100644 index 000000000..383c9cf17 --- /dev/null +++ b/1499/CH5/EX5.37/s37.png diff --git a/1499/CH5/EX5.37/s37.sce b/1499/CH5/EX5.37/s37.sce new file mode 100644 index 000000000..b5d050f1b --- /dev/null +++ b/1499/CH5/EX5.37/s37.sce @@ -0,0 +1,8 @@ +s=%s;
+syms K
+H=syslin('c',K*(1+2*s)/(s*(s+1)*(s^2+s+1)))
+nyquist(H)
+show_margins(H,'nyquist')
+mtlb_axis([-1 1 -5 1])
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.39/s39.png b/1499/CH5/EX5.39/s39.png Binary files differnew file mode 100644 index 000000000..4ea10b2d8 --- /dev/null +++ b/1499/CH5/EX5.39/s39.png diff --git a/1499/CH5/EX5.39/s39.sce b/1499/CH5/EX5.39/s39.sce new file mode 100644 index 000000000..c61752cf5 --- /dev/null +++ b/1499/CH5/EX5.39/s39.sce @@ -0,0 +1,9 @@ +s=%s;
+syms k
+H=syslin('c',2/(s*(1-2*s)))
+// for K/2>-1 or K>-2
+nyquist(H)
+show_margins(H,'nyquist')
+printf("P=1(poles in RHP)")
+printf("N=0,hence Z=1")
+printf("Therefore,System is unstable")
diff --git a/1499/CH5/EX5.42/s42.png b/1499/CH5/EX5.42/s42.png Binary files differnew file mode 100644 index 000000000..27996a02b --- /dev/null +++ b/1499/CH5/EX5.42/s42.png diff --git a/1499/CH5/EX5.42/s42.sce b/1499/CH5/EX5.42/s42.sce new file mode 100644 index 000000000..11cd3e7c1 --- /dev/null +++ b/1499/CH5/EX5.42/s42.sce @@ -0,0 +1,8 @@ +s=%s;
+
+H=syslin('c',10/(s*(s+1)*(0.05*s+1)))
+nyquist(H)
+show_margins(H,'nyquist')
+mtlb_axis([-50 50 -50 50])
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.44/s44.png b/1499/CH5/EX5.44/s44.png Binary files differnew file mode 100644 index 000000000..805113148 --- /dev/null +++ b/1499/CH5/EX5.44/s44.png diff --git a/1499/CH5/EX5.44/s44.sce b/1499/CH5/EX5.44/s44.sce new file mode 100644 index 000000000..000b51224 --- /dev/null +++ b/1499/CH5/EX5.44/s44.sce @@ -0,0 +1,8 @@ +s=%s;
+syms K
+H=syslin('c',K*(1+s)/(1-s))
+nyquist(H)
+show_margins(H,'nyquist')
+mtlb_axis([-1 1 -5 1])
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.46/s46.png b/1499/CH5/EX5.46/s46.png Binary files differnew file mode 100644 index 000000000..8eb435f68 --- /dev/null +++ b/1499/CH5/EX5.46/s46.png diff --git a/1499/CH5/EX5.46/s46.sce b/1499/CH5/EX5.46/s46.sce new file mode 100644 index 000000000..ae065f460 --- /dev/null +++ b/1499/CH5/EX5.46/s46.sce @@ -0,0 +1,9 @@ +s=%s;
+H=syslin('c',40/((s+4)*(s^2+2*s+1)))
+nyquist(H)
+show_margins(H,'nyquist')
+printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
+printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
+printf("System is stable")
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.47/s47.png b/1499/CH5/EX5.47/s47.png Binary files differnew file mode 100644 index 000000000..f7f61bbdd --- /dev/null +++ b/1499/CH5/EX5.47/s47.png diff --git a/1499/CH5/EX5.47/s47.sce b/1499/CH5/EX5.47/s47.sce new file mode 100644 index 000000000..5ad3c4501 --- /dev/null +++ b/1499/CH5/EX5.47/s47.sce @@ -0,0 +1,9 @@ +s=%s;
+H=syslin('c',500/(s*(s+6)*(s+9)))
+nyquist(H)
+show_margins(H,'nyquist')
+printf("Since P=1 and the pt. -1+j0 is encircled once by the locus")
+printf("Hence N=1 therefore, Z=0(no of zeros in RHP)")
+printf("System is stable")
+gm=g_margin(H) // gain margin
+pm=p_margin(H) // phase margin
diff --git a/1499/CH5/EX5.6/q6.png b/1499/CH5/EX5.6/q6.png Binary files differnew file mode 100644 index 000000000..c52607947 --- /dev/null +++ b/1499/CH5/EX5.6/q6.png diff --git a/1499/CH5/EX5.6/q6.sce b/1499/CH5/EX5.6/q6.sce new file mode 100644 index 000000000..e1daf7555 --- /dev/null +++ b/1499/CH5/EX5.6/q6.sce @@ -0,0 +1,21 @@ +s=%s;
+syms K;
+g=(K/(s^2);
+// given K=10
+K=10;
+
+
+g=(5/(s^2));
+
+G=syslin('c',g)
+fmin=0.001;
+fmax=1000;
+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=");
diff --git a/1499/CH5/EX5.7/q7.png b/1499/CH5/EX5.7/q7.png Binary files differnew file mode 100644 index 000000000..0a42eb540 --- /dev/null +++ b/1499/CH5/EX5.7/q7.png diff --git a/1499/CH5/EX5.7/q7.sce b/1499/CH5/EX5.7/q7.sce new file mode 100644 index 000000000..62885fcff --- /dev/null +++ b/1499/CH5/EX5.7/q7.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(200*(s+10))/(s*(s+5)*(s+20));
+
+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=");
diff --git a/1499/CH5/EX5.8/q8.png b/1499/CH5/EX5.8/q8.png Binary files differnew file mode 100644 index 000000000..85b736dca --- /dev/null +++ b/1499/CH5/EX5.8/q8.png diff --git a/1499/CH5/EX5.8/q8.sce b/1499/CH5/EX5.8/q8.sce new file mode 100644 index 000000000..0d981b31c --- /dev/null +++ b/1499/CH5/EX5.8/q8.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(1*((s+3)^3));
+
+G=syslin('c',g)
+fmin=0.01;
+fmax=100;
+bode(G,fmin,fmax)
+show_margins(G)
+
+[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=");
diff --git a/1499/CH5/EX5.9/q9.sce b/1499/CH5/EX5.9/q9.sce new file mode 100644 index 000000000..582932558 --- /dev/null +++ b/1499/CH5/EX5.9/q9.sce @@ -0,0 +1,16 @@ +s=%s;
+
+g=(1/(s*((s*0.5)+1)*((s*0.1)+1)));
+
+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=");
diff --git a/1499/CH5/EX5.9/s9.jpeg b/1499/CH5/EX5.9/s9.jpeg Binary files differnew file mode 100644 index 000000000..671f93786 --- /dev/null +++ b/1499/CH5/EX5.9/s9.jpeg |
