blob: 9c7a82bdfb1c82fbf430f892619f06d6f1d248fe (
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
|
clc();
clear;
// To calculate the heat transfer coefficient from the plate to the air
Tw = 196; // Temperature of plate in F
Ts = 79; // Temperature of the air in F
u = 587; // velocity in air in fps
x = 4/12; // Length of plate in ft
n = 20.4*10^-5; // Kinematic velocity
Cp = 1200; // Specific heat capacity
Re = u*x/n; // Reynolds number
r = 0.845; // Temperature recovery factor
tr = Ts+r*u*u/Cp; // Dynamic temperature in F
Pr = 0.697; // Pradtls number
p = 0.0657; // Density in lb/ft^3
t = 144.1; // Corresponding temperature in F
St = 0.0296*(Re)^-(1/5)/(1+1.75*0.87*(Re)^-(1/10)*(Pr-1));
// Strantons number
h = p*u*St*3600; // Heat transfer coefficient
hav = 1.215*h; // Average heat transfer coefficient
printf("The heat transfer coefficient from the palte to the air is %.1f Btu/hr-ft^2-F",hav);
|
