diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2609/CH4 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '2609/CH4')
-rwxr-xr-x | 2609/CH4/EX4.1/ex_4_1.sce | 11 | ||||
-rwxr-xr-x | 2609/CH4/EX4.10/ex_4_10.sce | 18 | ||||
-rwxr-xr-x | 2609/CH4/EX4.11/ex_4_11.sce | 15 | ||||
-rwxr-xr-x | 2609/CH4/EX4.12/ex_4_12.sce | 22 | ||||
-rwxr-xr-x | 2609/CH4/EX4.13/ex_4_13.sce | 14 | ||||
-rwxr-xr-x | 2609/CH4/EX4.2/ex_4_2.sce | 27 | ||||
-rwxr-xr-x | 2609/CH4/EX4.3/ex_4_3.sce | 14 | ||||
-rwxr-xr-x | 2609/CH4/EX4.4/ex_4_4.sce | 14 | ||||
-rwxr-xr-x | 2609/CH4/EX4.5/ex_4_5.sce | 15 | ||||
-rwxr-xr-x | 2609/CH4/EX4.6/ex_4_6.sce | 13 | ||||
-rwxr-xr-x | 2609/CH4/EX4.7/ex_4_7.sce | 14 | ||||
-rwxr-xr-x | 2609/CH4/EX4.8/ex_4_8.sce | 11 | ||||
-rwxr-xr-x | 2609/CH4/EX4.9/ex_4_9.sce | 17 |
13 files changed, 205 insertions, 0 deletions
diff --git a/2609/CH4/EX4.1/ex_4_1.sce b/2609/CH4/EX4.1/ex_4_1.sce new file mode 100755 index 000000000..5fd9c2f9e --- /dev/null +++ b/2609/CH4/EX4.1/ex_4_1.sce @@ -0,0 +1,11 @@ +////Ex 4.1
+clc;
+clear;
+close;
+format('v',9);
+AOL=2*10^5;//unitless
+fo=5;//Hz
+ACL=100;//unitless
+SF=AOL/ACL;//unitless
+fodash=SF*fo;//Hz
+disp(fodash/1000,"Bandwidth with feedback(kHz)");
diff --git a/2609/CH4/EX4.10/ex_4_10.sce b/2609/CH4/EX4.10/ex_4_10.sce new file mode 100755 index 000000000..62609a250 --- /dev/null +++ b/2609/CH4/EX4.10/ex_4_10.sce @@ -0,0 +1,18 @@ +////Ex 4.10
+clc;
+clear;
+close;
+format('v',5);
+AOL=2*10^5;//unitless
+Rio=2;//Mohm
+Ro=75;//ohm
+Ri=1;//kohm
+Rf=10;//kohm
+ACL=-AOL*Rf/(Rf+Ri+AOL*Ri);//unitless(Exact)
+disp(ACL,"Exact close loop voltage gain");
+ACL=-Rf/Ri;//unitless(Approximate)
+disp(ACL,"Approximate close loop voltage gain");
+Beta=Ri/(Ri+Rf);//unitless
+SF=1+AOL*Beta;//unitless
+Rif=Rio*10^6/SF;//ohm
+disp(Rif,"Input impedence after feedback(ohm)");
diff --git a/2609/CH4/EX4.11/ex_4_11.sce b/2609/CH4/EX4.11/ex_4_11.sce new file mode 100755 index 000000000..a04ad73e3 --- /dev/null +++ b/2609/CH4/EX4.11/ex_4_11.sce @@ -0,0 +1,15 @@ +////Ex 4.11
+clc;
+clear;
+close;
+format('v',5);
+Ri=2;//kohm
+Rf=200;//kohm
+//For 741C
+fo=5;//Hz
+AOL=2*10^5;//unitless
+UGB=1;//MHz
+ACL=-AOL*Rf/(Rf+Ri+AOL*Ri);//unitless(Exact)
+disp(ACL,"Close loop voltage gain");
+fodash=fo*AOL/-ACL;//Hz
+disp(fodash/1000,"Bandwidth, fo_dash(kHz)");
diff --git a/2609/CH4/EX4.12/ex_4_12.sce b/2609/CH4/EX4.12/ex_4_12.sce new file mode 100755 index 000000000..d298c415b --- /dev/null +++ b/2609/CH4/EX4.12/ex_4_12.sce @@ -0,0 +1,22 @@ +////Ex 4.12
+clc;
+clear;
+close;
+format('v',6);
+Beta=0.06;//feedback factor
+fo=100;//Hz
+AOL=40000;//unitless(at dc)
+SFdc=1+AOL*Beta;//sacrifice factor at dc
+f=1;//kHz
+f=f*10^3;//Hz
+SF1=1+AOL*Beta/sqrt(1+f^2/fo^2);//sacrifice factor at 1 kHz
+//(a)
+ACL=AOL/SFdc;//(unitless)exact close loop gain at dc
+disp(ACL,"Exact close loop gain at dc");
+//(b)
+ACL=1/Beta;//(unitless)approximate close loop gain at dc
+disp(ACL,"Approximate close loop gain at dc");
+//(c)
+AOL=3980;//unitless(at dc)
+ACL=AOL/SF1;//(unitless)exact close loop gain at 1kHz
+disp(ACL,"Exact close loop gain at 1kHz");
diff --git a/2609/CH4/EX4.13/ex_4_13.sce b/2609/CH4/EX4.13/ex_4_13.sce new file mode 100755 index 000000000..80034ca41 --- /dev/null +++ b/2609/CH4/EX4.13/ex_4_13.sce @@ -0,0 +1,14 @@ +////Ex 4.13
+clc;
+clear;
+close;
+format('v',5);
+Beta=0.04;//feedback factor
+AOL=5000;//unitless(at dc)
+Rio=40;//kohm
+Ro=1;//kohm
+SF=1+AOL*Beta;//sacrifice factor at dc
+Rif=Rio/SF*1000;//ohm
+disp(Rif,"Input impedence(ohm)");
+Rof=Ro*1000/SF;//ohm
+disp(Rof,"Output impedence(ohm)");
diff --git a/2609/CH4/EX4.2/ex_4_2.sce b/2609/CH4/EX4.2/ex_4_2.sce new file mode 100755 index 000000000..125113d0c --- /dev/null +++ b/2609/CH4/EX4.2/ex_4_2.sce @@ -0,0 +1,27 @@ +////Ex 4.2
+clc;
+clear;
+close;
+format('v',6);
+AOL=2*10^5;//unitless
+Ri=1.5;//kohm
+Rf=12;//kohm
+Rio=1;//Mohm
+Ro=100;//ohm
+fo=5;//Hz
+Beta=Ri/(Ri+Rf);//unitless
+SF=(1+AOL)*Beta;//unitless
+ACL=AOL/SF;//unitless
+disp(ACL,"Value of ACL");
+//In case of ideal opamp
+ACL=1+Rf/Ri;//unitless
+disp(ACL,"In case of ideal opamp, Value of ACL");
+Rif=Rio*SF;//kohm
+disp(Rif,"Value of Rif(Mohm)");
+disp("This is a large value can be assumed as infity resistance.");
+format('v',5);
+Rof=Ro/SF;//mohm
+disp(Rof*1000,"Value of Rof(mohm)");
+fodash=SF*fo;//Hz
+disp(fodash/1000,"Bandwidth with feedback, fo_dash(kHz)");
+//Answer for Rif in the book has mistake of unit.
diff --git a/2609/CH4/EX4.3/ex_4_3.sce b/2609/CH4/EX4.3/ex_4_3.sce new file mode 100755 index 000000000..8277d8b63 --- /dev/null +++ b/2609/CH4/EX4.3/ex_4_3.sce @@ -0,0 +1,14 @@ +////Ex 4.3
+clc;
+clear;
+close;
+format('v',9);
+AOL=%inf;//unitless
+Rio=%inf;//ohm
+Ri=1;//kohm
+Rf=15;//kohm
+SF=%inf;//unitless;//as SF=1+AOL*Beta
+Beta=Ri/(Ri+Rf);//unitless
+ACL=1/Beta;//unitless
+disp(Rio,"Input impedence(ohm) for ideal opamp is ");
+disp(ACL,"Gain of the circuit, ACL");
diff --git a/2609/CH4/EX4.4/ex_4_4.sce b/2609/CH4/EX4.4/ex_4_4.sce new file mode 100755 index 000000000..b844e960c --- /dev/null +++ b/2609/CH4/EX4.4/ex_4_4.sce @@ -0,0 +1,14 @@ +////Ex 4.4
+clc;
+clear;
+close;
+format('v',9);
+AOL=400;//unitless
+Rio=500;//kohm
+Ro=75;//ohm
+ACL=100;//unitless
+SF=AOL/ACL;//unitless
+Rif=Rio*SF;//kohm
+disp(Rif/1000,"Input impedence, Rif(Mohm)");
+Rof=Ro/SF;//ohm
+disp(Rof,"Output impedence, Rof(ohm)");
diff --git a/2609/CH4/EX4.5/ex_4_5.sce b/2609/CH4/EX4.5/ex_4_5.sce new file mode 100755 index 000000000..56755cf13 --- /dev/null +++ b/2609/CH4/EX4.5/ex_4_5.sce @@ -0,0 +1,15 @@ +////Ex 4.5
+clc;
+clear;
+close;
+format('v',5);
+ACL=200;//unitless
+AOL=2*10^5;//unitless
+Rio=2;//Mohm
+Ro=75;//ohm
+Ri=1;//kohm(Assumed)
+SF=AOL/ACL;//unitless
+Beta=(SF-1)/AOL;//unitless
+Rf=Ri*(1-Beta)/Beta;//kohm
+disp(Ri,"Input impedence, Rif(kohm)");
+disp(Rf,"Feedback impedence, Rf(kohm)");
diff --git a/2609/CH4/EX4.6/ex_4_6.sce b/2609/CH4/EX4.6/ex_4_6.sce new file mode 100755 index 000000000..aa6658270 --- /dev/null +++ b/2609/CH4/EX4.6/ex_4_6.sce @@ -0,0 +1,13 @@ +////Ex 4.6
+clc;
+clear;
+close;
+format('v',5);
+AOL=50;//unitless
+Beta=0.8;//unitless
+deltaAOL=-20;//%(Change in open loop gain)
+deltaBeta=15;//%(Change in feedback factor)
+AOLnew=AOL+AOL*deltaAOL/100;//unitless(AOL after change)
+Betanew=Beta+Beta*deltaBeta/100;//unitless(Beta after change)
+ACL=AOLnew/(1+AOLnew*Betanew);//unitless
+disp(ACL,"Close loop gain, ACL");
diff --git a/2609/CH4/EX4.7/ex_4_7.sce b/2609/CH4/EX4.7/ex_4_7.sce new file mode 100755 index 000000000..1ca151040 --- /dev/null +++ b/2609/CH4/EX4.7/ex_4_7.sce @@ -0,0 +1,14 @@ +////Ex 4.7
+clc;
+clear;
+close;
+format('v',5);
+AOL=500;//unitless
+Rio=300;//kohm
+Ro=100;//ohm
+ACL=AOL/(1+AOL);//unitless
+Rif=Rio*(1+AOL)/1000;//Mohm
+Rof=Ro/(1+AOL);//ohm
+disp(ACL,"Close loop gain, ACL");
+disp(Rif,"Value of Rif(Mohm)");
+disp(Rof,"Value of Rof(ohm)");
diff --git a/2609/CH4/EX4.8/ex_4_8.sce b/2609/CH4/EX4.8/ex_4_8.sce new file mode 100755 index 000000000..b5400d148 --- /dev/null +++ b/2609/CH4/EX4.8/ex_4_8.sce @@ -0,0 +1,11 @@ +////Ex 4.8
+clc;
+clear;
+close;
+format('v',5);
+Iin=1;//mA
+Rf=1;//kohm
+IB=0;//for ideal opamp
+If=Iin-IB;//mA
+Vout=-If*Rf;//V
+disp(Vout,"Output Voltage(V)");
diff --git a/2609/CH4/EX4.9/ex_4_9.sce b/2609/CH4/EX4.9/ex_4_9.sce new file mode 100755 index 000000000..2d1689658 --- /dev/null +++ b/2609/CH4/EX4.9/ex_4_9.sce @@ -0,0 +1,17 @@ +////Ex 4.9
+clc;
+clear;
+close;
+format('v',5);
+I2=1;//mA
+Rf=4.7;//kohm
+//Case 1st
+I1=500;//micro A
+Vout1=-I1*10^-6*Rf*10^3;//V
+disp(Vout1,"For 500 micro A current, Output Voltage(V)");
+//Case 2nd
+I2=1;//mA
+Vout2=-I2*10^-3*Rf*10^3;//V
+disp(Vout2,"For 1 mA current, Output Voltage(V)");
+deltaVout=Vout2-Vout1;//V
+disp(deltaVout,"Variation in Output Voltage(V)");
|