source: mso/sample/heat_exchangers/Sample_DoublePipe.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: 1.8 KB
Line 
1#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
2# Double Pipe Heat Exchanger
3#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
4using "heat_exchangers/DoublePipe.mso";
5
6FlowSheet Double_Pipe
7       
8DEVICES
9
10        exchanger       as DoublePipe_NTU;
11        streamhot       as streamTP;
12        streamcold      as streamTP;
13
14CONNECTIONS
15
16        streamhot       to exchanger.Inlet.Hot;
17        streamcold      to exchanger.Inlet.Cold;
18       
19PARAMETERS
20
21        PP                      as CalcObject (File="vrpp");
22        NComp           as Integer;
23
24SET
25
26PP.LiquidModel          = "PR";
27PP.VapourModel          = "PR";
28PP.Components           = ["n-hexane","water"];
29NComp                           = PP.NumberOfComponents;
30
31#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
32#   Options
33#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
34
35exchanger.HE.FlowDirection  = "Counter";
36exchanger.HE.TurbulentFlow  = "SiederTate";
37       
38#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
39# Double Pipe Geometrical Parameters and Alocation
40#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
41
42exchanger.HE.HotSide    =       "Inner";
43exchanger.DoInner               =       0.04826*"m";
44exchanger.DiInner               =       0.04089*"m";
45exchanger.DiOuter               =       0.07793*"m";
46exchanger.Kwall                 =       0.057 *"kW/m/K";
47exchanger.Lpipe                 =       3*"m";
48
49SPECIFY
50#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
51#               Hot Stream
52#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
53
54        streamhot.F = 10                        * "kmol/h";
55        streamhot.T = (68+273.15)   * "K";
56        streamhot.P = 5.4                       * "bar";
57        streamhot.z = [1,0];
58       
59#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
60#    Cold Stream
61#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
62
63        streamcold.F = 5                        * "kmol/h";
64        streamcold.P = 5.1              * "bar";
65        streamcold.T = (23+273.15)      * "K";
66    streamcold.z = [0,1];
67
68OPTIONS
69mode            = "steady";
70
71end
72
Note: See TracBrowser for help on using the repository browser.