summaryrefslogtreecommitdiff
path: root/2510/CH9/EX9.11/Ex9_11.sce
diff options
context:
space:
mode:
Diffstat (limited to '2510/CH9/EX9.11/Ex9_11.sce')
-rwxr-xr-x2510/CH9/EX9.11/Ex9_11.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/2510/CH9/EX9.11/Ex9_11.sce b/2510/CH9/EX9.11/Ex9_11.sce
new file mode 100755
index 000000000..b37c3251d
--- /dev/null
+++ b/2510/CH9/EX9.11/Ex9_11.sce
@@ -0,0 +1,21 @@
+//Variable declaration:
+P = 1.0132 * 10**5 //Air pressure (Pa)
+T = 300.0+273.0 //Air temperature (K)
+V = 5.0 //Air flow velocity (m/s)
+D = 2.54/100.0 //Diameter of tube (m)
+R = 287.0 //Gas constant (m^2/s^2.K)
+//From Appendix:
+Pr = 0.713 //Prandtl number of nitrogen
+mu = 1.784*10**(-5) //Dynamic viscosity of nitrogen (kg/m.s)
+k = 0.0262 //Thermal conductivity of nitrogen (W/m.K)
+Cp = 1.041 //Heat capacity of nitrogen (kJ/kg.K)
+
+//Calculation:
+p = P/(R*T) //Density of air
+Re = D*V*p/mu //Reynolds number
+//From table 9.5:
+Nu = 0.023*(Re**0.8)*(Pr**0.3) //Nusselt number
+h = (k/D)*Nu //Heat transfer coefficient (W/m^2.K)
+
+//Result:
+printf("The required Heat transfer coefficient is : %.2f W/m^2.K.",h)