From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3432/CH7/EX7.2.b/Ex7_2.sce | 36 ++++++++++++++++++++++++++++++++++++
 1 file changed, 36 insertions(+)
 create mode 100644 3432/CH7/EX7.2.b/Ex7_2.sce

(limited to '3432/CH7/EX7.2.b/Ex7_2.sce')

diff --git a/3432/CH7/EX7.2.b/Ex7_2.sce b/3432/CH7/EX7.2.b/Ex7_2.sce
new file mode 100644
index 000000000..3cffa9bfa
--- /dev/null
+++ b/3432/CH7/EX7.2.b/Ex7_2.sce
@@ -0,0 +1,36 @@
+//Example 7.2
+//Cruise control system step response.
+
+xdel(winsid())//close all graphics Windows
+clear;
+clc;
+clc;
+//------------------------------------------------------------------
+//Cruise control system parameters
+m=1000;
+b=50;
+u=500;
+
+// Transfer function
+s=%s; // or 
+s=poly(0,'s');
+sys1=syslin('c',(1/m)/(s+b/m));
+disp(sys1)
+//------------------------------------------------------------------
+F=[0 1; 0 -b/m];
+G=[0;1/m];
+H=[0 1];
+J=0;
+sys=syslin('c',F,G,H,J);
+//------------------------------------------------------------------
+//step response to u=500;
+t=0:0.5:100;
+v=csim('step',t,u*sys);
+plot(t,v,2)
+
+//Title, labels and grid to the figure
+exec .\fig_settings.sci; // custom script for setting figure properties
+title('Responses of car velocity to a step in u','fontsize',3)
+xlabel('Time t (sec.)','fontsize',2)
+ylabel('Amplitude','fontsize',2)
+//------------------------------------------------------------------
-- 
cgit