diff options
Diffstat (limited to '3432/CH2/EX2.5.b/Ex2_5.sce')
-rw-r--r-- | 3432/CH2/EX2.5.b/Ex2_5.sce | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/3432/CH2/EX2.5.b/Ex2_5.sce b/3432/CH2/EX2.5.b/Ex2_5.sce new file mode 100644 index 000000000..b4b48e386 --- /dev/null +++ b/3432/CH2/EX2.5.b/Ex2_5.sce @@ -0,0 +1,30 @@ +//Example 2.5
+//(b) step response of pendulum
+
+xdel(winsid())//close all graphics Windows
+clear;
+clc;
+
+//------------------------------------------------------------------
+//Pendulum parameters
+m=0.5;
+l=1;
+g=9.81;
+
+// Transfer function
+s=%s;
+sys=syslin('c',(1/(m*l^2))/(s^2+g/l));
+
+//step response to u=500;
+t=0:0.02:10;
+theta=csim('step',t,sys);
+plot(t,theta*57.3);
+
+//Title, labels and grid to the figure
+exec .\fig_settings.sci; // custom script to set figure properties
+title('Response of pendulum to a step input in the applied torque',...
+'fontsize',3);
+xlabel('Time t (sec.)','fontsize',2);
+ylabel('Pendulum angle (degree)','fontsize',2);
+
+//------------------------------------------------------------------
|