source: branches/gui/sample/stage_separators/sample_columnTeste.mso @ 617

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

updated icon for column section

File size: 2.3 KB
Line 
1#*-------------------------------------------------------------------
2* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
3*
4* This LIBRARY is free software; you can distribute it and/or modify
5* it under the therms of the ALSOC FREE LICENSE as available at
6* http://www.enq.ufrgs.br/alsoc.
7*
8* EMSO Copyright (C) 2004 - 2007 ALSOC, original code
9* from http://www.rps.eng.br Copyright (C) 2002-2004.
10* All rights reserved.
11*
12* EMSO is distributed under the therms of the ALSOC LICENSE as
13* available at http://www.enq.ufrgs.br/alsoc.
14*
15*--------------------------------------------------------------------
16* Sample file for column model
17*--------------------------------------------------------------------
18*
19* This sample file needs VRTherm DEMO(www.vrtech.com.br) to run
20* SectionColumn_Test and needs VRTherm full to run the distillation
21* column flowsheet.
22*
23*----------------------------------------------------------------------
24* Author: Paula B. Staudt
25* $Id: sample_column.mso 580 2008-07-26 19:34:58Z bicca $
26*--------------------------------------------------------------------*#
27
28using "stage_separators/columnTeste";
29
30FlowSheet SectionColumn_Test_with2tray
31
32PARAMETERS
33        PP      as Plugin(Brief="Physical Properties",
34                Type="PP",
35                Components = [ "isobutane", "benzene"],
36                LiquidModel = "PR",
37                VapourModel = "PR"
38        );
39        NComp   as Integer;
40
41DEVICES
42        sec     as Section_ColumnTeste;
43        feed    as liquid_stream;
44        reb     as vapour_stream;
45        cond as liquid_stream;
46       
47SET
48        NComp = PP.NumberOfComponents;
49        sec.FeedTray=1;
50        sec.NumberOfTrays = 2;
51        #COLUMN
52        sec.V = 4 * 'ft^3';
53        sec.Ah = 0.394 * 'ft^2';
54        sec.lw = 20.94 * 'in';
55        sec.hw = 0.125 * 'ft';
56        sec.Q = 0 * 'kW';
57        sec.beta = 0.6;
58        sec.alfa = 4;
59        sec.Ap = 3.94 * 'ft^2';
60       
61CONNECTIONS
62        feed to sec.Inlet;
63        reb to sec.Vin;
64        cond to sec.Lin;
65       
66SPECIFY
67        feed.F = 113.4 * 'kmol/h';
68        feed.T = 291 * 'K';
69        feed.P = 168.3 * 'kPa';
70        feed.z = [0.5, 0.5];
71
72        cond.F = 68 * 'kmol/h';
73        cond.P = 150 * 'kPa';
74        cond.T = 281.75 * 'K';
75        cond.z = [0.6664, 0.3336];
76
77        reb.P = 185 * 'kPa';
78        reb.T = 328.12 * 'K';
79        reb.z = [0.001848, 0.9982];
80       
81        sec.trays.Emv = 1;
82        sec.trays(1).OutletV.F = 150 * 'kmol/h';
83
84INITIAL
85        sec.trays.OutletL.T = 270 *'K';
86        sec.trays.Level = 0.9 * sec.hw;
87        sec.trays.OutletL.z(1) = 0.5;
88       
89        OPTIONS
90        TimeStep = 10;
91        TimeEnd = 1000;
92       
93end
Note: See TracBrowser for help on using the repository browser.