summaryrefslogtreecommitdiff
path: root/536/CH10/EX10.5/Example_10_5.sce
blob: d97d91f47a0238df2f35e50f6a8eeb13456e27fc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clear;
clc;

printf("Example 10.5\n");

N_dot=50; //Initial maas transfer rate
D=1.8e-9; //Diffusivity of gas in liquid phase

C_bg=(1/22.4)*(273/293); //bulk gas concentration
N_C=N_dot*C_bg; //Initial maas transfer rate in terms of cocentration
h=N_C/0.04;// Effective Mass transfer coefficient
R=1/h;//Equivalent resistance
printf("\n Equivalent resistance = %.4f s/m",R);
R_l=R*9; //Liquid phase resistance
h_l=1/R_l; //Liquid phase coefficient

//From equation 10.113 and using liquid phase resistance
t=R_l^2/(%pi/D);

printf("\n The required time is = %.2f *10^-11s",t*1e11)