blob: 51fc97cb6bd6a96d78d44a7ec4e883087d3f6902 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
//Nonsteady-State Diffusion Time Computation II
clear;
clc;
printf("\tExample 5.3\n");
D500=4.8*10^-14; //Diffusion coefficient at 500 C
D600=5.3*10^-13; //Diffusion coefficient at 600 C
t600=10; //Time in hours to diffuse
t500=D600*t600/D500;
printf("\nTime to diffuse at 500 C is %.1f h\n",t500);
//End
|
