diff options
Diffstat (limited to '3432/CH6/EX6.6')
-rw-r--r-- | 3432/CH6/EX6.6/Ex6_6.sce | 30 | ||||
-rw-r--r-- | 3432/CH6/EX6.6/Ex6_6_f0.pdf | bin | 0 -> 38639 bytes |
2 files changed, 30 insertions, 0 deletions
diff --git a/3432/CH6/EX6.6/Ex6_6.sce b/3432/CH6/EX6.6/Ex6_6.sce new file mode 100644 index 000000000..a70ab9c7a --- /dev/null +++ b/3432/CH6/EX6.6/Ex6_6.sce @@ -0,0 +1,30 @@ +//Example 6.6
+//Bode Plot for Complex Poles and Zeros:
+//Satellite with Flexible appendages.
+
+xdel(winsid())//close all graphics Windows
+clear;
+clc;
+//------------------------------------------------------------------
+//System transfer function and its bode plot
+K=0.01;
+s=poly(0,'s');
+NumG=K*(s^2+0.01*s+1);
+DenG=s^2*((s^2/4)+0.02*(s/2)+1)
+sysG=syslin('c',NumG/DenG);
+
+fmin=0.09/2/%pi; //mininmum frq. in Hz for response (0.1 rad/sec)
+fmax=11/2/%pi; //maximum frq. in Hz for response (100 read/sec)
+//------------------------------------------------------------------
+//Bode plot for frequency in Hz (scilab ver. 5.4.1)
+//bode(g,fmin,fmax);
+//OR
+//Bode plot for frequency in rad/sec (scilab ver. 5.5.1)
+bode(sysG,fmin,fmax,0.01,"rad")
+
+//------------------------------------------------------------------
+title(["Bode plot for a transfer function with complex...
+poles and zeros"; "(a) magnitude (b) phase"],'fontsize',3)
+//------------------------------------------------------------------
+
+disp('NOTE : Result of the above example can be verified by checking the figures shown in example 6.5')
diff --git a/3432/CH6/EX6.6/Ex6_6_f0.pdf b/3432/CH6/EX6.6/Ex6_6_f0.pdf Binary files differnew file mode 100644 index 000000000..9e2dc1595 --- /dev/null +++ b/3432/CH6/EX6.6/Ex6_6_f0.pdf |