summaryrefslogtreecommitdiff
path: root/25/CH11/EX11.4/11_4.sce
blob: 317263d14e3e7df3b33037f4a214195de9fda3af (plain)
1
2
3
4
5
6
7
8
//example:-11.4,page no.-596.
//program to calculate the impedence of the diode.
Cp=0.1*10^-12;Lp=2*10^-9;Cj=0.15*10^-12;Rs=10;Is=0.1*10^(-6);
Io1=0;Io2=60*10^(-6);alpha=(1/25)*(10^3);
R1j=1/(alpha*(Io1+Is)); // for Io=0.
R2j=1/(alpha*(Io2+Is)); // for Io=60 mA.
disp(R1j,'junction resistance for Io=0, in ohm = ')
disp(R2j,'junction resistance for Io=0, in ohm = ')