summaryrefslogtreecommitdiff
path: root/377/CH6/EX6.8/6_8.sce
blob: 11aa5ae348094e547d9517154b063b78c2621fbd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
N1=5.5*10^18;
N2=4.5*10^18;
q=1.6*10^-19;
K=1.38*10^-23;
T=500;
N=N1+N2;
printf('\n The total doping is %fcm^-3',N);
De=a*K*T/q;
printf('\n The value of De is %fcm^2/s',De);
c=-10^7;  //say c=dn/dx
F=-De*c;
printf('\n The value of F is %felectrons/cm^2-s',F);
J=q*F;
printf('\n The diffusion current density is %fpA/cm2',J*10^12);