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

Last change on this file since 976 was 749, checked in by gerson bicca, 13 years ago

added samples in mso version

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