blob: e92a71d6aebe3208d6df10f0c1b75e9c67c9f0f7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
clear;
clc;
printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 1.1 Page 5 ')//Example 1.1
// Find Wall Heat Loss - Problem of Pure Conduction Unidimensional Heat
L=.15; //[m] - Thickness of conducting wall
delT = 1400 - 1150; //[K] - Temperature Difference across the Wall
A=.5*1.2; //[m^2] - Cross sectional Area of wall = H*W
k=1.7; //[W/m.k] - Thermal Conductivity of Wall Material
//Using Fourier's Law eq 1.2
Q = k*delT/L; //[W/m^2] - Heat Flux
q = A*Q; //[W] - Rate of Heat Transfer
printf("\n \n Heat Loss through the Wall = %.2f W",q);
//END
|
