From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2471/CH4/EX4.6/Ex4_6.sce | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 2471/CH4/EX4.6/Ex4_6.sce

(limited to '2471/CH4/EX4.6')

diff --git a/2471/CH4/EX4.6/Ex4_6.sce b/2471/CH4/EX4.6/Ex4_6.sce
new file mode 100755
index 000000000..ec8eda231
--- /dev/null
+++ b/2471/CH4/EX4.6/Ex4_6.sce
@@ -0,0 +1,24 @@
+clear ;
+clc;
+// Example 4.6
+printf('Example 4.6\n\n');
+printf('Page No. 98\n\n');
+
+// given
+v = 1.23;// velocity in m/s
+d = 25*10^-3;// diameter in m
+p = 980;// density in kg/m^3
+u = 0.502*10^-3;// viscosity in Ns/m^2
+Cp = 3.76*10^3;// Specific heat capacity in J/kg-K
+K = 0.532;// Thermal conductivity in W/m-K
+
+Re = (d*v*p)/u;//Reynolds Number
+Pr = (Cp*u)/K;// Prandtl Number
+Re_d = (Re)^0.8;
+Pr_d = (Pr)^0.4;
+
+// By Dittus-Boelter Equation
+//Nu = 0.0232 * Re^0.8 Pr^0.4 = (hd)/K
+Nu = 0.0232 * Re_d * Pr_d;// Nusselt Number
+h = (Nu*K)/d;//W/m^2-K
+printf('The film heat transfer coefficient is %3.2f W/sq.m K\n',h)// Deviation in answer due to direct substitution
-- 
cgit