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

---
 1073/CH3/EX3.9/3_9.sce | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100755 1073/CH3/EX3.9/3_9.sce

(limited to '1073/CH3/EX3.9')

diff --git a/1073/CH3/EX3.9/3_9.sce b/1073/CH3/EX3.9/3_9.sce
new file mode 100755
index 000000000..e6faa8f33
--- /dev/null
+++ b/1073/CH3/EX3.9/3_9.sce
@@ -0,0 +1,27 @@
+
+clc;
+clear;
+//Example 3.9
+v=17.36*10^-6    //Viscosity for air    [sq m./s]
+k=0.0275    //for air ..[W/(m.K)]
+Cp=1.006    //[kJ/(kg.K)]
+Npr=0.7    //for air
+u_inf=2    //[m/s]
+x=0.2    //[m]
+Nre_x=u_inf*x/v    //Reynolds number at x=0.2    m
+//Since this is less than 3*10^5
+Nnu_x=0.332*sqrt(Nre_x)*(Npr^(1.0/3.0))
+hx=Nnu_x*k/x    //[W/(sq m.K]
+//Average value of heat transfer coeff is twice this value
+h=2*hx    //[W/sq m.K)]
+h=12.3      //Approximation
+w=1    //width in [m]
+A=x*w    //[sq m] Area of plate
+Tw=333    //[K]
+T_inf=300    //[K]
+Q=h*A*(Tw-T_inf)    //Heat flow in [W]
+printf("\nANSWER:\nHeat flow is :%f W\n",Q)
+//From both sides of plate:
+Q=2*Q    //[W]
+printf("\nANSWER\n Heat flow from both sides of plate is %f W",Q);
+ 
-- 
cgit