diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /587/CH14/EX14.10/example14_10.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '587/CH14/EX14.10/example14_10.sce')
-rwxr-xr-x | 587/CH14/EX14.10/example14_10.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/587/CH14/EX14.10/example14_10.sce b/587/CH14/EX14.10/example14_10.sce new file mode 100755 index 000000000..d19eaba60 --- /dev/null +++ b/587/CH14/EX14.10/example14_10.sce @@ -0,0 +1,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
|