summaryrefslogtreecommitdiff
path: root/506/CH13/EX13.3.d/Example13_3d.sce
blob: 57e5fed898228c56d12a0554db588ac6114e5088 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
clear;
clc;

//Caption:Gain of second emitter to first basefeedback pair
//Given Data
Rc1=3;//in K
Rc2=0.5;//in K
Re=0.05;//in K
Rs=1.2;//in K
hfe=50;
hie=1.1;//in K
hre=0;
hoe=0;

R=Rs;

//Ai=-Ic2/Is=-(Ic2/Ib2)*(Ib2/Ic1)*(Ic1/Ib1)*(Ib1/Is)
// -Ic2/Ib2 =- hfe = -50
// Ic1/Ib1 = hfe
//Let Ib2/Ic1 = k
Ri2= hie + ((1+hfe)*(Re*R/(Re+R)));
k=-Rc1/(Rc1+Ri2);

r= Rs*(Rs+Re)/(Rs+R+Re);
//Let Ib1/Is = l
l=r/(r+hie);

Ai=(-hfe)*(k)*(hfe)*(l);

B=Re/(Re+R);//beta
D=1+(B*Ai);

Aif=Ai/D;

Avf=(Aif*Rc2)/Rs;

Rof=(Avf*Rs)/Aif;
disp('K',Rof,'Output Resistance = ');

//End