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

Last change on this file since 247 was 247, checked in by Rafael de Pelegrini Soares, 16 years ago

Updated solver options for the new language

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
File size: 2.4 KB
RevLine 
[80]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 247 2007-04-24 13:44:18Z rafael $
24*--------------------------------------------------------------------*#
25
[1]26using "mixers_splitters/sepComp";
27
28FlowSheet Sample_sepComp_n
29       
[175]30PARAMETERS
[1]31       
[215]32        PP                      as Plugin       (Brief="Physical Properties",Type="PP",Components = [ "isobutane", "benzene"],
33                                                                LiquidModel = "PR",
34                                                                VapourModel = "PR");
[175]35        NComp   as Integer;
[1]36       
[175]37DEVICES
38        Stream  as source;
39        sep             as sepComp_n;
40       
41CONNECTIONS
42        Stream.Outlet to sep.Inlet;
43       
44SET
[215]45       
[1]46        NComp = PP.NumberOfComponents;
[175]47       
[1]48        sep.mainComp = 1;
49        sep.NOutlet = 3;
50
[175]51SPECIFY
52        Stream.Outlet.F = 30 * 'kmol/h';
53        Stream.Outlet.P = 120 * 'kPa';
54        Stream.Outlet.T = 290 * 'K';
55        Stream.Outlet.z = [0.6, 0.4];
56       
[1]57        sep.Outlet(1).z(1) = 0.7;
58        sep.Outlet(2).z(1) = 0.1;
59        sep.frac(1) = 0.4;
60        sep.frac(2) = 0.2;
61#       sep.recovery(1) = 0.533333;
62#       sep.recovery(2) = 0.033333;
63
[175]64OPTIONS
[247]65        Dynamic = false;
66        NLASolver(
67                RelativeAccuracy = 1e-7
68        );
[1]69end
70
71
72FlowSheet Sample_sepComp
73        PARAMETERS
[215]74        PP      as Plugin(Brief="Physical Properties",Type="PP",Components = [ "isobutane", "benzene"],
75                                                        LiquidModel = "PR",
76                                                        VapourModel = "PR");
[1]77        NComp as Integer;
78       
79        DEVICES
[175]80        Stream as source;
[1]81        sep as sepComp;
82       
83        CONNECTIONS
[175]84        Stream.Outlet to sep.Inlet;
[1]85       
86        SET
[215]87       
[1]88        NComp = PP.NumberOfComponents;
89        sep.mainComp = 1;
90
91        SPECIFY
[175]92        Stream.Outlet .F = 30 * 'kmol/h';
93        Stream.Outlet .P = 120 * 'kPa';
94        Stream.Outlet .T = 290 * 'K';
95        Stream.Outlet .z = [0.6, 0.4];
96       
[1]97        sep.Outlet1.z(1) = 0.7;
98        sep.frac = 0.4;
99#       sep.recovery = 0.533333;
100
101        OPTIONS
[247]102        Dynamic = false;
103        NLASolver(
104                RelativeAccuracy = 1e-7
105        );
[1]106       
107end
Note: See TracBrowser for help on using the repository browser.