summaryrefslogtreecommitdiff
path: root/3636/CH10/EX10.4/Ex10_4.sce
blob: 312889b1a6af1789828005baf27329f01dd396f1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clc;
clear;
Na=5*10^16 //in cm^3
Nd=5*10^16 //in cm^3
Dn=25 //in cm^2/s
Dp=10 //in cm^2/s
tau_n0=6*10^-7 //in s
tau_p0=2*10^-7 //in s
VR=6 //in V
GL=5*10^20 //in cm^-3/s
ni=1.5*10^10 //in cm^-3
e=1.6*10^-19 //in Joules
epsilon_s=11.7*8.85*10^-14 //in F/cm
Const=0.026 //constant for KT/e in V

//Calculation
Ln=sqrt(Dn*tau_n0) //in mico-m
Lp=sqrt(Dp*tau_p0) //in micro-m
Vbi=Const*log((Na*Nd)/ni^2) //in V
W=(((2*epsilon_s)/e)*((Na+Nd)/(Na*Nd))*(Vbi+VR))^0.5 //in micro-m
JL=e*GL*(W+Ln+Lp) //photocurrent density

mprintf("steady-state photocurrent density= %0.2f A/cm^2",JL)