source: mso/sample/heat_exchangers/Sample_Simplified.mso @ 89

Last change on this file since 89 was 89, checked in by Paula Bettio Staudt, 15 years ago

Updated heat_exchangers sample file headers

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 3.2 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 model HeatExchanger_LMTD and HeatExchanger_NTU
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_Simplified.mso 89 2006-12-11 15:26:11Z paula $
24*--------------------------------------------------------------------*#
25
26using "heat_exchangers/HeatExchangerSimplified.mso";
27
28FlowSheet LMTD_Method
29DEVICES
30
31        exchanger       as HeatExchanger_LMTD;
32        streamhot       as stream_therm;
33        streamcold      as stream_therm;
34
35CONNECTIONS
36
37        streamhot       to exchanger.Inlet.Hot;
38        streamcold      to exchanger.Inlet.Cold;
39       
40PARAMETERS
41        PP                      as CalcObject   (File="vrpp");
42        NComp           as Integer;
43SET
44
45        PP.LiquidModel     = "RK";
46        PP.VapourModel     = "RK";
47        PP.Components           = ["water"];
48        NComp                           = PP.NumberOfComponents;
49       
50#       exchanger.HE.FlowDirection      = "Cocurrent";
51        exchanger.HE.FlowDirection      = "Counter";
52
53SPECIFY
54
55        exchanger.Details.A                             = 65.031*"m^2";
56        exchanger.Details.U                             = 0.75*"W/(m^2*K)";
57        exchanger.PressureDrop.Hot.Pdrop        = 0*"atm";
58        exchanger.PressureDrop.Cold.Pdrop   = 0*"atm";
59        exchanger.Fc                                    = 1;
60       
61        streamhot.F                                     = 1000    * "kmol/h";
62        streamhot.T                                     = 450     * "K";
63        streamhot.v                                     = 1;
64        streamhot.P                                     = 1.5     * "atm";
65        streamhot.z                                     = [1];
66
67        streamcold.F                                    = 500   * "kmol/h";
68        streamcold.P                                    = 1     * "atm";
69        streamcold.T                                    = 350   * "K";
70        streamcold.v                                    = 0;
71    streamcold.z                                        = [1];
72       
73OPTIONS
74 mode                     = "steady";
75 relativeAccuracy = 1e-6;
76
77end
78
79FlowSheet NTU_Method
80DEVICES
81
82        exchanger       as HeatExchanger_NTU;
83        streamhot       as stream_therm;
84        streamcold      as stream_therm;
85
86CONNECTIONS
87
88        streamhot       to exchanger.Inlet.Hot;
89        streamcold      to exchanger.Inlet.Cold;
90       
91PARAMETERS
92        PP                      as CalcObject   (File="vrpp");
93        NComp           as Integer;
94SET
95
96        PP.LiquidModel     = "RK";
97        PP.VapourModel     = "RK";
98        PP.Components           = ["water"];
99        NComp                           = PP.NumberOfComponents;
100       
101        exchanger.HE.FlowDirection      = "Cocurrent";
102#       exchanger.HE.FlowDirection      = "Counter";
103
104SPECIFY
105
106        exchanger.Details.A                             = 65.031*"m^2";
107        exchanger.Details.U                             = 0.75*"W/(m^2*K)";
108        exchanger.PressureDrop.Hot.Pdrop        = 0*"atm";
109        exchanger.PressureDrop.Cold.Pdrop   = 0*"atm";
110       
111        streamhot.F                                     = 1000    * "kmol/h";
112        streamhot.T                                     = 450     * "K";
113        streamhot.v                                     = 1;
114        streamhot.P                                     = 1.5     * "atm";
115        streamhot.z                                     = [1];
116
117        streamcold.F                                    = 500   * "kmol/h";
118        streamcold.P                                    = 1     * "atm";
119        streamcold.T                                    = 350   * "K";
120        streamcold.v                                    = 0;
121    streamcold.z                                        = [1];
122       
123OPTIONS
124 mode  = "steady";
125end
126
Note: See TracBrowser for help on using the repository browser.