diff options
Diffstat (limited to '257/CH5')
24 files changed, 298 insertions, 0 deletions
diff --git a/257/CH5/EX5.1/example_5_1.sce b/257/CH5/EX5.1/example_5_1.sce new file mode 100644 index 000000000..439a1a740 --- /dev/null +++ b/257/CH5/EX5.1/example_5_1.sce @@ -0,0 +1,8 @@ +syms G1 G2 G3 G4 H1 H2
+
+a= G1*G4 //series
+b= (a)/(1-(a*H1)) //positive feedback
+c= (b*(G2+G3)) // G2 AND G3 are in parallel
+Y= c/(1+(c*H2)) // negetive feedback
+
+disp(Y,"C/R =")
\ No newline at end of file diff --git a/257/CH5/EX5.10/example_5_10.sce b/257/CH5/EX5.10/example_5_10.sce new file mode 100644 index 000000000..ea0af2ee5 --- /dev/null +++ b/257/CH5/EX5.10/example_5_10.sce @@ -0,0 +1,12 @@ +syms H G1 G2 G3
+
+//separating the two paths we get 1+1=2 in parallel combinations
+
+//shifting take off point after 2*G3 and then after 2*G2*G3
+
+a=(2*G2*G3)/(1+(2*G2*G3*H/(2*G3)))
+b=a/(1+(H*a))
+c=G1*b
+Y=c/(1+(c*(1/(2*G2*G3))))
+
+disp(Y,"C/R = ")
diff --git a/257/CH5/EX5.11/example_5_11.sce b/257/CH5/EX5.11/example_5_11.sce new file mode 100644 index 000000000..3ecb53645 --- /dev/null +++ b/257/CH5/EX5.11/example_5_11.sce @@ -0,0 +1,28 @@ +syms G1 G2 G3 G4
+
+//for C1/R1
+
+a=(-G2)*G3*G4
+Y=G1/(1+(G1*a))
+
+disp(Y," C1/R1 = ")
+
+// for C2/R1
+
+x=(-G1)*G2*G3
+O= (x)/(1+(x*G4))
+
+disp(O,"C2/R1 = ")
+
+//for C1/R2
+
+k=(-G1)*G2*G4
+K=k/(1+(k*G3))
+ disp(K,"C1/R2 = ")
+
+//for C2/R2
+
+f=(-G1)*G3*G4
+Z= G2/(1+(G2*f))
+disp(Z,"C2/R2 = ")
+
\ No newline at end of file diff --git a/257/CH5/EX5.12/example_5_12.sce b/257/CH5/EX5.12/example_5_12.sce new file mode 100644 index 000000000..f85438faa --- /dev/null +++ b/257/CH5/EX5.12/example_5_12.sce @@ -0,0 +1,8 @@ +syms G1 G2 G3 G4 G5 G6 G7 G8
+
+a= G8/(1+(G8*G6*G7)) //feedback
+b=a*G2*G5
+c=b/(1+(b*G4*G6))
+Y= G3*G1*c //series
+
+disp(Y,"C/R = ")
diff --git a/257/CH5/EX5.13/example_5_13.sce b/257/CH5/EX5.13/example_5_13.sce new file mode 100644 index 000000000..3fb1f028b --- /dev/null +++ b/257/CH5/EX5.13/example_5_13.sce @@ -0,0 +1,10 @@ +syms G1 G2 G3 G4 H1 H2
+
+// combining G1 and G3 andseparating the points linked by summing point in the feedback path
+
+a=(1+(G4*H2))
+b=G1*(G2+G3) //series
+c=b/(1+(b*H1*H2))
+Y=c*a
+
+disp(Y,"C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.14/example_5_14.sce b/257/CH5/EX5.14/example_5_14.sce new file mode 100644 index 000000000..18d594fd7 --- /dev/null +++ b/257/CH5/EX5.14/example_5_14.sce @@ -0,0 +1,12 @@ +syms G1 G2 G3 G4 H1 H2
+
+//shifting take off point of G4 , after G2
+
+a=G4/G2
+b= a+G3
+c= G1*G2/(1+(G1*G2*H1))
+d=c*b
+e=d/(1+(d*H2/G1))
+Y=e/(1+(e*1))
+
+disp(Y,"C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.15/example_5_15.sce b/257/CH5/EX5.15/example_5_15.sce new file mode 100644 index 000000000..3cf95c9c6 --- /dev/null +++ b/257/CH5/EX5.15/example_5_15.sce @@ -0,0 +1,28 @@ +s=%s
+
+ //to find C/E
+
+a=10/(s*(s+1))
+b=a/(1+(a*0.5*s))
+c=b*(s+4) //shifting the summer to the left
+
+//(s^2+6*s)/(10*(s+4)) * C == E + 3/(s+4)*(E+C)
+Y= 10*(s+7)/(s^2+6*s-30) //solving the above equation
+
+disp(Y,"C/E = ")
+
+// to find C/R
+
+d=c/(1+c*1) //using the associative law, exchange two summing points
+e=1+(3/(s+4))
+X= d*e
+
+disp(X," C/R = ")
+
+// to find C/N if r(s)=0
+
+x= (-0.5*s)-(s+4)
+k=10/(s*(s+1))
+f=k*x //removing the summing point
+V=1/(1-f)
+disp(V,"C/N = ")
diff --git a/257/CH5/EX5.16/example_5_16.sce b/257/CH5/EX5.16/example_5_16.sce new file mode 100644 index 000000000..fc17b2a36 --- /dev/null +++ b/257/CH5/EX5.16/example_5_16.sce @@ -0,0 +1,9 @@ +syms G1 G2 G3 H1 H2
+
+// combine the two summing points
+a= G3+G1
+b= G2/(1-(G2*H1))
+c= a*b
+Y=c/(1+c*H2)
+
+disp(Y,"C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.17/example_5_17.sce b/257/CH5/EX5.17/example_5_17.sce new file mode 100644 index 000000000..f79ff5d45 --- /dev/null +++ b/257/CH5/EX5.17/example_5_17.sce @@ -0,0 +1,13 @@ +syms Ro Ra Rb Rc Rd
+
+//shifting summing points to left of 1/Ra and 1/Rb and combining the summing points
+a=((1/Ra)*Rc)/(1+(1/Ra)*Rc*1)
+b=(Rd/Rb)/(1+(Rd/Rb))
+//shift input summing points to the right and combine the three summing points
+c=(1/Ro)/(1+(1/Ro)*(Ra*Rc/(Ra+Rc)))
+
+d=c/(1-(b*Rb*c))
+e=a-b
+Y=e*d
+
+disp(Y,"Io/Vi = ")
\ No newline at end of file diff --git a/257/CH5/EX5.18/example_5_18.sce b/257/CH5/EX5.18/example_5_18.sce new file mode 100644 index 000000000..85e639146 --- /dev/null +++ b/257/CH5/EX5.18/example_5_18.sce @@ -0,0 +1,11 @@ +s=%s
+
+a=(1/(s+2))/(1+(1/(s+2)*4))
+b=a*(3*s/(s+4)) //shifting take off point to the right
+c=b/(1+(b*(5/s)))
+d=1+ ( (s/(s+3)) * ((s+4)/(3*s)) )
+Y=d*c
+
+disp(Y,"Y/R = ")
+
+disp((s+3)*(s^2+10*s+39))
\ No newline at end of file diff --git a/257/CH5/EX5.19/example_5_19.sce b/257/CH5/EX5.19/example_5_19.sce new file mode 100644 index 000000000..65d1cbb0b --- /dev/null +++ b/257/CH5/EX5.19/example_5_19.sce @@ -0,0 +1,11 @@ +syms G1 G2 G3 H1
+
+//shifting summing points to left
+//using accosiative law to exchange the summing points, redcusing minor feedback loop and reducing parallel combination of G3/G1 and 1
+
+a= (G3/G1)+1
+b=G1/(1+G1)
+c=a*b*G2
+Y=c/(1+(c*H1))
+
+disp(Y,"C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.2/example_5_2.sce b/257/CH5/EX5.2/example_5_2.sce new file mode 100644 index 000000000..6972bf745 --- /dev/null +++ b/257/CH5/EX5.2/example_5_2.sce @@ -0,0 +1,21 @@ +syms G1 G2 G3 G4 G5 H5
+
+//with X(s)=0
+
+a= G2/(G2+1)
+b= a*G3*(G5/(1+G5*H5)) //G5 and H5 are in a loop
+c= b/(1+b) //unity feedback
+Y= G1*c
+
+disp(Y,"R/S=")
+
+//with R(s)=0
+
+x=G2/(1+G2)
+y=G5/(1+G5*H5)
+z=x*(-G3)
+Y2=y/(1-(z))
+
+disp(Y2,"X/C = ")
+
+
diff --git a/257/CH5/EX5.20/example_5_20.sce b/257/CH5/EX5.20/example_5_20.sce new file mode 100644 index 000000000..63df4f67c --- /dev/null +++ b/257/CH5/EX5.20/example_5_20.sce @@ -0,0 +1,13 @@ +syms M2 K2 M1 K1 B
+s=%s
+
+a=(K2/s)+B
+b=(1/(M1*s))/(1+((1/(M1*s)*(K1/s) )))
+//shifting summing point S2 before 1/m2*s and interchange positions of S1 and S2 using associative law
+c=(1/M2*s)*a
+d=c/(1+c)
+e=d*b
+f=e/(1+(e*M2*s))
+Y=f*(1/s)
+
+disp(Y," Y/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.21/example_5_21.sce b/257/CH5/EX5.21/example_5_21.sce new file mode 100644 index 000000000..65046d483 --- /dev/null +++ b/257/CH5/EX5.21/example_5_21.sce @@ -0,0 +1,14 @@ +s=%s;
+syms t s;
+
+F=(1- (3*%e^(-2*t)) + (2*%e^(-3*t)) );
+y=laplace(F,t,s);
+
+G=1
+x=laplace(G,t,s);
+
+disp((y/x),"closed loop transfer function is")
+
+T=y/x;
+
+disp((T/(1-T)) , "openloop transfer function is")
\ No newline at end of file diff --git a/257/CH5/EX5.22/example_5_22.sce b/257/CH5/EX5.22/example_5_22.sce new file mode 100644 index 000000000..65046d483 --- /dev/null +++ b/257/CH5/EX5.22/example_5_22.sce @@ -0,0 +1,14 @@ +s=%s;
+syms t s;
+
+F=(1- (3*%e^(-2*t)) + (2*%e^(-3*t)) );
+y=laplace(F,t,s);
+
+G=1
+x=laplace(G,t,s);
+
+disp((y/x),"closed loop transfer function is")
+
+T=y/x;
+
+disp((T/(1-T)) , "openloop transfer function is")
\ No newline at end of file diff --git a/257/CH5/EX5.23/example_5_23.sce b/257/CH5/EX5.23/example_5_23.sce new file mode 100644 index 000000000..3fb1f028b --- /dev/null +++ b/257/CH5/EX5.23/example_5_23.sce @@ -0,0 +1,10 @@ +syms G1 G2 G3 G4 H1 H2
+
+// combining G1 and G3 andseparating the points linked by summing point in the feedback path
+
+a=(1+(G4*H2))
+b=G1*(G2+G3) //series
+c=b/(1+(b*H1*H2))
+Y=c*a
+
+disp(Y,"C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.24/example_5_24.sce b/257/CH5/EX5.24/example_5_24.sce new file mode 100644 index 000000000..c9d247081 --- /dev/null +++ b/257/CH5/EX5.24/example_5_24.sce @@ -0,0 +1,9 @@ +syms G1 G3 G4 H1 H2
+
+a=G1+G3
+b=G2/(1+(G2*H1))
+c= a*b
+d=c/(1+(c*H2))
+Y=d+G4
+
+disp(Y," C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.3/example_5_3.sce b/257/CH5/EX5.3/example_5_3.sce new file mode 100644 index 000000000..0ce9d8903 --- /dev/null +++ b/257/CH5/EX5.3/example_5_3.sce @@ -0,0 +1,9 @@ +syms G1 G2 H1 H2
+
+a=G2/(1+(G2*H2))
+b= G1*a
+c= H1*(1+G2*H2)/G2 //shifting the take off point
+d= b/(1+b)
+Y= d/(1+(d*c))
+
+disp(Y," R/C = ")
\ No newline at end of file diff --git a/257/CH5/EX5.4/example_5_4.sce b/257/CH5/EX5.4/example_5_4.sce new file mode 100644 index 000000000..0ce9d8903 --- /dev/null +++ b/257/CH5/EX5.4/example_5_4.sce @@ -0,0 +1,9 @@ +syms G1 G2 H1 H2
+
+a=G2/(1+(G2*H2))
+b= G1*a
+c= H1*(1+G2*H2)/G2 //shifting the take off point
+d= b/(1+b)
+Y= d/(1+(d*c))
+
+disp(Y," R/C = ")
\ No newline at end of file diff --git a/257/CH5/EX5.5/example_5_5.sce b/257/CH5/EX5.5/example_5_5.sce new file mode 100644 index 000000000..4ddf21dfa --- /dev/null +++ b/257/CH5/EX5.5/example_5_5.sce @@ -0,0 +1,8 @@ +syms G1 G2 G3 G4 H1 H2
+
+a= G1*G2 //shifting the take off point
+b= a/(1+(a*H2))
+c=(1+(G3/G2))
+Y= b*c*(G4/(1+G4*H1))
+
+disp(Y,"C/R = ")
\ No newline at end of file diff --git a/257/CH5/EX5.6/example_5_6.sce b/257/CH5/EX5.6/example_5_6.sce new file mode 100644 index 000000000..3d1888017 --- /dev/null +++ b/257/CH5/EX5.6/example_5_6.sce @@ -0,0 +1,10 @@ +syms G1 G2 G3 H1 H2
+
+a=G2/(1+G2)
+b=1+G3
+c= b*a //shifting the take off point
+d= (1/(1+G3))+(H2)
+e= d*H1
+Y= a*b/e
+
+disp(Y,"R/C = ")
\ No newline at end of file diff --git a/257/CH5/EX5.7/example_5_7.sce b/257/CH5/EX5.7/example_5_7.sce new file mode 100644 index 000000000..ab618e626 --- /dev/null +++ b/257/CH5/EX5.7/example_5_7.sce @@ -0,0 +1,8 @@ +syms G1 G2 G3 H1 H2 H3
+
+a= G3/(1+G3*H1*H2) //feedback
+b=G2*a/(1+(G2*a))
+c=G1*b
+Y=c/(1+c*H1*H2*H3)
+
+disp(Y,"C/R = ")
diff --git a/257/CH5/EX5.8/example_5_8.sce b/257/CH5/EX5.8/example_5_8.sce new file mode 100644 index 000000000..38d5c0bb6 --- /dev/null +++ b/257/CH5/EX5.8/example_5_8.sce @@ -0,0 +1,12 @@ +syms G1 G2 G3 H1 H2
+
+//shifting the taake off points twice to the left
+a=G1/(1+G1*H1*G2)
+b=(1+(G3/G2))
+c=a*b
+d=G2/(1+(G2*H2))
+e=c*d
+f=(-H1)*G2*H2
+Y=e/1+(e*f)
+
+disp(Y,"C/R = ")
diff --git a/257/CH5/EX5.9/example_5_9.sce b/257/CH5/EX5.9/example_5_9.sce new file mode 100644 index 000000000..07c6d9880 --- /dev/null +++ b/257/CH5/EX5.9/example_5_9.sce @@ -0,0 +1,11 @@ +syms H1 H2 H3 G1 G2 G3 G4
+
+//shifting summing points before G1 and take off points after G4
+
+a= G1*G2/(1+(G1*G2*H1))
+b= G3*G4/(1+(G3*G4*H2))
+c=a*b
+Y= c/(1+(c*(H3/(G1*G4))))
+
+disp(Y,"C/R = ")
+
|