summaryrefslogtreecommitdiff
path: root/1373/CH12/EX12.10/Chapter12_Example10.sce
blob: 2597bed6a8563ebe6345d50eaeaa52c90881bce0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
//Chapter-12, Example 12.10, Page 517
//=============================================================================
clc
clear

//INPUT DATA
Ti=360;//Inlet temperature of hot fluid in degree C taken from Example no. 12.4 on page no. 510
To=300;//Outlet temperature of hot fluid in degree C taken from Example no. 12.4 on page no. 510
ti=30;//Inlet temperature of cold fluid in degree C taken from Example no. 12.4 on page no. 510
to=200;//Outlet temperature of cold fluid in degree C taken from Example no. 12.4 on page no. 510
U=800;//Overall heat transfer coefficient in W/m^2.K taken from Example no. 12.4 on page no. 510
Q=150000;//Calculated heat transfer rate in W from Example no. 12.4 on page no. 510 
Tlm=210.22//Calculated LMTD for counterflow arrangement in degree C taken from Example no. 12.4 on page no. 511

//CALCULATIONS
P=((to-ti)/(Ti-ti));//P value for calculation of correction factor
R=((Ti-To)/(to-ti));//R value for calculation of correction factor
F=0.98;//Correction Factor value taken from Fig.12.11 on page no.515
A=(Q/(U*F*Tlm));//Required surface area in a cross flow heat exchanger in m^2

//OUTPUT
mprintf('The required surface area in a cross flow heat exchanger is %3.2f m^2',A)

//=================================END OF PROGRAM==============================