blob: 2d986c6391325d1dab7a7475ad19524996df440d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc;
clear all;
disp("thickness of layer")
L=0.55;//m
kA=2.3;//W/(m*K)
kB=0.2;//W/(m*K)
thf=900;// degree C
t2=520;// degree C
hhf=230;//W/(m^2*C)
hcf=46;//W/(m^2*C)
tcf=30;// degree C
//q=(thf-t2)/(1/hhf+La/kA)=(t2-tcf)/(1/hcf+(0.55-La)/kB)
La=1051.13/2113;//m
Lb=L-La;//m
disp ("mm",La*10^3,"La=")
disp ("mm",Lb*10^3,"Lb=")
q=(thf-t2)/(1/hhf+La/kA);
disp("W/m^2",q,"rate of heat transfer = ")
|
