source: mso/sample/heat_exchangers/Eshell_Detailed_LMTD.mso @ 26

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

updated heat exchangers model and samples

File size: 2.9 KB
Line 
1
2using "Heat_exchangers/HeatExchangerDetailed.mso";
3
4#===============================================================
5#   Heat Exchanger TEMA E Shell - LMTD Method
6#===============================================================       
7FlowSheet Exchanger_E_shell_Detailed_LMTD
8       
9DEVICES
10        exchanger               as E_Shell_LMTD_Det;
11        streamhot_in    as streamTP;
12        streamcold_in   as streamTP;
13       
14CONNECTIONS
15        streamhot_in    to exchanger.Inlet.Hot;
16        streamcold_in   to exchanger.Inlet.Cold;
17       
18PARAMETERS
19        PP                      as CalcObject   (File="vrpp");
20        NComp           as Integer;
21        HE                      as CalcObject   (File="Heatex");
22
23SET
24
25        PP.Components           = ["water"];
26        HE.HotSide              = "Shell";
27        HE.LMTDcorrection       = "Bowmann";
28#       HE.LMTDcorrection       = "Fakeri";
29        PP.LiquidModel          = "RK";
30        PP.VapourModel          = "RK";
31        NComp                           = PP.NumberOfComponents;
32#=====================================================================
33#       Shell Geometrical Parameters
34#=====================================================================       
35exchanger.Tpass                         = 2;
36exchanger.Dishell               = 0.75  *"m";
37exchanger.Lcf                   = 0.043  *"m";
38exchanger.Nss                   = 1;
39exchanger.Donozzle_Shell    = 0.1937    *"m";
40exchanger.Dinozzle_Shell    = 0.1937    *"m";
41exchanger.Honozzle_Shell    = 0.0225    *"m";
42exchanger.Hinozzle_Shell    = 0.02155   *"m";
43
44#=====================================================================
45#       Tubes Geometrical Parameters
46#=====================================================================
47exchanger.Ntt                   = 500;
48exchanger.Pattern               = 30;
49exchanger.pitch                 = 0.0254        *"m";
50exchanger.Ltube                 = 5.5   *"m";
51exchanger.Ditube                = 0.013395  *"m";
52exchanger.Dotube                = 0.015875      *"m";
53exchanger.Kwall                         = 0.57          *"kW/m/K";
54exchanger.Donozzle_Tube     = 0.203     *"m";
55exchanger.Dinozzle_Tube         = 0.203         *"m";
56#=====================================================================
57#       Baffles Geometrical Parameters
58#=====================================================================
59exchanger.Lcd           = 0.0047        *"m";
60exchanger.Bc            = 25;
61exchanger.Ltd           = 0.00039  *"m";
62exchanger.Nb                    = 6;
63
64SPECIFY
65#============================================
66#   Hot Stream
67#============================================
68        streamhot_in.F  = 40    * "mol/s";
69        streamhot_in.T  = 400* "K";
70        streamhot_in.z  = [1]     ;
71        streamhot_in.P  = 740     * "kPa";
72#============================================
73#   Cold Stream
74#============================================   
75        streamcold_in.F  = 75                   * "mol/s";
76        streamcold_in.T  = 333   * "K";
77        streamcold_in.z  = [1];
78        streamcold_in.P  = 2210*"kPa";
79#=====================================================================
80#       Baffle Spacing
81#=====================================================================
82        exchanger.Baffles.Ls    = 0.622         *"m";
83        exchanger.Baffles.Lsi   = 0.807  *"m";
84
85OPTIONS
86 mode                           = "steady";
87 relativeAccuracy       = 1e-6;
88
89end
Note: See TracBrowser for help on using the repository browser.