blob: 6aa3e0c6084f62a4f5410611c8cc658b4c08867b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
//Example number 8.2, Page number 8.17
clc;clear;close
// Variable declaration
F_500=1*10**-10 //unitless
k=poly([0],'k')
T1=500+273 // in K
T2=1000+273 // in K
// Calculations
lnx=log(F_500)*T1/T2; // vacancies
x=exp(lnx) //Fraction of vacancies
printf("Fraction of vacancies at 1000 degrees C = %.1e",x)
|
