summaryrefslogtreecommitdiff
path: root/257/CH6/EX6.6
diff options
context:
space:
mode:
Diffstat (limited to '257/CH6/EX6.6')
-rw-r--r--257/CH6/EX6.6/example6_6.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/257/CH6/EX6.6/example6_6.sce b/257/CH6/EX6.6/example6_6.sce
new file mode 100644
index 000000000..539f0ae84
--- /dev/null
+++ b/257/CH6/EX6.6/example6_6.sce
@@ -0,0 +1,17 @@
+syms G1 G2 G3 G4 G5 H1 H2 H3 H4 H5;
+
+T1=G1*G3*G4*G5*G2;
+
+L1=-G1*H1;
+L2=-G3*H3;
+L3=-G2*H2*G1*G3;
+L4=-G4*H4;
+L5=-G5*H5;
+
+delta=1-(L1+L2+L3+L4+L5)+(L1*L2+L1*L5+L1*L4+L2*L5+L3*L5)-(L1*L2*L5)
+del1=1;
+
+TF=(T1*del1)/delta ;
+disp(TF,"C/R = ")
+
+