source: mso/sample/heat_exchangers/Mheater_project.mso @ 89

Last change on this file since 89 was 89, checked in by Paula Bettio Staudt, 15 years ago

Updated heat_exchangers sample file headers

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 3.7 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 Cocurrent Multistream Heat Exchanger
17*
18*       cold1 in ------->########-------->cold1 out
19*       cold2 in -------># HEX  #-------->cold2 out
20*       Hot1 in  ------->#      #-------->Hot1 out
21*       Hot2 in  ------->########-------->Hot2 out
22*       
23*--------------------------------------------------------------------
24*
25* This sample file needs VRTherm (www.vrtech.com.br) to run.
26*
27*----------------------------------------------------------------------
28* Author: Gerson B. Bicca
29* $Id: Mheater_project.mso 89 2006-12-11 15:26:11Z paula $
30*--------------------------------------------------------------------*#
31
32using "heat_exchangers/Mheatex";
33
34FlowSheet MHeater_Project
35       
36DEVICES
37
38        Mheater                 as Mheatex;
39        streamcold1     as stream_therm;
40        streamhot1              as stream_therm;
41        streamhot2              as stream_therm;
42        streamcold2             as stream_therm;
43       
44CONNECTIONS
45
46        streamcold1     to Mheater.Inlet.Cold(1);
47        streamhot1      to Mheater.Inlet.Hot(1);
48        streamhot2      to Mheater.Inlet.Hot(2);
49        streamcold2     to Mheater.Inlet.Cold(2);
50       
51PARAMETERS
52
53        PP                      as CalcObject   (File="vrpp");
54#       HE                      as CalcObject   (File="heatex");
55        NComp           as Integer              (Brief="Number Components");
56        Ncold           as Integer              (Brief="Number of Inlet Cold Streams");
57        Nhot            as Integer              (Brief="Number of Inlet Hot Streams");
58       
59SET
60
61        PP.LiquidModel  = "RK";
62        PP.VapourModel  = "RK";
63        PP.Components   = ["water","methanol","benzene"];
64        NComp                   = PP.NumberOfComponents;
65        Mheater.Nhot            = 2;
66    Mheater.Ncold               = 2;
67        Mheater.HE.FlowDirection      = "Cocurrent";
68#       HE.FlowDirection      = "Counter";
69
70       
71SPECIFY
72#=====================================================================
73#       Cold Streams
74#=====================================================================
75        streamcold1.F           = 500   * "kmol/h";
76        streamcold1.P           = 1     * "atm";
77        streamcold1.T           = 278   * "K";
78        streamcold1.v           = 0;
79    streamcold1.z               = [1,0,0];
80       
81        streamcold2.F           = 50   * "kmol/h";
82        streamcold2.P           = 1     * "atm";
83        streamcold2.T           = 298   * "K";
84        streamcold2.v           = 0;
85    streamcold2.z               = [1,0,0];
86
87#=====================================================================
88#       Hot Streams 
89#=====================================================================
90        streamhot1.F            = 100* "kmol/h";
91        streamhot1.P            = 1     * "atm";
92        streamhot1.T            = 330   * "K";
93        streamhot1.v            = 0;
94    streamhot1.z                = [0,1,0];
95       
96        streamhot2.F            = 100* "kmol/h";
97        streamhot2.P            = 1     * "atm";
98        streamhot2.T            = 313   * "K";
99        streamhot2.v            = 0;
100    streamhot2.z                = [0,0,1];
101       
102#=====================================================================
103#       Temperature Outlet
104#===================================================================== 
105        Mheater.Outlet.Hot(1).T         = 308*"K";
106        Mheater.Outlet.Hot(2).T         = 303*"K";
107        Mheater.Outlet.Cold(2).T        = 299*"K";
108
109#=====================================================================
110#       Pressure Outlet
111#=====================================================================
112        Mheater.Outlet.Hot(1).P         = 1 * "atm";
113        Mheater.Outlet.Hot(2).P         = 1 * "atm";
114        Mheater.Outlet.Cold(1).P        = 1 * "atm";
115        Mheater.Outlet.Cold(2).P        = 1 * "atm";
116       
117OPTIONS
118 
119        mode                    = "steady";
120        relativeAccuracy        = 1e-8;
121       
122end
123
Note: See TracBrowser for help on using the repository browser.