summaryrefslogtreecommitdiff
path: root/530/CH9/EX9.3.b/example_9_3b.sce
blob: 551d0a4040cc33623c2994bd0bf0ae0b082fd607 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
clear;
clc;

// A Textbook on HEAT TRANSFER by S P SUKHATME
// Chapter 9
// Mass Transfer


// Example 9.3(b)
// Page 352
printf("Example 9.3(b), Page 352 \n \n");

t = 0.04 ; // [m]
A = 2 ; // [m^2]
rho1 = 0.10 ;
rho2 = 0.01 ;
D_1200 = 3.5*10^-8 ; // at 1200k [m^2/s]

// Mass Diffusion in solid solution, assuming Ficks law is valid & steady state and one dimensional diffusion

// At 1200 K
// From eqn 9.3.3

m_1200 = A*D_1200*(rho1-rho2)/t ;
printf("(b) Rate of diffusion of Hydrogen at 1200 K = %e kg/s \n",m_1200);