source: branches/gui/sample/heat_exchangers/PHE_diagram.mso @ 749

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

added samples in mso version

File size: 2.2 KB
Line 
1#*----------------------------------------------
2* FlowSheet generated automaticaly by EMSO-GUI
3*----------------------------------------------*#
4
5using "streams";
6using "heat_exchangers/PHE";
7
8FlowSheet PHE_diagram
9        PARAMETERS
10        PP as Plugin(Brief="Physical Properties",
11                Type="PP",
12                Components = ["toluene","benzene"],
13                LiquidModel = "PR",
14                VapourModel = "PR"
15        );
16        NComp as Integer;
17        SET
18        NComp = PP.NumberOfComponents;
19
20        DEVICES
21        simple_sink_1 as simple_sink;
22
23        SET
24
25        SPECIFY
26
27        INITIAL
28
29        GUESS
30        simple_sink_1.Inlet.T = 350 * 'K';
31        simple_sink_1.Inlet.P = 2 * 'atm';
32
33        DEVICES
34        simple_sink_2 as simple_sink;
35
36        SET
37
38        SPECIFY
39
40        INITIAL
41
42        GUESS
43        simple_sink_2.Inlet.T = 300 * 'K';
44        simple_sink_2.Inlet.P = 2 * 'atm';
45
46        DEVICES
47        PHE_1 as PHE;
48
49        SET
50        PHE_1.ChevronAngle = "A30_Deg";
51        PHE_1.SideOne = "cold";
52        PHE_1.Geometry.Lv = 155 * 'cm';
53        PHE_1.Geometry.Nplates = 129;
54        PHE_1.Geometry.NpassHot = 2;
55        PHE_1.Geometry.NpassCold = 2;
56        PHE_1.Geometry.Dports = 15 * 'cm';
57        PHE_1.Geometry.Lw = 70 * 'cm';
58        PHE_1.Geometry.pitch = 3.7 * 'mm';
59        PHE_1.Geometry.pt = 0.70 * 'mm';
60        PHE_1.Geometry.Kwall = 17 * 'W/m/K';
61        PHE_1.Geometry.Rfh = 0 * 'm^2*K/kW';
62        PHE_1.Geometry.Rfc = 0 * 'm^2*K/kW';
63        PHE_1.Geometry.PhiFactor = 1.17;
64
65        SPECIFY
66
67        INITIAL
68
69        GUESS
70        PHE_1.InletHot.z(1) = 1;
71        PHE_1.InletHot.z(2) = 0;
72        PHE_1.InletCold.z(1) = 0;
73        PHE_1.InletCold.z(2) = 1;
74
75        DEVICES
76        source_1 as source;
77
78        SET
79        source_1.ValidPhases = "Vapour-Liquid";
80
81        SPECIFY
82        source_1.Composition(1) = 0;
83        source_1.Composition(2) = 1;
84        source_1.F = 290 * 'kmol/h';
85        source_1.T = 293 * 'K';
86        source_1.P = 2 * 'atm';
87
88        INITIAL
89
90        GUESS
91
92        DEVICES
93        source_2 as source;
94
95        SET
96        source_2.ValidPhases = "Vapour-Liquid";
97
98        SPECIFY
99        source_2.Composition(1) = 1;
100        source_2.Composition(2) = 0;
101        source_2.F = 82.5 * 'kmol/h';
102        source_2.T = 360 * 'K';
103        source_2.P = 2 * 'atm';
104
105        INITIAL
106
107        GUESS
108
109        CONNECTIONS
110        PHE_1.OutletCold to simple_sink_2.Inlet;
111        PHE_1.OutletHot to simple_sink_1.Inlet;
112        source_1.Outlet to PHE_1.InletCold;
113        source_2.Outlet to PHE_1.InletHot;
114
115        OPTIONS
116        Dynamic = false;
117        Integration = "index1";
118        NLASolver(
119                File = "sundials",
120                RelativeAccuracy = 1e-3,
121                AbsoluteAccuracy = 1e-6,
122                MaxIterations = 200
123        );
124        DAESolver(
125                File = "",
126                RelativeAccuracy = 1e-3,
127                AbsoluteAccuracy = 1e-6,
128                EventAccuracy = 1e-2
129        );
130end
Note: See TracBrowser for help on using the repository browser.