summaryrefslogtreecommitdiff
path: root/226/CH1/EX1.3/example3_sce.sce
blob: c3c77b64a080d6a9a5094bac97dc8c3366450f3f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//chapter 1
//example 1.3
//page 19
printf("\n")
printf("given")
l=1*10^-3;a=.1*10^-4;
ni=1.5*10^10;p=1.5*10^10;
disp("a)")
un=1500;up=500;//in cm3/V.s
q=1.6*10^-19;
m=q*((ni*un)+(p*up))*10^6;
printf( "mobility is %3.2fmicro/ohmcm\n",m)
R=l/(m*a);
printf(" resistance is %3.2fMohm\n",R)
disp("b)")
//for doped material
n=8*10^13;
p=(ni^2)/n
m=q*((n*un)+(p*up));
printf("mobility is %3.4f/ohmcm\n",m)
R=l/(m*a);
printf(" resistance is %dohm\n",R)