summaryrefslogtreecommitdiff
path: root/29/CH3/EX3.2.7
diff options
context:
space:
mode:
Diffstat (limited to '29/CH3/EX3.2.7')
-rwxr-xr-x29/CH3/EX3.2.7/exa3_2_7.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/29/CH3/EX3.2.7/exa3_2_7.sce b/29/CH3/EX3.2.7/exa3_2_7.sce
new file mode 100755
index 000000000..3a0a45c95
--- /dev/null
+++ b/29/CH3/EX3.2.7/exa3_2_7.sce
@@ -0,0 +1,21 @@
+//Caption:transfer_function
+// example 3.2.7
+//page 39
+// we have defined parallel and series function which we are going to use here
+//exec parallel.sce;
+//exec series.sce;
+syms G1 G2 G3 H1 H2;
+//shift the take off point placed before G2 to after block G2
+a=G2*H1;
+//shift the take off point placed before G2 to after block G1 and shift the summing point before block G2 to before block G2
+//interchange consecutive summing point and shift the take off point placed before H2 to after block H2
+b=G2*H2;
+c=b*H1;
+d=parallel(G3,G2);
+e=1/.b
+f=series(d,e);
+g=G1/.a
+h=series(g,f);
+y=h/(1-h*c);
+y=simple (y);
+disp(y,"C(s)/R(s)=") \ No newline at end of file