summaryrefslogtreecommitdiff
path: root/2510/CH9/EX9.9/Ex9_9.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2510/CH9/EX9.9/Ex9_9.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 '2510/CH9/EX9.9/Ex9_9.sce')
-rwxr-xr-x2510/CH9/EX9.9/Ex9_9.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/2510/CH9/EX9.9/Ex9_9.sce b/2510/CH9/EX9.9/Ex9_9.sce
new file mode 100755
index 000000000..b8de3f493
--- /dev/null
+++ b/2510/CH9/EX9.9/Ex9_9.sce
@@ -0,0 +1,15 @@
+//Variable declaration:
+m = 0.075 //Mass rate of air flow (kg/s)
+D = 0.225 //Diameter of tube (m)
+mu = 208*10**-7 //Dynamic viscosity of fluid (N)
+Pr = 0.71 //Prandtl number
+k = 0.030 //Thermal conductivity of air (W/m.K)
+
+//Calculation:
+Re = 4*m/(%pi*D*mu) //Reynolds number
+//From equation 9.26:
+Nu = 0.023*(Re**0.8)*(Pr**0.3) //Nusselt number
+h = (k/D)*Nu //Heat transfer coefficient of air (W/m^2.K)
+
+//Result:
+printf("The Heat transfer coefficient of air is : %.2f W/m^2.K.",h)