blob: 9afb25c716fa2eb9a335801bf45a05ba18d4789f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
clc
//initialization of variables
T = 26.2 // centigrade
T0 = 4 // centigrade
Tinf = 40 //centigrade
z = 1.3//cm
t = 180 //seconds
//calculations
k = erfinv((T-T0)/(Tinf-T0))
alpha = (1/(4*t))*((z/k)^2)//cm^2/sec
//Results
printf("The thermal diffusivity is %.3f",alpha)//answer wrong in textbook
|