summaryrefslogtreecommitdiff
path: root/1073/CH3/EX3.47/3_47.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1073/CH3/EX3.47/3_47.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 '1073/CH3/EX3.47/3_47.sce')
-rwxr-xr-x1073/CH3/EX3.47/3_47.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/1073/CH3/EX3.47/3_47.sce b/1073/CH3/EX3.47/3_47.sce
new file mode 100755
index 000000000..001d8706b
--- /dev/null
+++ b/1073/CH3/EX3.47/3_47.sce
@@ -0,0 +1,22 @@
+clc;
+clear;
+//Example 3.47
+mu=306*10^-6 //[N.s/m^2]
+k=0.668 //[W/m.K]
+rho=974 //[kg/m^3]
+lambda=2225 //[kJ/kg]
+lambda=lambda*10^3 //[J/kg.K]
+g=9.81 //[m/s^2]
+Ts=373 //[K]
+Tw=357 //[K]
+dT=Ts-Tw //[K]
+Do=25 //[mm]
+Do=Do/1000 //[m]
+h=0.725*((rho^2*g*lambda*k^3)/(mu*Do*dT))^(1.0/4.0) //[W/sq m.K]
+Q_by_l=h*%pi*Do*dT //[W/m]
+m_dot_byl=(Q_by_l/lambda) //[kg/s]
+m_dot_byl=m_dot_byl*3600 //[kg/h]
+
+printf("\nMean heat transfer coefficient is %f W/(sq m.K)\n",h);
+printf("\nHeat transfer per unit length is %f W/m\n",Q_by_l);
+printf("\nCondensate rate per unit length is %f kg/h",m_dot_byl);