blob: 2332ec997d0153cf29a939c90ab362e20b083b2d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc;
clear all;
disp("Heat loss calculations")
k=1.05;// W/(m*C)
ti=600;//degree C
to=70;// degree C
L=0.12;//m
A=0.6*0.6;//m^2
Sfcwall=A/L;
D=0.6;//m
Sfcedge=0.54*D;
Sfccorner=0.15*L;
Sfct=6*Sfcwall+12*Sfcedge+8*Sfccorner;
Q=k*Sfct*(ti-to);
disp("W",Q,"Heat loss through walls, Q =")
|
