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

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

updated heat exchanger model

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