source: branches/newlanguage/sample/heat_exchangers/Sample_Simplified.mso @ 144

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

testing some modifications for the new language

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