source: branches/newlanguage/sample/heat_exchangers/MheaterTeste.mso @ 137

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

updated

  • Property svn:keywords set to Id
File size: 3.5 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: MheaterTeste.mso 100 2007-01-09 14:15:56Z bicca $
30*--------------------------------------------------------------------*#
31
32using "heat_exchangers/Mheatex.mso";
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       
44PARAMETERS
45
46        PP                      as CalcObject   (File="vrpp");
47        NComp           as Integer              (Brief="Number Components");
48       
49SET
50
51        PP.LiquidModel  = "PR";
52        PP.VapourModel  = "PR";
53        PP.Components   = ["water","methanol","benzene"];
54        NComp                   = PP.NumberOfComponents;
55       
56       
57        Mheater.HE.FlowDirection  = "Counter";
58        Mheater.Ncold = 2;
59        Mheater.Nhot  = 2;
60       
61CONNECTIONS
62
63        streamcold1     to Mheater.Inlet.Cold(1);
64        streamhot1      to Mheater.Inlet.Hot(1);
65        streamhot2      to Mheater.Inlet.Hot(2);
66        streamcold2     to Mheater.Inlet.Cold(2);
67       
68
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 
119mode    = "steady";
120       
121end
122
Note: See TracBrowser for help on using the repository browser.