summaryrefslogtreecommitdiff
path: root/3763/CH3/EX3.11/Ex3_11.sce
blob: 2a4ee9d70ea8f4092edf1fb946e9475f9d4a361e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
clear
//
//
//

//Variable declaration
delta_Hf=1.6*10**-19      
T=500    //temperature(K)
N=6.026*10**23
k=1.38*10**-23    //boltzmann constant
mv=5.55    //molar volume(cm**3)
ne=10**6    //number of edge dislocations(per cm**3)
v=5*10**7    //number of vacancies
a=2*10**-8   //lattice parameter(cm)

//Calculation
n=(N/mv)*exp(-delta_Hf/(k*T))     //number of vacancies at 300K(per mol)
ac=n*a/(v*ne)      //amount of climb down(cm)

//Result
printf("\n amount of climb down is %0.5f  *10**-8 cm",ac*10**8)