summaryrefslogtreecommitdiff
path: root/1430/CH2/EX2.8/exa2_8.sce
blob: 244103d690797730a6b2c387da06231122cf63c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
// Example 2.8
// Equivalent Resistance with a VCCS(Voltage controlled Current Source)
function[R_eq]=VCCS(R,g_m)
// From figure 2.19, applying KCL at upper node
// i= i_R - i_c= (v/R)-(g_m*v) = ((1-g_m*R)*v )/R
if R*g_m == 1 then
    R_eq= %inf; // Circuits behaves like an open circuit
    else
R_eq= R/(1-g_m*R);// Equivalent Resistance of the circuit
end
endfunction
// For Example take g_m= 2 and R = 0.5
funcprot(0);
g_m= 2;
R= 0.5;
R_eq= VCCS(R,g_m);
disp(R_eq,"Equivalent Resistance of the circuit(in Ohms)=")