summaryrefslogtreecommitdiff
path: root/3763/CH12/EX12.9/Ex12_9.sce
blob: 0b93d8550c8578801acab4c90caadafddf3bd105 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clear
//
//
//

//Variable declaration
D0=0.73*10**-4     //diffusion coefficient(m**2/s)
Q=170*10**3     //activation energy(J/mol)
R=8.314 
T=873    //temperature(K)

//Calculation
D=D0*exp(-Q/(R*T))     //diffusion(m**2/s)

//Result
printf("\n diffusion is %0.1f  *10**-15 m**2/s",D*10**15)