source: branches/gui/sample/stage_separators/Column_Distillation_Kettle_Diagram.mso @ 805

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

added samples in mso version
File size: 3.8 KB
RevLine 
[749]1#*----------------------------------------------
2* FlowSheet generated automaticaly by EMSO-GUI
3*----------------------------------------------*#
4
5using "streams";
6using "stage_separators/column";
7using "pressure_changers/pump";
8
9FlowSheet Column_Distillation_Kettle_Diagram
10        PARAMETERS
11        PP as Plugin(Brief="Physical Properties",
12                Type="PP",
13                Components = ["isobutane","n-pentane","propylene","benzene","isobutene"],
14                LiquidModel = "PR",
15                VapourModel = "PR"
16        );
17        NComp as Integer;
18        SET
19        NComp = PP.NumberOfComponents;
20
21        DEVICES
22        feed as simple_source;
23
24        SET
25
26        SPECIFY
27        feed.MolarComposition(1) = 0.20;
28        feed.MolarComposition(2) = 0.20;
29        feed.MolarComposition(3) = 0.20;
30        feed.MolarComposition(4) = 0.20;
31        feed.MolarComposition(5) = 0.20;
32        feed.F = 113.4 * 'kmol/h';
33        feed.T = 291 * 'K';
34        feed.P = 168.30 * 'kPa';
35
36        INITIAL
37
38        GUESS
39
40        DEVICES
41        vapourOutlet as simple_sink;
42
43        SET
44
45        SPECIFY
46
47        INITIAL
48
49        GUESS
50
51        DEVICES
52        liquidOut as simple_sink;
53
54        SET
55
56        SPECIFY
57
58        INITIAL
59
60        GUESS
61
62        DEVICES
63        LiquidBottom as simple_sink;
64
65        SET
66
67        SPECIFY
68
69        INITIAL
70
71        GUESS
72
73        DEVICES
74        ToAnotherColumn as simple_sink;
75
76        SET
77
78        SPECIFY
79
80        INITIAL
81
82        GUESS
83
84        DEVICES
85        energy_source_1 as energy_source;
86
87        SET
88
89        SPECIFY
90        energy_source_1.OutletQ = 3.77 * 'kW';
91
92        INITIAL
93
94        GUESS
95
96        DEVICES
97        energy_source_2 as energy_source;
98
99        SET
100
101        SPECIFY
102        energy_source_2.OutletQ = -4E6 * 'kJ/h';
103
104        INITIAL
105
106        GUESS
107
108        DEVICES
109        Distillation_kettle_cond_1 as Distillation_kettle_cond;
110
111        SET
112        Distillation_kettle_cond_1.VolumeOfTray = 0.113267 * 'm^3';
113        Distillation_kettle_cond_1.HeatSupply = 0 * 'kW';
114        Distillation_kettle_cond_1.PlateArea = 0.366038 * 'm^2';
115        Distillation_kettle_cond_1.HolesArea = 0.0366038 * 'm^2';
116        Distillation_kettle_cond_1.WeirLength = 0.531876 * 'm';
117        Distillation_kettle_cond_1.WeirHeight = 0.0381 * 'm';
118        Distillation_kettle_cond_1.beta = 0.6;
119        Distillation_kettle_cond_1.alfa = 4;
120        Distillation_kettle_cond_1.CONDENSER.V = 2 * 'm^3';
121        Distillation_kettle_cond_1.CONDENSER.Across = 1 * 'm^2';
122        Distillation_kettle_cond_1.CONDENSER.Initial_Level = 1 * 'm';
123        Distillation_kettle_cond_1.CONDENSER.Initial_Temperature = 260 * 'K';
124
125        SPECIFY
126        Distillation_kettle_cond_1.VapourDrawOffFlow = 0 * 'kmol/h';
127        Distillation_kettle_cond_1.LiquidDrawOffFlow = 1 * 'kmol/h';
128        Distillation_kettle_cond_1.MurphreeEff = 1;
129        Distillation_kettle_cond_1.alfaTopo = 2;
130        Distillation_kettle_cond_1.CONDENSER.OutletVapour.F = 0 * 'kmol/h';
131        Distillation_kettle_cond_1.REBOILER.OutletLiquid.F = 28 * 'kmol/h';
132        Distillation_kettle_cond_1.SPLITTER.FlowRatios(1) = 0.4;
133        Distillation_kettle_cond_1.SPLITTER.Outlet2.F = 85 * 'kmol/h';
134        Distillation_kettle_cond_1.PUMP.dP = 16 * 'kPa';
135
136        INITIAL
137
138        GUESS
139
140        DEVICES
141        Pump_Device as centrifugal_pump;
142
143        SET
144        Pump_Device.PumpEfficiency = 0.80;
145        Pump_Device.MechanicalEff = 0.95;
146        Pump_Device.NPSH_Options = "Default";
147        Pump_Device.SuctionArea = 0.01 * 'm^2';
148
149        SPECIFY
150        Pump_Device.Pratio = 7;
151        Pump_Device.StaticHead = 12 * 'm';
152
153        INITIAL
154
155        GUESS
156
157        DEVICES
158        work_inlet_1 as work_source;
159
160        SET
161
162        SPECIFY
163
164        INITIAL
165
166        GUESS
167
168        CONNECTIONS
169        feed.Outlet to Distillation_kettle_cond_1.FeedTray;
170        energy_source_1.OutletQ to Distillation_kettle_cond_1.HeatToReboiler;
171        Distillation_kettle_cond_1.BottomProduct to LiquidBottom.Inlet;
172        Distillation_kettle_cond_1.LiquidDistillate to liquidOut.Inlet;
173        energy_source_2.OutletQ to Distillation_kettle_cond_1.HeatToCondenser;
174        Distillation_kettle_cond_1.VapourDistillate to vapourOutlet.Inlet;
175        Distillation_kettle_cond_1.LiquidDrawOff to Pump_Device.Inlet;
176        Pump_Device.Outlet to ToAnotherColumn.Inlet;
177        work_inlet_1.Work to Pump_Device.WorkIn;
178
179        OPTIONS
180        Dynamic = true;
181        TimeStep = 0.1;
182        TimeEnd = 100;
183        TimeUnit = 's';
184        Integration = "original";
185        NLASolver(
186                File = "sundials",
187                RelativeAccuracy = 1e-3,
188                AbsoluteAccuracy = 1e-6,
189                MaxIterations = 100
190        );
191        DAESolver(
192                File = "sundials",
193                RelativeAccuracy = 1e-3,
194                AbsoluteAccuracy = 1e-6,
195                EventAccuracy = 1e-2
196        );
197end
Note: See TracBrowser for help on using the repository browser.