source: branches/gui/sample/heat_exchangers/Sample_LNG.mso @ 602

Last change on this file since 602 was 581, checked in by gerson bicca, 14 years ago

more updates

  • Property svn:keywords set to Id
File size: 6.3 KB
Line 
1
2#*-------------------------------------------------------------------
3* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
4*
5* This LIBRARY is free software; you can distribute it and/or modify
6* it under the therms of the ALSOC FREE LICENSE as available at
7* http://www.enq.ufrgs.br/alsoc.
8*
9* EMSO Copyright (C) 2004 - 2007 ALSOC, original code
10* from http://www.rps.eng.br Copyright (C) 2002-2004.
11* All rights reserved.
12*
13* EMSO is distributed under the therms of the ALSOC LICENSE as
14* available at http://www.enq.ufrgs.br/alsoc.
15*
16*--------------------------------------------------------------------
17* Sample file with Multistream Heat Exchanger
18*--------------------------------------------------------------------
19*
20* This sample file needs VRTherm (www.vrtech.com.br) to run.
21*
22*----------------------------------------------------------------------
23* Author: Gerson B. Bicca
24* $Id: Sample_LNG.mso 581 2008-07-26 21:11:53Z bicca $
25*--------------------------------------------------------------------*#
26
27using "heat_exchangers/heater";
28using "heat_exchangers/Mheatex";
29
30FlowSheet LNG_Process_With_Mheatex
31
32        PARAMETERS
33        PP as Plugin (
34           Brief="Physical Properties",
35           Type="PP",
36           Components = ["methane", "ethane", "propane", "isobutane", "n-butane", "isopentane", "n-pentane"],
37       LiquidModel = "PR",
38       VapourModel = "PR"
39        );
40        NComp   as Integer;
41
42DEVICES
43
44        Feed                                    as simple_source                (Brief= "Feed Plant");
45        HotOne                  as simple_source                (Brief= "Hot Stream");
46        ColdOne                 as simple_source                (Brief= "Cold Stream 1");
47        ColdTwo                 as simple_source                (Brief= "Cold Stream 2");
48       
49        Feed_out                as simple_sink                  (Brief= "Feed Stream Out");
50        HotOne_out              as simple_sink                  (Brief= "Hot Stream Out");
51        ColdOne_out                     as simple_sink                  (Brief= "Cold Stream 1 Out");
52        ColdTwo_out                     as simple_sink                  (Brief= "Cold Stream 2 Out");
53       
54        LNG                     as Mheatex      (Brief= "LNG Heat Exchanger");
55
56SET
57
58        NComp = PP.NumberOfComponents;
59
60        LNG.Nhot     = 2;
61    LNG.Ncold   = 2;
62
63        LNG.FlowDirection  = "counter";
64
65CONNECTIONS
66
67        Feed.Outlet                                     to LNG.InletHot(1);
68        HotOne.Outlet                           to LNG.InletHot(2);
69       
70        ColdOne.Outlet                  to LNG.InletCold(1);
71        ColdTwo.Outlet                  to LNG.InletCold(2);
72
73        LNG.OutletHot(1)                        to Feed_out.Inlet;
74        LNG.OutletHot(2)                        to HotOne_out.Inlet;
75       
76        LNG.OutletCold(1)                       to ColdOne_out.Inlet;
77        LNG.OutletCold(2)                       to ColdTwo_out.Inlet;
78
79        SPECIFY
80
81#Streams Specification
82
83        Feed.F = 1000.00 * 'kmol/h';
84        Feed.T_Cdeg = 20 * 'K';
85        Feed.P = 500.00 * 'kPa';
86        Feed.MolarComposition = [0.5386,0.1538,0.0769,0.0692,0.0615,0.0538,0.0462];
87       
88        HotOne.F = 50.00 * 'kmol/h';
89        HotOne.T_Cdeg = 30 * 'K';
90        HotOne.P = 5000.00 * 'kPa';
91        HotOne.MolarComposition = [0.9500,0.0500,0.0,0.0,0.0,0.0,0.0];
92
93        ColdOne.F = 75.00 * 'kmol/h';
94        ColdOne.T_Cdeg = -87 * 'K';
95        ColdOne.P = 2000.00 * 'kPa';
96        ColdOne.MolarComposition = [0.9500,0.0500,0.0,0.0,0.0,0.0,0.0];
97
98        ColdTwo.F = 904.2282* 'kmol/h';
99        ColdTwo.T_Cdeg = -78 * 'K';
100        ColdTwo.P = 250.00 * 'kPa';
101        ColdTwo.MolarComposition = [0.020,0.98,0.0,0.0,0.0,0.0,0.0];
102
103#LNG Specification
104
105        LNG.OutletHot(2).T = (25.0+273.15) * 'K';
106        LNG.OutletHot(2).P = 4990.00 * 'kPa';
107       
108        LNG.OutletCold(1).T = (21.65+273.15) * 'K';
109        LNG.OutletCold(1).P = 1950.00 * 'kPa';
110       
111        LNG.OutletCold(2).T= (-70+273.15) * 'K';
112        LNG.OutletCold(2).P = 245.00 * 'kPa';
113       
114        LNG.OutletHot(1).P = 500.00 * 'kPa';
115       
116        LNG.Method.Fc = 1;
117
118OPTIONS
119        Dynamic         = false;
120
121end
122
123FlowSheet LNG_Process_With_Heater
124
125        PARAMETERS
126        PP as Plugin (
127           Brief="Physical Properties",
128           Type="PP",
129           Components = ["methane", "ethane", "propane", "isobutane", "n-butane", "isopentane", "n-pentane"],
130       LiquidModel = "PR",
131       VapourModel = "PR"
132        );
133        NComp   as Integer;
134
135DEVICES
136        Heat1                           as energy_source;
137        Heat2                           as energy_source;
138        Heat3                           as energy_source;
139        Heat4                           as energy_source;
140       
141        Feed                                    as simple_source                (Brief= "Feed Plant");
142        HotOne                  as simple_source                (Brief= "Hot Stream");
143        ColdOne                 as simple_source                (Brief= "Cold Stream 1");
144        ColdTwo                 as simple_source                (Brief= "Cold Stream 2");
145       
146        Feed_out                as simple_sink                  (Brief= "Feed Stream Out");
147        HotOne_out              as simple_sink                  (Brief= "Hot Stream Out");
148        ColdOne_out                     as simple_sink                  (Brief= "Cold Stream 1 Out");
149        ColdTwo_out                     as simple_sink                  (Brief= "Cold Stream 2 Out");
150       
151        LNG1                    as heater       (Brief= "Heater Heat Exchanger");
152        LNG2                    as heater       (Brief= "Heater Heat Exchanger");
153        LNG3                    as heater       (Brief= "Heater Heat Exchanger");
154        LNG4                    as heater       (Brief= "Heater Heat Exchanger");
155
156SET
157
158        NComp = PP.NumberOfComponents;
159
160        LNG1.Ninlet     = 1;
161        LNG2.Ninlet     = 1;
162        LNG3.Ninlet     = 1;
163        LNG4.Ninlet     = 1;
164       
165        LNG1.Kvalues            = "no";
166        LNG2.Kvalues            = "no";
167        LNG3.Kvalues            = "no";
168        LNG4.Kvalues            = "no";
169
170CONNECTIONS
171
172        HotOne.Outlet                           to LNG1.Inlet(1);
173        ColdOne.Outlet                  to LNG2.Inlet(1);
174        ColdTwo.Outlet                  to LNG3.Inlet(1);
175        Feed.Outlet                                     to LNG4.Inlet(1);
176
177        LNG1.Outlet                                     to HotOne_out.Inlet;
178        LNG2.Outlet                                     to ColdOne_out.Inlet;
179        LNG3.Outlet                                     to ColdTwo_out.Inlet;
180        LNG4.Outlet                                     to Feed_out.Inlet;
181       
182        Heat1.OutletQ                           to LNG1.Heat;
183        Heat2.OutletQ                           to LNG2.Heat;
184        Heat3.OutletQ                           to LNG3.Heat;
185        Heat4.OutletQ                           to LNG4.Heat;
186
187        SPECIFY
188
189#Streams Specification
190
191        HotOne.F = 50.00 * 'kmol/h';
192        HotOne.T_Cdeg = 30.0 * 'K';
193        HotOne.P = 5000.00 * 'kPa';
194        HotOne.MolarComposition = [0.9500,0.0500,0.0,0.0,0.0,0.0,0.0];
195
196        ColdOne.F = 75.00 * 'kmol/h';
197        ColdOne.T_Cdeg = -87 * 'K';
198        ColdOne.P = 2000.00 * 'kPa';
199        ColdOne.MolarComposition = [0.9500,0.0500,0.0,0.0,0.0,0.0,0.0];
200
201        ColdTwo.F = 904.2282* 'kmol/h';
202        ColdTwo.T_Cdeg = -78 * 'K';
203        ColdTwo.P = 250.00 * 'kPa';
204        ColdTwo.MolarComposition = [0.020,0.98,0.0,0.0,0.0,0.0,0.0];
205       
206        Feed.F = 1000.00 * 'kmol/h';
207        Feed.T_Cdeg = 20.0 * 'K';
208        Feed.P = 500.00 * 'kPa';
209        Feed.MolarComposition = [0.5386,0.1538,0.0769,0.0692,0.0615,0.0538,0.0462];
210       
211#Heater Specification
212
213        LNG1.Outlet.T = (25.0+273.15) * 'K';
214        LNG1.Outlet.P = 4990.00 * 'kPa';
215       
216        LNG2.Outlet.T = (21.65+273.15) * 'K';
217        LNG2.Outlet.P = 1950.00 * 'kPa';
218       
219        LNG3.Outlet.T= (-70+273.15) * 'K';
220        LNG3.Outlet.P = 245.00 * 'kPa';
221       
222        LNG4.Outlet.P = 500.00 * 'kPa';
223
224EQUATIONS
225
226        Heat4.OutletQ = -sum(Heat2.OutletQ+Heat3.OutletQ)+Heat1.OutletQ;
227
228OPTIONS
229        Dynamic         = false;
230
231end
232
Note: See TracBrowser for help on using the repository browser.