source: branches/gui/sample/mixers_splitters/sample_sepComp.mso @ 743

Last change on this file since 743 was 585, checked in by gerson bicca, 15 years ago

fixed

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 2.5 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 585 2008-07-28 23:31:29Z 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       
86        CONNECTIONS
87        Stream.Outlet to sep.Inlet;
88       
89        SET
90       
91        NComp = PP.NumberOfComponents;
92        sep.mainComp = 1;
93       
94        Stream.ValidPhases = "Vapour-Liquid";
95        Stream.CompositionBasis = "Molar";
96
97        SPECIFY
98        Stream.F = 30 * 'kmol/h';
99        Stream.P = 120 * 'kPa';
100        Stream.T = 290 * 'K';
101        Stream.Composition = [0.6, 0.4];
102       
103        sep.Outlet1.z(1) = 0.7;
104        sep.frac = 0.4;
105#       sep.recovery = 0.533333;
106
107        OPTIONS
108        Dynamic = false;
109        NLASolver(
110                RelativeAccuracy = 1e-7
111        );
112       
113end
Note: See TracBrowser for help on using the repository browser.