source: branches/gui/sample/stage_separators/sample_flash_steady.mso @ 749

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

added samples in mso version

File size: 1.5 KB
Line 
1#*----------------------------------------------
2* FlowSheet generated automaticaly by EMSO-GUI
3*----------------------------------------------*#
4
5using "streams";
6using "stage_separators/flash";
7
8FlowSheet sample_flash_steady
9        PARAMETERS
10        PP as Plugin(Brief="Physical Properties",
11                Type="PP",
12                Components = ["n-butane","benzene","n-octane"],
13                LiquidModel = "SRK",
14                VapourModel = "SRK"
15        );
16        NComp as Integer;
17        SET
18        NComp = PP.NumberOfComponents;
19
20        DEVICES
21        Heat as energy_source;
22
23        SET
24
25        SPECIFY
26
27        INITIAL
28
29        GUESS
30
31        DEVICES
32        Feed as simple_source;
33
34        SET
35        Feed.ValidPhases = "Vapour-Liquid";
36
37        SPECIFY
38        Feed.MolarComposition(1) = 0.3;
39        Feed.MolarComposition(2) = 0.3;
40        Feed.MolarComposition(3) = 0.4;
41        Feed.F = 622.84 * 'kmol/h';
42        Feed.T_Cdeg = 64.85 * 'K';
43        Feed.P = 5 * 'atm';
44
45        INITIAL
46
47        GUESS
48
49        DEVICES
50        VaporProduct as sink;
51
52        SET
53
54        SPECIFY
55
56        INITIAL
57
58        GUESS
59
60        DEVICES
61        LiquidProduct as sink;
62
63        SET
64
65        SPECIFY
66
67        INITIAL
68
69        GUESS
70
71        DEVICES
72        flash_steady_1 as flash_steady;
73
74        SET
75
76        SPECIFY
77        flash_steady_1.OutletLiquid.T = 330 * 'K';
78        flash_steady_1.OutletLiquid.P = 0.6 * 'atm';
79
80        INITIAL
81
82        GUESS
83
84        CONNECTIONS
85        flash_steady_1.OutletVapour to VaporProduct.Inlet;
86        flash_steady_1.OutletLiquid to LiquidProduct.Inlet;
87        Feed.Outlet to flash_steady_1.Inlet;
88        Heat.OutletQ to flash_steady_1.InletQ;
89
90        OPTIONS
91        Dynamic = false;
92        Integration = "original";
93        NLASolver(
94                File = "sundials",
95                RelativeAccuracy = 1e-3,
96                AbsoluteAccuracy = 1e-3,
97                MaxIterations = 100
98        );
99        DAESolver(
100                File = "sundials",
101                RelativeAccuracy = 1e-3,
102                AbsoluteAccuracy = 1e-6,
103                EventAccuracy = 1e-2
104        );
105end
Note: See TracBrowser for help on using the repository browser.