blob: d19eaba60e47103a4b12c7912d6a2c37fd433d27 (
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
|
clear;
clc;
//Example14.10[Mass Convection inside a Circular Pipe]
//Given:-
D=0.015;//Inner Diameter[m]
T=300;//Temp of air[K]
P=1;//Pressure of air[atm]
v=1.2;//Average velocity of air[m/s]
nu=1.58*10^(-5);//Viscosity[m^2/s]
//Solution:-
//Water is Species Aand air is species B
D_AB=(1.87*10^(-10))*(T^2.072)/P;//[m^2/s]
disp("m^2/s",D_AB,"The mass diffusivity of water vapor in air at 300K is")
Re=v*D/nu;
disp(round(Re),"The Reynolds number for internal flow is")
if(Re<2300) then
disp("laminar Flow")
Sh=3.66;//Sherwood number equals to Nusselt number
h_mass=Sh*D_AB/D;//[m/s]
disp("m/s",h_mass,"The mass transfer coefficient is")
else
disp("Flow is not laminar")
end
|
