source: trunk/sample/heat_exchangers/Sample_Heater.mso @ 674

Last change on this file since 674 was 657, checked in by gerson bicca, 15 years ago

improved heater/cooler model
File size: 3.6 KB
RevLine 
[657]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 cooler and heater operation
17*--------------------------------------------------------------------
18*
19* This sample file needs VRTherm DEMO (www.vrtech.com.br) to run.
20*
21*----------------------------------------------------------------------
22* Author: Gerson B. Bicca
23* $Id: Sample_Heater.mso 89 2006-12-11 15:26:11Z paula $
24*--------------------------------------------------------------------*#
25
26using "heat_exchangers/heater";
27using "mixers_splitters/mixer";
28
29FlowSheet Sample_Heater
30       
31DEVICES
32
33        Heater                  as heater;
34        mixer1                  as mixer;
35        IN_1                    as source;
36        IN_2                    as source;
37        IN_3                    as source;
38        Heating                 as energy_source;
39        Sink_Stream     as sink;
40       
41CONNECTIONS
42
43        IN_1.Outlet                     to mixer1.Inlet(1);
44        IN_2.Outlet                     to mixer1.Inlet(2);
45        IN_3.Outlet                     to mixer1.Inlet(3);
46        mixer1.Outlet        to Heater.Inlet;
47        Heating.OutletQ.Q       to Heater.InletQ.Q;
48        Heater.Outlet              to Sink_Stream.Inlet;
49       
50PARAMETERS
51
52        PP                      as Plugin (Type ="PP", LiquidModel = "PR",VapourModel  = "PR",
53                                                        Components      = ["nitrogen","methane","ethane","propane","n-hexane","n-octane"]);
54        NComp           as Integer;
55       
56SET
57
58        NComp           = PP.NumberOfComponents;
59        mixer1.Ninlet = 3;
60       
61SPECIFY
62
63        IN_1.Fw                                 = 10   * 'kg/s';
64        IN_1.P                                  = 5     * 'atm';
65        IN_1.T                                  = (30+273)   * 'K';
66    IN_1.Composition            = [0.007,0.75,0.243,0,0,0];
67       
68        IN_2.Fw                                 = 12   * 'kg/s';
69        IN_2.P                                  = 5     * 'atm';
70        IN_2.T                                  = (33+273)   * 'K';
71    IN_2.Composition            = [0.003,0.66,0.33,0.005,0.001,0.001];
72       
73        IN_3.Fw                                 = 12   * 'kg/s';
74        IN_3.P                                  = 2     * 'atm';
75        IN_3.T                                  = (33+273)   * 'K';
76    IN_3.Composition            = [0,0.7,0.30,0,0,0];
77
78        #Heater.Outlet.T                = (66+273)*'K';
79        Heater.Outlet.P                 = 5* 'atm';
80        Heater.Outlet.v                 = 0.8;
81        #Heater.InletQ.Q                = 2500* 'kW';
82
83OPTIONS
84        Dynamic = false;
85       
86end
87
88FlowSheet Sample_Cooler
89       
90DEVICES
91
92        Cooler                  as cooler;
93        mixer1                  as mixer;
94        IN_1                    as source;
95        IN_2                    as source;
96        IN_3                    as source;
97        Sink_Stream     as sink;
98       
99CONNECTIONS
100
101       
102        IN_1.Outlet                     to mixer1.Inlet(1);
103        IN_2.Outlet                     to mixer1.Inlet(2);
104        IN_3.Outlet                     to mixer1.Inlet(3);
105        mixer1.Outlet                   to Cooler.Inlet;
106        Cooler.Outlet        to Sink_Stream.Inlet;
107       
108PARAMETERS
109
110        PP                      as Plugin (Type ="PP", LiquidModel = "PR",VapourModel  = "PR",
111                                                        Components      = ["nitrogen","methane","ethane","propane","n-hexane","n-octane"]);
112        NComp           as Integer;
113       
114SET
115
116        NComp           = PP.NumberOfComponents;
117        mixer1.Ninlet = 3;
118       
119SPECIFY
120
121        IN_1.Fw                                 = 10   * 'kg/s';
122        IN_1.P                                  = 5     * 'atm';
123        IN_1.T                                  = (30+273)   * 'K';
124    IN_1.Composition            = [0.007,0.75,0.243,0,0,0];
125       
126        IN_2.Fw                                 = 12   * 'kg/s';
127        IN_2.P                                  = 5     * 'atm';
128        IN_2.T                                  = (33+273)   * 'K';
129    IN_2.Composition            = [0.003,0.66,0.33,0.005,0.001,0.001];
130       
131        IN_3.Fw                                 = 12   * 'kg/s';
132        IN_3.P                                  = 2     * 'atm';
133        IN_3.T                                  = (33+273)   * 'K';
134    IN_3.Composition            = [0,0.7,0.30,0,0,0];
135
136        #Cooler.Outlet.T                = (66+273)*'K';
137        Cooler.Outlet.P                 = 5* 'atm';
138        Cooler.Outlet.v                 = 0.8;
139        #Cooler.InletQ.Q                = 2500* 'kW';
140
141OPTIONS
142        Dynamic = false;
143       
144end
145
Note: See TracBrowser for help on using the repository browser.