blob: 52758e6cf39631e0feeaefb01ee8635e87664574 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
clc;
clear all;
disp("Heat loss/length")
a=0.6;// m
b=0.45;//m
H=1.5;//m
k=0.51;// W/(m*C)
tp=105;// degree C
ts=5;// degree C
x=log(1+H/a);
y=H/b;
Sfc=2.756*((x^(-.59))*(y^(-.078)));
Q=k*Sfc*(tp-ts);
disp("W",Q,"Heat loss per meter length, Q =")
|
