source: mso/sample/heat_exchangers/samples1.mso @ 68

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

added double pipe heat exchanger model and updated eml/heat_exchangers

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 1.7 KB
Line 
1
2using "heat_exchangers/HeatExchangerSimplified";
3
4 FlowSheet HeatExchanger_Block
5       
6DEVICES
7#===============================================================
8#   Heat Exchanger Shortcut Block - NTU Method
9#===============================================================
10
11        exchanger       as HeatExchanger_NTU;
12        streamhot       as stream_therm;
13        streamcold      as stream_therm;
14
15CONNECTIONS
16
17        streamhot       to exchanger.Inlet.Hot;
18        streamcold      to exchanger.Inlet.Cold;
19       
20PARAMETERS
21
22        PP                      as CalcObject   (File="vrpp");
23        NComp           as Integer;
24       
25SET
26
27        PP.LiquidModel          = "PR";
28        PP.VapourModel          = "PR";
29        PP.Components           = ["water"];
30        NComp                           = PP.NumberOfComponents;
31        exchanger.HE.FlowDirection      = "Counter";
32       
33SPECIFY
34#============================================
35#   Hot Streams
36#============================================
37        streamhot.F                                     = 100    * "kmol/h";
38        streamhot.T                                     = 450     * "K";
39        streamhot.v                                     = 1;
40        streamhot.P                                     = 1.5     * "atm";
41        streamhot.z                                     = [1];
42
43#============================================
44#   Cold Streams
45#============================================   
46        streamcold.F                                    = 50   * "kmol/h";
47        streamcold.P                                    = 1     * "atm";
48        streamcold.T                                    = 350   * "K";
49        streamcold.v                                    = 0;
50    streamcold.z                                        = [1];
51       
52#============================================
53#   Required Details
54#============================================
55        exchanger.Details.A                     = 65    *"m^2";
56        exchanger.Details.U                 = 0.74  *"W/m^2/K";
57        exchanger.PressureDrop.Hot.Pdrop        = 0*"atm";
58        exchanger.PressureDrop.Cold.Pdrop   = 0*"atm";
59       
60OPTIONS
61#============================================
62#   Simulation Options
63#============================================
64 mode                   = "steady";
65
66end
Note: See TracBrowser for help on using the repository browser.