source: mso/sample/heat_exchangers/NTU_Method.mso @ 45

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

updated heat exchanger model

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 3.0 KB
Line 
1
2using "heat_exchangers/HeatExchangerDetailed.mso";
3
4 FlowSheet NTU_Method
5
6       
7DEVICES
8
9        exchanger       as E_Shell_NTU_Det;
10        streamhot       as streamTP;
11        streamcold      as streamTP;
12
13
14       
15CONNECTIONS
16
17        streamhot                               to exchanger.Inlet.Hot;
18        streamcold                              to exchanger.Inlet.Cold;
19       
20PARAMETERS
21
22        PP                      as CalcObject   (File="vrpp.dll");
23        HE                      as CalcObject   (File="heatex.dll");
24        NComp           as Integer;
25       
26SET
27#===============================================================
28#   Components - State Equation - Correlations
29#===============================================================
30       
31        PP.LiquidModel          = "RK";
32        PP.VapourModel          = "RK";
33        PP.Components           = ["water"];
34        NComp                           = PP.NumberOfComponents;
35        HE.HotSide          = "Shell";
36       
37#       HE.TurbulentFlow     = "Petukhov";
38        HE.TurbulentFlow     = "SiederTate";
39       
40#=====================================================================
41#       Shell Geometrical Parameters
42#=====================================================================   
43exchanger.Tpass                 = 2;
44exchanger.Dishell       = 1.2   *"m";
45exchanger.Lcf           = 0.007 *"m";
46exchanger.Nss           = 3;
47
48
49#=====================================================================
50#       Tubes Geometrical Parameters
51#=====================================================================
52exchanger.Ntt           = 360;
53exchanger.Pattern       = 30;
54exchanger.pitch         = 0.03048       *"m";
55exchanger.Ltube         = 5.3  *"m";
56exchanger.Ditube        = 0.01397  *"m";
57exchanger.Dotube        = 0.025146      *"m";
58exchanger.Kwall                 = 0.5588  *"W/m/K";
59
60#=====================================================================
61#       Baffles Geometrical Parameters
62#=====================================================================
63exchanger.Lcd           = 5.5e-3        *"m";
64exchanger.Bc            = 25;
65exchanger.Ltd           = 5e-4          *"m";
66exchanger.Nb                    = 5;
67exchanger.Donozzle_Shell    = 0.15405   *"m";
68exchanger.Dinozzle_Shell    = 0.15405   *"m";
69exchanger.Honozzle_Shell    = 0.0225    *"m";
70exchanger.Hinozzle_Shell    = 0.0225    *"m";
71exchanger.Donozzle_Tube     = 0.15405   *"m";
72exchanger.Dinozzle_Tube         = 0.15405       *"m";
73
74SPECIFY
75#============================================
76#   Hot Streams
77#============================================
78        streamhot.F                                     = 100    * "kmol/h";
79        streamhot.T                                     = 419    * "K";
80        streamhot.P                                     = 1     * "atm";
81        streamhot.z                                     = [1];
82
83#============================================
84#   Cold Streams
85#============================================   
86        streamcold.F                                    = 50   * "kmol/h";
87        streamcold.P                                    = 1     * "atm";
88        streamcold.T                                    = 363   * "K";
89    streamcold.z                                        = [1];
90#=====================================================================
91#       Baffles Spacing
92#=====================================================================
93       
94        exchanger.Baffles.Ls            = 1     *"m";
95        exchanger.Baffles.Lsi           = 1     *"m";
96       
97
98OPTIONS
99#============================================
100#   Simulation Options
101#============================================
102 mode                   = "steady";
103  relativeAccuracy = 1e-8;
104
105end
Note: See TracBrowser for help on using the repository browser.