source: branches/new_gui/sample/stage_separators/Sample_TankVL_PID~.mso @ 891

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

samples for pressure changers

File size: 3.0 KB
Line 
1#*----------------------------------------------
2* FlowSheet generated automaticaly by EMSO-GUI
3*----------------------------------------------*#
4
5using "streams";
6using "pressure_changers/valve";
7using "controllers/PIDs";
8using "stage_separators/tank";
9
10FlowSheet Sample_TankVL_PID
11        PARAMETERS
12        PP as Plugin(Brief="Physical Properties",
13                Type="PP",
14                Components = ["n-butane","benzene","n-octane"],
15                LiquidModel = "SRK",
16                VapourModel = "SRK"
17        );
18        NComp as Integer;
19        SET
20        NComp = PP.NumberOfComponents;
21
22        DEVICES
23        Feed as simple_source;
24
25        SET
26
27        SPECIFY
28        Feed.MolarComposition(1) = 0.3;
29        Feed.MolarComposition(2) = 0.3;
30        Feed.MolarComposition(3) = 0.4;
31        Feed.T = 338 * 'K';
32        Feed.P = 5 * 'atm';
33
34        INITIAL
35
36        GUESS
37
38        DEVICES
39        VaporProduct as sink;
40
41        SET
42
43        SPECIFY
44
45        INITIAL
46
47        GUESS
48
49        DEVICES
50        valve_liquid as valve_flow;
51
52        SET
53
54        SPECIFY
55
56        INITIAL
57
58        GUESS
59
60        DEVICES
61        valve_Vapour as valve_flow;
62
63        SET
64
65        SPECIFY
66
67        INITIAL
68
69        GUESS
70
71        DEVICES
72        PID_LC as PID;
73
74        SET
75        PID_LC.PID_Select = "Parallel_AWBT";
76        PID_LC.Action = "Direct";
77        PID_LC.Mode = "Automatic";
78        PID_LC.Clip = "Clipped";
79        PID_LC.alpha = 1;
80        PID_LC.beta = 1;
81        PID_LC.bias = 0.5;
82        PID_LC.derivTime = 19 * 's';
83        PID_LC.intTime = 76 * 's';
84        PID_LC.gain = 1.1776;
85        PID_LC.gamma = 1;
86        PID_LC.tau = 1 * 's';
87        PID_LC.tauSet = 1 * 's';
88        PID_LC.MinInput = 0;
89        PID_LC.MaxInput = 2;
90        PID_LC.MinOutput = 0;
91        PID_LC.MaxOutput = 1;
92
93        SPECIFY
94        PID_LC.SetPoint = 0.7;
95
96        INITIAL
97
98        GUESS
99
100        DEVICES
101        PID_PC as PID;
102
103        SET
104        PID_PC.PID_Select = "Parallel_AWBT";
105        PID_PC.Action = "Direct";
106        PID_PC.Mode = "Automatic";
107        PID_PC.Clip = "Clipped";
108        PID_PC.alpha = 1;
109        PID_PC.beta = 1;
110        PID_PC.bias = 0.5;
111        PID_PC.derivTime = 18 * 's';
112        PID_PC.intTime = 72 * 's';
113        PID_PC.gain = 0.9275;
114        PID_PC.gamma = 1;
115        PID_PC.tau = 1 * 's';
116        PID_PC.tauSet = 1 * 's';
117        PID_PC.MinInput = 0;
118        PID_PC.MaxInput = 4;
119        PID_PC.MinOutput = 0;
120        PID_PC.MaxOutput = 1;
121
122        SPECIFY
123        PID_PC.SetPoint = 0.6;
124
125        INITIAL
126
127        GUESS
128
129        DEVICES
130        LiquidProduct as simple_sink;
131
132        SET
133
134        SPECIFY
135
136        INITIAL
137
138        GUESS
139
140        DEVICES
141        Heat_Duty as energy_source2;
142
143        SET
144
145        SPECIFY
146        Heat_Duty.OutletQ = 0 * 'kW';
147
148        INITIAL
149
150        GUESS
151
152        DEVICES
153        V001 as TankVL;
154
155        SET
156        V001.Kfactor = 3;
157        V001.Levelpercent_Initial = 0.5;
158        V001.Temperature_Initial = 300 * 'K';
159        V001.Geometry.Orientation = "horizontal";
160        V001.Geometry.Heads = "flat";
161        V001.Geometry.Lenght = 6 * 'm';
162
163        SPECIFY
164
165        INITIAL
166
167        GUESS
168
169        CONNECTIONS
170        valve_Vapour.Outlet to VaporProduct.Inlet;
171        PID_LC.Output to valve_liquid.FlowFraction;
172        PID_PC.Output to valve_Vapour.FlowFraction;
173        valve_liquid.Outlet to LiquidProduct.Inlet;
174        V001.OutletVapour to valve_Vapour.Inlet;
175        V001.PI to PID_PC.Input;
176        V001.LI to PID_LC.Input;
177        Heat_Duty.OutletQ to V001.InletQ;
178        V001.OutletLiquid to valve_liquid.Inlet;
179        Feed.Outlet to V001.Inlet;
180
181        OPTIONS
182        Dynamic = true;
183        TimeStep = 0.2;
184        TimeEnd = 12;
185        TimeUnit = 'h';
186        Integration = "original";
187        NLASolver(
188                File = "sundials",
189                RelativeAccuracy = 1e-3,
190                AbsoluteAccuracy = 1e-3,
191                MaxIterations = 100
192        );
193        DAESolver(
194                File = "sundials",
195                RelativeAccuracy = 1e-2,
196                AbsoluteAccuracy = 1e-6,
197                EventAccuracy = 1e-2
198        );
199end
Note: See TracBrowser for help on using the repository browser.