summaryrefslogtreecommitdiff
path: root/1373/CH12/EX12.16/Chapter12_Example16.sce
blob: 2562e62ea78f718ee42a6c8bbe623a18ce2d3999 (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
25
26
27
//Chapter-12, Example 12.16, Page 532
//=============================================================================
clc
clear

//INPUT DATA
A=15.82;//Total outside area of heat exchanger in m^2
Thi=110;//Inlet temperature of oil in degree C
Ch=1900;//Specific heat of oil in J/kg.K
mh=170.9;//Mass flow rate of oil in kg/min
mc=68;//Mass flow rate of water in kg/min
Tci=35;//Inlet temperature of water in degree C
U=320;//Overall heat transfer coefficient in W/m^2.K
Cc=4186;//Specific heat of water in J/kg.K

//CALCULATIONS
C1=((mh*Ch)/60);//Heat capacity of oil in W/K
C2=((mc*Cc)/60);//Heat capacity of water in W/K
D=(U*A*((1/C1)-(1/C2)));//Constant
r=(C1/C2);//Ratio of heat capacity of oil and water
Tho=Thi-(((Thi-Tci)*(1-exp(D)))/(r-exp(D)));//Outlet temperature of oil in degree C
Tco=Tci+(r*(Thi-Tho));//Outlet temperature of water in degree C

//OUTPUT
mprintf('The exit temperature of oil is %3.2f degree C \n The exit temperature of water is %3.1f degree C',Tho,Tco)

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