summaryrefslogtreecommitdiff
path: root/773/CH6
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /773/CH6
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '773/CH6')
-rwxr-xr-x773/CH6/EX6.01/6_01.sci12
-rwxr-xr-x773/CH6/EX6.02/6_02.sci10
-rwxr-xr-x773/CH6/EX6.03/6_03.sci11
-rwxr-xr-x773/CH6/EX6.04/6_04.sci8
-rwxr-xr-x773/CH6/EX6.05/6_05.sci9
-rwxr-xr-x773/CH6/EX6.06/6_06.sci16
-rwxr-xr-x773/CH6/EX6.07/6_07.sci22
-rwxr-xr-x773/CH6/EX6.08/6_08.sci14
-rwxr-xr-x773/CH6/EX6.09/6_09.sci12
-rwxr-xr-x773/CH6/EX6.10/6_10.sci12
-rwxr-xr-x773/CH6/EX6.11/6_11.sci19
-rwxr-xr-x773/CH6/EX6.12/6_12.sci16
-rwxr-xr-x773/CH6/EX6.13/6_13.sci17
-rwxr-xr-x773/CH6/EX6.14/6_14.sci14
-rwxr-xr-x773/CH6/EX6.15/6_15.sci21
15 files changed, 213 insertions, 0 deletions
diff --git a/773/CH6/EX6.01/6_01.sci b/773/CH6/EX6.01/6_01.sci
new file mode 100755
index 000000000..3d1daae05
--- /dev/null
+++ b/773/CH6/EX6.01/6_01.sci
@@ -0,0 +1,12 @@
+//syslin//
+exec series.sce;
+s=%s;
+sys1=syslin('c',(s+3)/(s+1))
+sys2=syslin('c',0.2/(s+2))
+sys3=syslin('c',50/(s+4))
+sys4=syslin('c',10/(s))
+a=series(sys1,sys2);
+b=series(a,sys3);
+y=series(b,sys4);
+y=simp(y);
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.02/6_02.sci b/773/CH6/EX6.02/6_02.sci
new file mode 100755
index 000000000..a9ad410a8
--- /dev/null
+++ b/773/CH6/EX6.02/6_02.sci
@@ -0,0 +1,10 @@
+//syslin//
+exec parallel.sce;
+s=%s;
+sys1=syslin('c',1/s)
+sys2=syslin('c',2/(s+1))
+sys3=syslin('c',3/(s+3))
+a=parallel(sys1,sys2);
+y=parallel(a,sys3);
+y=simp(y);
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.03/6_03.sci b/773/CH6/EX6.03/6_03.sci
new file mode 100755
index 000000000..6d8aa8b5e
--- /dev/null
+++ b/773/CH6/EX6.03/6_03.sci
@@ -0,0 +1,11 @@
+//syslin//
+exec series.sce;
+s=%s;
+sys1=syslin('c',3/(s*(s+1)))
+sys2=syslin('c',s^2/(3*(s+1)))
+sys3=syslin('c',6/(s))
+a=(-1)*sys3;
+b=series(sys1,sys2);
+y=b/.a // feedback operation
+y=simp(y)
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.04/6_04.sci b/773/CH6/EX6.04/6_04.sci
new file mode 100755
index 000000000..4b9fc2930
--- /dev/null
+++ b/773/CH6/EX6.04/6_04.sci
@@ -0,0 +1,8 @@
+//syslin//
+exec parallel.sce;
+syms G1 G2 G3 H;
+a=series(G1,G2);
+b=parallel(a,G3);
+y=b/.H //negative feedback operation
+y=simple(y)
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.05/6_05.sci b/773/CH6/EX6.05/6_05.sci
new file mode 100755
index 000000000..e17392613
--- /dev/null
+++ b/773/CH6/EX6.05/6_05.sci
@@ -0,0 +1,9 @@
+//syslin//
+exec series.sce;
+syms G1 G2 H1 H2 s;
+a=G1/.H1; // negative feedback operation
+b=a/.H2;// negative feedback operation
+y=series(b,G2);
+y=simple(y);
+disp(y,"C(s)/R(s)=")
+
diff --git a/773/CH6/EX6.06/6_06.sci b/773/CH6/EX6.06/6_06.sci
new file mode 100755
index 000000000..a6d146021
--- /dev/null
+++ b/773/CH6/EX6.06/6_06.sci
@@ -0,0 +1,16 @@
+//syslin//
+exec parallel.sce;
+exec series.sce;
+syms G1 G2 G3 G4 G5 G6 H1 H2;
+a=parallel(G3,G5);
+b=parallel(a,-G4);
+c=series(G1,G2);
+d=c/.H1;
+e=series(b,d);
+f=e/.H2;
+y=series(f,G6);
+y=simple(y);
+disp(y,"C(s)/R(s)=")
+
+
+
diff --git a/773/CH6/EX6.07/6_07.sci b/773/CH6/EX6.07/6_07.sci
new file mode 100755
index 000000000..f6baf9a4f
--- /dev/null
+++ b/773/CH6/EX6.07/6_07.sci
@@ -0,0 +1,22 @@
+//syslin//
+exec series.sce;
+syms G1 G2 G3 H1 H2 R X;
+//putting x=0,then solving the block
+a=G3/.H1;
+b=series(G1,G2);
+c=series(a,b);
+x1=c/.H2;
+C1=R*x1;
+disp(x1,"C1(s)/R(s)=")
+//putting r=0 ,then solving the block
+d=series(G1,G2);
+e=series(d,H2);
+f=G3/.H1;
+x2=f/.e;
+C2=X*x2;
+disp(x2,"C2(s)/X(s)=")
+//resultant output C=C1+C2
+C=C1+C2;
+C=simple(C);
+disp(C,"Resultant Output=")
+
diff --git a/773/CH6/EX6.08/6_08.sci b/773/CH6/EX6.08/6_08.sci
new file mode 100755
index 000000000..a79b8c966
--- /dev/null
+++ b/773/CH6/EX6.08/6_08.sci
@@ -0,0 +1,14 @@
+//syslin//
+exec parallel.sce;
+exec series.sce;
+syms G1 G2 G3 H1 H2;
+//shift the take-off point after the block G2
+a=G3/G2;
+b=parallel(a,1);
+c=series(G1,G2);
+d=c/.H1 //negative feedback operation
+e=series(d,b);
+y=e/.H2;
+y=simple(y);
+disp(y,"C(s)/R(s)=")
+
diff --git a/773/CH6/EX6.09/6_09.sci b/773/CH6/EX6.09/6_09.sci
new file mode 100755
index 000000000..20992d5b5
--- /dev/null
+++ b/773/CH6/EX6.09/6_09.sci
@@ -0,0 +1,12 @@
+//syslin//
+exec series.sce
+syms G1 G2 G3 H1 H2 H3;
+//Remove the feedback loop having feedback path transfer function H2
+a=G3/.H2;
+//Interchange the summer .as well as replace the cascade block by its equivalent block
+b=series(G1,G2);
+c=b/.H1; //Negative Feedback Operation
+d=series(c,a);
+y=d/.H3; //Negative Feedback Operation
+y=simple(y);
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.10/6_10.sci b/773/CH6/EX6.10/6_10.sci
new file mode 100755
index 000000000..cbaccd1b2
--- /dev/null
+++ b/773/CH6/EX6.10/6_10.sci
@@ -0,0 +1,12 @@
+//syslin//
+exec parallel.sce;
+exec series.sce;
+syms G1 G2 G3 G4 G5 H1 H2;
+a=G2/.H1; //negative feedback operation
+b=series(G1,a);
+c=series(b,G3);
+d=parallel(c,G4);
+e=series(d,G5);
+y=e/.H2; //negative feedback operation
+y=simple(y);
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.11/6_11.sci b/773/CH6/EX6.11/6_11.sci
new file mode 100755
index 000000000..f57709c2a
--- /dev/null
+++ b/773/CH6/EX6.11/6_11.sci
@@ -0,0 +1,19 @@
+//syslin//
+exec parallel.sce;
+exec series.sce;
+syms G1 G2 G3 G4 G5 G6 G7 H1 H2 H3;
+a=parallel(G1,G2);
+b=parallel(a,G3);
+//shift the take off point to the right of the block G4
+c=G4/.H1; //negative feedback operation
+d=G5/G4; //negative feedback operation
+e=parallel(d,1);
+f=G6/.H2; //negative feedback operation
+g=series(b,c);
+h=series(g,e);
+i=series(h,f);
+j=series(i,G7);
+y=j/.H3;
+y=simple(y);
+disp(y,"C(s)/R(s)=")
+
diff --git a/773/CH6/EX6.12/6_12.sci b/773/CH6/EX6.12/6_12.sci
new file mode 100755
index 000000000..e09dfeafe
--- /dev/null
+++ b/773/CH6/EX6.12/6_12.sci
@@ -0,0 +1,16 @@
+//syslin//
+exec series.sce;
+exec parallel.sce;
+syms G1 G2 G3 G4 H1 H2 H3;
+//shift the take-off point after the block G1
+a=G3/G1;
+b=parallel(a,G2);
+c=G1/.H1; // Negative Feedback Operation
+d=1/b; // Negative Feedback Operation
+e=parallel(d,H3);
+f=series(e,H2);
+g=series(c,b);
+h=g/.f ; // Negative Feedback Operation
+y=series(h,G4);
+y=simple(y);
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.13/6_13.sci b/773/CH6/EX6.13/6_13.sci
new file mode 100755
index 000000000..6fa37522f
--- /dev/null
+++ b/773/CH6/EX6.13/6_13.sci
@@ -0,0 +1,17 @@
+//syslin//
+exec series.sce;
+exec parallel.sce;
+syms G1 G2 G3 G4 H1 H2 ;
+//reduce the internal feedback loop
+a=G2/.H2;
+//place the summer left to the block G1
+b=G3/G1;
+//exchange the summer
+c=parallel(b,1);
+d=series(a,G1);
+e=series(d,G4);
+f=e/.H1;
+y=series(c,f);
+y=simple(y);
+disp(y,"C(s)/R(s)=")
+
diff --git a/773/CH6/EX6.14/6_14.sci b/773/CH6/EX6.14/6_14.sci
new file mode 100755
index 000000000..9f5818436
--- /dev/null
+++ b/773/CH6/EX6.14/6_14.sci
@@ -0,0 +1,14 @@
+//syslin//
+exec series.sce;
+exec parallel.sce;
+syms G1 G2 G3 G4 H1 H2 ;
+//shift the take-off point to the right of the block G3
+a=H1/G3;
+b=series(G2,G3);
+c=parallel(H2,a);
+d=b/.c;
+e=series(d,G1);
+f=e/.a;
+y=series(f,G4);
+y=simple(y);
+disp(y,"C(s)/R(s)=")
diff --git a/773/CH6/EX6.15/6_15.sci b/773/CH6/EX6.15/6_15.sci
new file mode 100755
index 000000000..9aa957ac1
--- /dev/null
+++ b/773/CH6/EX6.15/6_15.sci
@@ -0,0 +1,21 @@
+//syslin//
+exec series.sce;
+exec parallel.sce;
+syms G1 G2 G3 G4 H1 H2 H3;
+//shift the take-off point to the right of the block H1
+//shift the other take-off point to the right of the block H1 &H2
+a=series(H1,H2);
+b=1/a;
+c=1/H1;
+d=G3/.a;
+//move the summer to the left of the block G2
+e=G4/G2;
+f=series(d,G2);
+//exchange the summer
+g=f/.H1;
+h=parallel(G1,e);
+i=series(h,g);
+j=series(a,H3);
+y=i/.j;
+y=simple(y);
+disp(y,"C(s)/R(s)=")