source: mso/sample/heat_exchangers/Eshell_Detailed_NTU.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

File size: 3.0 KB
Line 
1
2using "Heat_exchangers/HeatExchangerDetailed.mso";
3#===============================================================
4#   Heat Exchanger TEMA E Shell - NTU Method
5#   erro ao trocar de modelo termodinamico
6#===============================================================
7FlowSheet Exchanger_E_shell_Detailed_NTU
8       
9DEVICES
10        exchanger               as E_Shell_NTU_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
22SET
23        PP.Components                   = ["benzene","toluene"];
24        exchanger.HE.HotSide    = "Shell";
25        PP.LiquidModel                  = "PR";
26        PP.VapourModel                  = "PR";
27        NComp                                   = PP.NumberOfComponents;
28       
29#   Heat Transfer Correlation
30        exchanger.HE.LaminarFlow                = "Schlunder";
31        exchanger.HE.TurbulentFlow              = "SiederTate";
32        exchanger.HE.TransitionFlow     = "GnielinskiII";
33
34#=====================================================================
35#       Shell Geometrical Parameters
36#=====================================================================   
37exchanger.Tpass                         = 4;
38exchanger.Dishell               = 0.75  *"m";
39exchanger.Lcf                   = 0.043 *"m";
40exchanger.Nss                   = 1;
41exchanger.Donozzle_Shell    = 0.1937  *"m";
42exchanger.Dinozzle_Shell    = 0.1937  *"m";
43exchanger.Honozzle_Shell    = 0.0225  *"m";
44exchanger.Hinozzle_Shell    = 0.02155 *"m";
45
46#=====================================================================
47#       Tubes Geometrical Parameters
48#=====================================================================
49exchanger.Ntt                   = 500;
50exchanger.Pattern               = 30;
51exchanger.pitch                 = 0.0254        *"m";
52exchanger.Ltube                 = 5.5           *"m";
53exchanger.Ditube                = 0.013395  *"m";
54exchanger.Dotube                = 0.015875  *"m";
55exchanger.Kwall                         = 0.057         *"kW/m/K";
56exchanger.Donozzle_Tube     = 0.203     *"m";
57exchanger.Dinozzle_Tube         = 0.203         *"m";
58#=====================================================================
59#       Baffles Geometrical Parameters
60#=====================================================================
61exchanger.Lcd           = 0.0047        *"m";
62exchanger.Bc            = 25;
63exchanger.Ltd           = 0.00039  *"m";
64exchanger.Nb                    = 6;
65
66SPECIFY
67#============================================
68#   Hot Stream
69#============================================
70        streamhot_in.F  = 40            * "mol/s";
71        streamhot_in.T  = 393.15        * "K";
72        streamhot_in.z  = [1,0];
73        streamhot_in.P  = 740           * "kPa";
74#============================================
75#   Cold Stream
76#============================================   
77        streamcold_in.F  = 122          * "mol/s";
78        streamcold_in.T  = 333.15   * "K";
79        streamcold_in.z  = [0,1];
80        streamcold_in.P  = 2210         *"kPa";
81#=====================================================================
82#       Baffle Spacing
83#=====================================================================
84        exchanger.Baffles.Ls    = 0.622         *"m";
85        exchanger.Baffles.Lsi   = 0.807  *"m";
86
87OPTIONS
88
89 mode   = "steady";
90
91end
92
Note: See TracBrowser for help on using the repository browser.