summaryrefslogtreecommitdiff
path: root/2045/CH2/EX2.4/Ex2_4.sce
blob: 06767601a7acfbfabfe4e56d669096203c1237f8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//pagenumber 101 example 4
clear
w=0.9;
voltaf=0.05;//volt
revcur=10*10^-6;//ampere
//(1) voltage
volrev=0.026*(log((-w+1)));//voltage at which the reverse saturation current at saturate
resacu=((exp(voltaf/0.026)-1)/((exp(-voltaf/0.026)-1)));//reverse saturation current
disp("voltage at which the reverse saturation current at saturate   =   "+string((volrev))+"volt");
disp("reverse saturation current   =   "+string((resacu))+"ampere");
u=0.1;
for q=1:3
        reverc=revcur*(exp((u/0.026))-1)
        disp("reverse saturation current "+string((u))+"   =   "+string((reverc))+"ampere");
        u=u+0.1;
end