summaryrefslogtreecommitdiff
path: root/1373/CH12/EX12.17/Chapter12_Example17.sce
blob: 5adfcf8fbe3054e5047d46d99746bd72437ee1b5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Chapter-12, Example 12.17, Page 533
//=============================================================================
clc
clear

//INPUT DATA
Tci=20;//Inlet temperature of water in degree C
Tco=50;//Outlet temperature of water in degree C
Th=120;//Temperature at which steam condenses in degree C
newTci=15;//New Inlet temperature of water in degree C

//CALCULATIONS
newTco=(((Tco-Tci)*(Th-newTci))/(Th-Tci))+newTci;//New outlet temperature of water in degree C

//OUTPUT
mprintf('New outlet temperature of water is %3.1f degree C',newTco)

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