summaryrefslogtreecommitdiff
path: root/587/CH14/EX14.10/example14_10.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /587/CH14/EX14.10/example14_10.sce
downloadScilab-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-x587/CH14/EX14.10/example14_10.sce24
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