summaryrefslogtreecommitdiff
path: root/1073/CH3/EX3.9/3_9.sce
blob: e6faa8f3385993e4ab6a16f2dbc4dfe734ee7a0e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
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);