source: trunk/sample/heat_exchangers/hairpin_diagram.mso @ 1001

Last change on this file since 1001 was 992, checked in by Argimiro Resende Secchi, 6 years ago

fixing some examples

File size: 2.6 KB
Line 
1#*----------------------------------------------
2* FlowSheet generated automaticaly by EMSO-GUI
3*----------------------------------------------*#
4
5using "heat_exchangers/Hairpin";
6
7FlowSheet hairpin_diagram
8        PARAMETERS
9        PP as Plugin(Brief="Physical Properties",
10                Type="PP",
11                Components = ["aniline","water"],
12                LiquidModel = "PR",
13                VapourModel = "PR"
14        );
15        NComp as Integer;
16        SET
17        NComp = PP.NumberOfComponents;
18
19        DEVICES
20        Hairpin_NTU_1 as Hairpin_NTU;
21
22        SET
23        Hairpin_NTU_1.InnerLaminarCorrelation = "Schlunder";
24        Hairpin_NTU_1.InnerTransitionCorrelation = "Gnielinski";
25        Hairpin_NTU_1.InnerTurbulentCorrelation = "SiederTate";
26        Hairpin_NTU_1.OuterLaminarCorrelation = "Schlunder";
27        Hairpin_NTU_1.OuterTransitionCorrelation = "Gnielinski";
28        Hairpin_NTU_1.OuterTurbulentCorrelation = "SiederTate";
29        Hairpin_NTU_1.CalculationApproach = "Simplified";
30        Hairpin_NTU_1.Qestimated = 1.5 * 'kW';
31        Hairpin_NTU_1.DoInner = 0.04826 * 'm';
32        Hairpin_NTU_1.DiInner = 0.04089 * 'm';
33        Hairpin_NTU_1.DiOuter = 0.07793 * 'm';
34        Hairpin_NTU_1.Lpipe = 3 * 'm';
35        Hairpin_NTU_1.Kwall = 0.057 * 'W/m/K';
36        Hairpin_NTU_1.Rfi = 0 * 'm^2*K/kW';
37        Hairpin_NTU_1.Rfo = 0 * 'm^2*K/kW';
38        Hairpin_NTU_1.FlowDirection = "counter";
39        Hairpin_NTU_1.Eftestimated = 0.5;
40
41        SPECIFY
42
43        INITIAL
44
45        GUESS
46
47        DEVICES
48        simple_source_1 as simple_source;
49
50        SET
51
52        SPECIFY
53        simple_source_1.MolarComposition(1) = 1;
54        simple_source_1.MolarComposition(2) = 0;
55        simple_source_1.F = 3 * 'kmol/h';
56        simple_source_1.T = 330 * 'K';
57        simple_source_1.P = 4.93462 * 'atm';
58
59        INITIAL
60
61        GUESS
62
63        DEVICES
64        simple_source_2 as simple_source;
65
66        SET
67        simple_source_2.ValidPhases = "Vapour-Liquid";
68
69        SPECIFY
70        simple_source_2.MolarComposition(1) = 0;
71        simple_source_2.MolarComposition(2) = 1;
72        simple_source_2.F = 2 * 'kmol/h';
73        simple_source_2.T = 373 * 'K';
74        simple_source_2.P = 5.62546 * 'atm';
75
76        INITIAL
77
78        GUESS
79
80        DEVICES
81        simple_sink_1 as simple_sink;
82
83        SET
84
85        SPECIFY
86
87        INITIAL
88
89        GUESS
90
91        DEVICES
92        simple_sink_2 as simple_sink;
93
94        SET
95
96        SPECIFY
97
98        INITIAL
99
100        GUESS
101
102        CONNECTIONS
103        simple_source_1.Outlet to Hairpin_NTU_1.InletOuter;
104        simple_source_2.Outlet to Hairpin_NTU_1.InletInner;
105        Hairpin_NTU_1.OutletInner to simple_sink_1.Inlet;
106        Hairpin_NTU_1.OutletOuter to simple_sink_2.Inlet;
107
108        OPTIONS
109        Dynamic = false;
110        Integration = "original";
111        NLASolver(
112                File = "sundials",
113                RelativeAccuracy = 1e-3,
114                AbsoluteAccuracy = 1e-6,
115                MaxIterations = 100
116        );
117        DAESolver(
118                File = "",
119                RelativeAccuracy = 1e-3,
120                AbsoluteAccuracy = 1e-6,
121                EventAccuracy = 1e-2
122        );
123end
Note: See TracBrowser for help on using the repository browser.