source: trunk/sample/mixers_splitters/sample_sepComp.mso @ 987

Last change on this file since 987 was 987, checked in by Argimiro Resende Secchi, 6 years ago
File size: 2.8 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 model sepComp_n and sepComp
17*--------------------------------------------------------------------
18*
19* This sample file needs VRTherm DEMO (www.vrtech.com.br) to run.
20*
21*----------------------------------------------------------------------
22* Author: Maurício Carvalho Maciel
23* $Id: sample_sepComp.mso 632 2008-09-23 22:20:38Z bicca $
24*--------------------------------------------------------------------*#
25
26using "mixers_splitters/sepComp";
27
28FlowSheet Sample_sepComp_n
29       
30PARAMETERS
31       
32        PP                      as Plugin       (Brief="Physical Properties",Type="PP",Components = [ "isobutane", "benzene"],
33                                                                LiquidModel = "PR",
34                                                                VapourModel = "PR");
35        NComp   as Integer;
36       
37DEVICES
38        Stream  as source;
39        sep             as sepComp_n;
40       
41CONNECTIONS
42        Stream.Outlet to sep.Inlet;
43       
44SET
45       
46        NComp = PP.NumberOfComponents;
47       
48        sep.mainComp = 1;
49        sep.NOutlet = 3;
50       
51        Stream.ValidPhases = "Vapour-Liquid";
52        Stream.CompositionBasis = "Molar";
53
54SPECIFY
55        Stream.F = 30 * 'kmol/h';
56        Stream.P = 120 * 'kPa';
57        Stream.T = 290 * 'K';
58        Stream.Composition = [0.6, 0.4];
59       
60        sep.Outlet(1).z(1) = 0.7;
61        sep.Outlet(2).z(1) = 0.1;
62        sep.frac(1) = 0.4;
63        sep.frac(2) = 0.2;
64#       sep.recovery(1) = 0.533333;
65#       sep.recovery(2) = 0.033333;
66
67OPTIONS
68        Dynamic = false;
69        NLASolver(
70                RelativeAccuracy = 1e-7
71        );
72end
73
74
75FlowSheet Sample_sepComp
76        PARAMETERS
77        PP      as Plugin(Brief="Physical Properties",Type="PP",Components = [ "isobutane", "benzene"],
78                                                        LiquidModel = "PR",
79                                                        VapourModel = "PR");
80        NComp as Integer;
81       
82        DEVICES
83        Stream as source;
84        sep as sepComp;
85        Q as energy_source;
86       
87        CONNECTIONS
88        Stream.Outlet to sep.Inlet;
89        Q.OutletQ to sep.InletQ;
90
91        SET
92       
93        NComp = PP.NumberOfComponents;
94       
95        Stream.ValidPhases = "Vapour-Liquid";
96        Stream.CompositionBasis = "Molar";
97
98        SPECIFY
99        Stream.F = 30 * 'kmol/h';
100        Stream.P = 120 * 'kPa';
101        Stream.T = 290 * 'K';
102        Stream.Composition = [0.6, 0.4];
103       
104        sep.Bottom_Splits = [0.4, 0.7];
105        sep.Bottom_Outlet.T = 300 * 'K';
106        sep.Bottom_Outlet.P = 125 * 'kPa';
107        sep.Overhead_Outlet.T = 260 * 'K';
108        sep.Overhead_Outlet.P = 115 * 'kPa';
109       
110
111        OPTIONS
112        Dynamic = false;
113        NLASolver(
114                RelativeAccuracy = 1e-7
115        );
116       
117end
Note: See TracBrowser for help on using the repository browser.