summaryrefslogtreecommitdiff
path: root/3492/CH1/EX1.9/Ex1_9.sce
blob: a751d70345b0f1e954e1fe01a9c263985e2604b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clc
//Chapter1
//Ex_1.9
//Given
k=1.38*10^-23 //J/K
T=300 //kelvin
Ev=0.75 //eV/atom
Ev=Ev*1.6*10^-19 //in J
T1=660//degree celcius
T1=T1+273 //in kelvin
//at room temperature
//let nv/N=nv_N for convenience
nv_N=exp(-Ev/(k*T))
disp(nv_N,"Fractional concentration of vacancies in the aluminium crystal at room temperature is")
//at melting temperature
//let nv/N=nv_N for convenience
nv_N=exp(-Ev/(k*T1))
disp(nv_N,"Fractional concentration of vacancies in the aluminium crystal at melting temperature is")