ME 353 Heat Transfer 1

M.M. Yovanovich

EX1P1.MWS

Example 1.1 of 4th edition of Incropera and DeWitt.

Steady conduction through the wall of an industrial furnace.

> restart:

System parameters.

> syspar:= (T1 = 1400*K, T2 = 1150*K, L = 0.15*m, k=1.7*W/m/K, A = 0.5*m*3*m);

[Maple Math]

Fourier's Law of Conduction.

> Q:= k*A*(T1-T2)/L;

[Maple Math]

Calculation of heat transfer through wall.

> Q:= evalf(subs(syspar, Q), 6);

[Maple Math]

The steady heat transfer rate through the furnace wall is [Maple Math] .