diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /165/CH15 | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip |
initial commit / add all books
Diffstat (limited to '165/CH15')
-rw-r--r-- | 165/CH15/EX15.1/ex15_1.sce | 16 | ||||
-rw-r--r-- | 165/CH15/EX15.10/ex15_10.sce | 22 | ||||
-rw-r--r-- | 165/CH15/EX15.11/ex15_11.sce | 24 | ||||
-rw-r--r-- | 165/CH15/EX15.2/ex15_2.sce | 8 | ||||
-rw-r--r-- | 165/CH15/EX15.3/ex15_3.sce | 19 | ||||
-rw-r--r-- | 165/CH15/EX15.4/ex15_4.sce | 8 | ||||
-rw-r--r-- | 165/CH15/EX15.5/ex15_5.sce | 22 | ||||
-rw-r--r-- | 165/CH15/EX15.6/ex15_6.sce | 31 | ||||
-rw-r--r-- | 165/CH15/EX15.7/ex15_7.sce | 24 | ||||
-rw-r--r-- | 165/CH15/EX15.8/ex15_8.sce | 8 | ||||
-rw-r--r-- | 165/CH15/EX15.9/ex15_9.sce | 9 |
11 files changed, 191 insertions, 0 deletions
diff --git a/165/CH15/EX15.1/ex15_1.sce b/165/CH15/EX15.1/ex15_1.sce new file mode 100644 index 000000000..cd248fd0a --- /dev/null +++ b/165/CH15/EX15.1/ex15_1.sce @@ -0,0 +1,16 @@ +//Example 15.1
+clc;
+
+//Design a LPF having a cutoff frequency of 2 kHz
+//With a pass band gain of 2
+fh=2000; //Cutoff frequency in Hz
+C=0.01*10^-6; //Assumed value of capacitor
+R=invr(2*%pi*fh*C);
+ceil(R);
+
+//Given pass band gain Af= 1 + Rf/R1
+Af=2; //Pass band gain
+Rf=R1*(Af-1);
+//Now the most probable value for Rf and R1 is 10Kohm
+printf('\nFeedback resistence used is 10000 ohm\n')
+printf('\nInput resistence used is 10000 ohm\n')
\ No newline at end of file diff --git a/165/CH15/EX15.10/ex15_10.sce b/165/CH15/EX15.10/ex15_10.sce new file mode 100644 index 000000000..abbf7783d --- /dev/null +++ b/165/CH15/EX15.10/ex15_10.sce @@ -0,0 +1,22 @@ +//Example 15.10
+clc;
+
+f1=1500; //in Hz
+Q=10;
+R2=(316*10^3)/10; //From given tables
+R3=(100*10^3)/(3.16*Q-1); //From given tables
+R3=3.3*10^3; //Assumed
+//R1 is open circuited
+R4=(5.03*10^7)/f1;
+R5=R4;
+R6=1.8*10^3;
+R7=10000; //Assumed a std Value
+R8=invr(invr(R6)+invr(R7))
+printf('\nFor Q=10 R1 is open circuited\n')
+printf('\nFor Q=10 R2 = %.2f k ohm\n',R2/1000)
+printf('\nFor Q=10 R3 = %.2f k ohm\n',R3/1000)
+printf('\nFor Q=10 R4 = %d k ohm\n',R4/1000)
+printf('\nFor Q=10 R5 = %d k ohm\n',R5/1000)
+printf('\nFor Q=10 R6 = %.1f k ohm\n',R6/1000)
+printf('\nFor Q=10 R7 = %d k ohm\n',R7/1000)
+printf('\nFor Q=06 R8 = %.2f k ohm\n',R8/1000)
\ No newline at end of file diff --git a/165/CH15/EX15.11/ex15_11.sce b/165/CH15/EX15.11/ex15_11.sce new file mode 100644 index 000000000..28628dd7f --- /dev/null +++ b/165/CH15/EX15.11/ex15_11.sce @@ -0,0 +1,24 @@ +//Example 15.11
+clc;
+
+f1=4000; //in Hz
+Q=8;
+R2=100000; //From given tables
+R3=(100*10^3)/(3.48*Q-1); //From given tables
+R3=3.9*10^3; //Assumed
+//R1 is open circuited
+R4=(5.03*10^7)/f1;
+R5=R4;
+R6=10000; //Assumed a std value
+R7=10000; //Assumed a std Value
+R8=10000; //Assumed a std Value
+R9=invr(invr(R6)+invr(R7)+invr(R8))
+printf('\nFor Q=8 R1 is open circuited\n')
+printf('\nFor Q=8 R2 = %d k ohm\n',R2/1000)
+printf('\nFor Q=8 R3 = %.1f k ohm\n',R3/1000)
+printf('\nFor Q=8 R4 = %d k ohm\n',R4/1000)
+printf('\nFor Q=8 R5 = %d k ohm\n',R5/1000)
+printf('\nFor Q=8 R6 = %d k ohm\n',R6/1000)
+printf('\nFor Q=8 R7 = %d k ohm\n',R7/1000)
+printf('\nFor Q=8 R8 = %d k ohm\n',R8/1000)
+printf('\nFor Q=8 R9 = %.2f k ohm\n',R9/1000)
\ No newline at end of file diff --git a/165/CH15/EX15.2/ex15_2.sce b/165/CH15/EX15.2/ex15_2.sce new file mode 100644 index 000000000..8d08f1ffa --- /dev/null +++ b/165/CH15/EX15.2/ex15_2.sce @@ -0,0 +1,8 @@ +//Example 15.2
+clc;
+
+wc=20000; //Cutoff frequency in rad/s
+C=0.01*10^-6; //Assumed value of capacitor
+R=invr(wc*C);
+x=ceil(R);
+printf('\nResistence Value required is %.2f k ohm\n',x/1000)
\ No newline at end of file diff --git a/165/CH15/EX15.3/ex15_3.sce b/165/CH15/EX15.3/ex15_3.sce new file mode 100644 index 000000000..a123fa079 --- /dev/null +++ b/165/CH15/EX15.3/ex15_3.sce @@ -0,0 +1,19 @@ +//Example 15.3
+clc;
+
+//Design a 2nd order LPF having a cutoff frequency of 2 kHz
+fh=2000; //Cutoff frequency in Hz
+C2=3.3*10^-9; //Assumed value of capacitor
+C3=C2;
+R=invr(2*%pi*fh*C2);
+//Assume a std value of R
+R=22*10^3;
+R2=R;
+R3=R;
+R1=10000; //Assumed
+Rf=.560*R1;
+
+printf('\nAssumed values of Capcitors C2 & C3 = %.2f nF\n',C2*10^9)
+printf('\nValues of Resistors R2 & R3 = %.2f k ohm\n',R2/10^3)
+printf('\nValues of Feedback Resistor Rf = %.2f k ohm\n',Rf/10^3)
+printf('\nValues of Input Resistors R1 = %.2f k ohm\n',R1/10^3)
\ No newline at end of file diff --git a/165/CH15/EX15.4/ex15_4.sce b/165/CH15/EX15.4/ex15_4.sce new file mode 100644 index 000000000..e24247d73 --- /dev/null +++ b/165/CH15/EX15.4/ex15_4.sce @@ -0,0 +1,8 @@ +//Example 15.4
+clc;
+
+C=2.2*10^-9; //in farads
+R=47*10^3; //in ohms
+x=2*%pi*R*C;
+fl=invr(x);
+printf('\nLower Cut Off frequency fl Of 2nd order Butterworth HPF = %.2f kHz\n',fl/1000)
\ No newline at end of file diff --git a/165/CH15/EX15.5/ex15_5.sce b/165/CH15/EX15.5/ex15_5.sce new file mode 100644 index 000000000..a9fce3a76 --- /dev/null +++ b/165/CH15/EX15.5/ex15_5.sce @@ -0,0 +1,22 @@ +//Example 15.5
+clc;
+
+fl=100; //in Hz
+fh=1000; //in Hz
+gain=4;
+C=0.01*10^-6; //Assumed
+
+//For a LPF
+R=invr(2*%pi*fh*C);
+printf('\nValue of Resistor R for a LPF = %.1f k ohm\n',R/1000)
+
+//For a HPF
+R=invr(2*%pi*fl*C);
+printf('\nValue of Resistor R for a HPF = %d k ohm\n',R/1000)
+
+fc=sqrt(fl*fh);
+Q=fc/(fh-fl);
+printf('\nValue of Q for the given filter = %.2f \n',Q)
+if Q<10 then
+ printf('\nQ value is less 10, hence a Wide Band Filter\n')
+end
\ No newline at end of file diff --git a/165/CH15/EX15.6/ex15_6.sce b/165/CH15/EX15.6/ex15_6.sce new file mode 100644 index 000000000..885c7b231 --- /dev/null +++ b/165/CH15/EX15.6/ex15_6.sce @@ -0,0 +1,31 @@ +//Example 15.6
+clc;
+
+fc=1000; //in Hz
+Q=5;
+Avo=8;
+C=0.01*10^-6; //Assumed
+
+R1=Q*invr(2*%pi*fc*C*Avo);
+//Assume a std value
+R1=10000;
+
+R2=Q*invr(2*%pi*fc*C*(2*Q^2-Avo));
+//Assume a std Value
+R2=2000;
+
+R3=Q*invr(%pi*fc*C);
+//Assume a std value
+R3=150*10^3;
+
+//Centre frequency is changed to 1.5 kHz
+fc1=1500;
+R21=R2*(fc/fc1)^2;
+//Assume a std value
+R21=820;
+
+printf('\nValue of Capacitors C1, C2 & C3 = %.2f uF\n',C*10^6)
+printf('\nValue of Resistor R1 = %.2f k ohm\n',R1/10^3)
+printf('\nValue of Resistor R2 = %.2f k ohm\n',R2/10^3)
+printf('\nValue of Resistor R3 = %.2f k ohm\n',R3/10^3)
+printf('\nValue of Resistor R2 after changing centre frequency to 1.5 kHz= %.2f ohm\n',R21)
\ No newline at end of file diff --git a/165/CH15/EX15.7/ex15_7.sce b/165/CH15/EX15.7/ex15_7.sce new file mode 100644 index 000000000..c0418077d --- /dev/null +++ b/165/CH15/EX15.7/ex15_7.sce @@ -0,0 +1,24 @@ +//Example 15.7
+clc;
+
+fh=100; //in Hz
+fl=1000; //in Hz
+C=0.01*10^-6; //Assumed
+R1=10000; //Assumed
+Rf=R1;
+R2=R1;
+R3=R1;
+R4=R1;
+
+//For a LPF
+R=invr(2*%pi*fh*C);
+printf('\nValue of Resistor R for a LPF = %d k ohm\n',R/1000)
+
+//For a HPF
+R=invr(2*%pi*fl*C);
+printf('\nValue of Resistor R for a HPF = %.1f k ohm\n',R/1000)
+
+printf('\nValue of Resistor R1 & Rf = %.1f k ohm\n',R1/1000)
+
+Rom=invr(invr(R2)+invr(R3)+invr(R4));
+printf('\nValue of Resistor Rom = %.1f k ohm\n',Rom/1000)
\ No newline at end of file diff --git a/165/CH15/EX15.8/ex15_8.sce b/165/CH15/EX15.8/ex15_8.sce new file mode 100644 index 000000000..8dd4968d9 --- /dev/null +++ b/165/CH15/EX15.8/ex15_8.sce @@ -0,0 +1,8 @@ +//Example 15.8
+clc;
+
+C=0.047*10^-6; //in farads
+f=50; //in ohms
+x=2*%pi*f*C;
+R=invr(x);
+printf('\nValue of resistor R = %.2f k ohm\n',R/1000)
\ No newline at end of file diff --git a/165/CH15/EX15.9/ex15_9.sce b/165/CH15/EX15.9/ex15_9.sce new file mode 100644 index 000000000..577bbb79a --- /dev/null +++ b/165/CH15/EX15.9/ex15_9.sce @@ -0,0 +1,9 @@ +//Example 15.9
+clc;
+
+C=0.01*10^-6; //in farads
+R=15*10^3; //in ohms
+f=2500; //in Hz
+x=2*%pi*f*C*R;
+phi=2*atan(x);
+printf('\nPhase angle phi = -%d deg\n',phi*180/%pi)
\ No newline at end of file |