source: trunk/sample/heat_exchangers/Sample_PHE.mso @ 253

Last change on this file since 253 was 253, checked in by gerson bicca, 16 years ago

added a shortcut model for plate and frame heat exchanger

File size: 2.9 KB
Line 
1#*-------------------------------------------------------------------
2* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
3*
4* This LIBRARY is free software; you can distribute it and/or modify
5* it under the therms of the ALSOC FREE LICENSE as available at
6* http://www.enq.ufrgs.br/alsoc.
7*
8* EMSO Copyright (C) 2004 - 2007 ALSOC, original code
9* from http://www.rps.eng.br Copyright (C) 2002-2004.
10* All rights reserved.
11*
12* EMSO is distributed under the therms of the ALSOC LICENSE as
13* available at http://www.enq.ufrgs.br/alsoc.
14*
15*--------------------------------------------------------------------
16* Sample file for a Plate Heat Exchanger
17*--------------------------------------------------------------------
18*
19* This sample file needs VRTherm (www.vrtech.com.br) to run.
20*
21*----------------------------------------------------------------------
22* Author: Gerson B. Bicca
23* $Id: Sample_PHE.mso 157 2007-02-07 13:44:17Z rafael $
24*--------------------------------------------------------------------*#
25
26using "heat_exchangers/PHE";
27
28FlowSheet Plate_and_Frame
29
30PARAMETERS
31        PP                      as Plugin (Type ="PP", LiquidModel = "PR", VapourModel = "PR",
32                                                                        Components = ["water"]);
33        NComp           as Integer;
34       
35DEVICES
36
37        exchanger as PHE;
38        InletHot        as source;
39        InletCold   as source;
40
41CONNECTIONS
42
43        InletHot.Outlet                 to exchanger.InletHot;
44        InletCold.Outlet                        to exchanger.InletCold;
45
46SET
47
48NComp   = PP.NumberOfComponents;
49
50exchanger.Method = "NTU";
51#exchanger.Method = "LMTD";
52exchanger.SideOne = "cold";
53#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
54# PHE Geometrical Parameters and Alocation
55#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
56        exchanger.ChevronAngle  =       "60";
57        exchanger.Nplates                               = 129;
58        exchanger.NpassHot                      = 4;
59        exchanger.NpassCold                     = 2;
60        exchanger.Dports                                = 15*'cm';
61        exchanger.PhiFactor                     = 1.17;
62        exchanger.Lv                                                    = 155*'cm';
63        exchanger.Lw                                            = 70*'cm';
64        exchanger.pitch                                 = 3.7*'mm';
65        exchanger.pt                                                    = 0.70*'mm';
66        exchanger.Kwall                                 = 17 *'W/m/K';
67#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
68#       Fouling
69#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
70exchanger.Rfc= 3.4e-5*'m^2*K/W';
71exchanger.Rfh = 9e-6*'m^2*K/W';
72
73SPECIFY
74#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
75#               Hot Stream
76#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
77        InletHot.Fw                     = 21                    * 'kg/s';
78        InletHot.Outlet.T       = (87+273.15)   * 'K';
79        InletHot.Outlet.P       = 2                     * 'atm';
80        InletHot.Outlet.z       = [1];
81       
82#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
83#       Cold Stream
84#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
85        InletCold.Fw                            = 62.5                          * 'kg/s';
86        InletCold.Outlet.P              = 2                     * 'atm';
87        InletCold.Outlet.T              = (20+273.15)   * 'K';
88    InletCold.Outlet.z          = [1];
89       
90OPTIONS
91
92Dynamic  = false;
93GuessFile = "GuessPHE";
94
95end
96
Note: See TracBrowser for help on using the repository browser.