blob: 617dd51de6e06d895b05f8fd46c6de4795c35589 (
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
28
29
|
clear;
clc;
// A Textbook on HEAT TRANSFER by S P SUKHATME
// Chapter 7
// Heat Exchangers
// Example 7.3
// Page 295
printf("Example 7.3, Page 295 \n \n");
// Because of change of phase , Thi = The
Thi = 100 ; // [C], Saturated steam
The = 100 ; // [C], Condensed steam
Tci = 30 ; // [C], Cooling water inlet
Tce = 70 ; // [C], cooling water outlet
R = (Thi-The)/(Tce-Tci) ;
S = (Tce-Tci)/(Thi-Tci) ;
// From fig 7.16
F = 1;
// For counter flow arrangement
Tm_counter = ((Thi-Tce)-(The-Tci))/log((Thi-Tce)/(The-Tci)); // [C]
// Therefore
Tm = F*Tm_counter ;
printf("Mean Temperaature Difference = %f C",Tm)
|