summaryrefslogtreecommitdiff
path: root/147/CH10/EX10.5/Example10_5.sce
blob: 0f19db771071f02eb6950ed6eac3d1e67afa4fbc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
close();
clear;
clc;
//voltage gain 'Av'
Aol = -10^(6);
Av = 1;
Rd = 1*10^(6); //ohm

//(a)
//writing a loop equation
//let vs be any constant
vs = 1;
vo = vs/(1-(1/Aol));
if(vs==round(vo)) then 
  mprintf("Prooved that vo=vs\n\n");
end

//(b)
//amplifier input impedance 'Zin'
Zin = (1-Aol)*Rd; //ohm
mprintf("Zin = %d Tohm",Zin/(10^12));