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

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

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