source: trunk/sample/pressure_changers/sample_turbine.mso @ 623

Last change on this file since 623 was 372, checked in by Argimiro Resende Secchi, 16 years ago

Adding pressure drop variable (Pdrop) and pressure ratio (Pratio) in some models. Need to do the same for other models.

  • Property svn:keywords set to Id
File size: 1.7 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 Hidraulic turbine
17*--------------------------------------------------------------------
18*
19* This sample file needs VRTherm DEMO (www.vrtech.com.br) to run.
20*
21*----------------------------------------------------------------------
22* Author: Andrey Copat, Estefane S. Horn, Marcos L. Alencastro
23* $Id: sample_turbine.mso 372 2007-09-21 22:17:36Z arge $
24*--------------------------------------------------------------------*#
25
26using "pressure_changers/turbine";
27
28FlowSheet HTurbine_HT1
29       
30        DEVICES
31        S1 as source;
32        HT1 as Hidraulic_Turbine;
33       
34        CONNECTIONS
35        S1.Outlet to HT1.Inlet;
36       
37        PARAMETERS
38        PP              as Plugin               (Brief="External Physical Properties",
39                Type="PP",
40                Components = ["water", "benzene"],
41                LiquidModel = "PR",
42                VapourModel = "PR"
43        );
44        Mw              as positive     (Brief = "Molar Mass", Unit = 'kg/kmol');
45        NComp   as Integer              (Default= 1);
46       
47        SET
48        NComp = PP.NumberOfComponents();
49       
50        SPECIFY
51        HT1.Beta = 425e-6 / 'K';
52        HT1.Meff = 0.95;
53        HT1.Eff = 0.72;
54       
55        S1.Outlet.F = 1000                      * 'kmol/h';
56        S1.Outlet.P = 5                         * 'atm' ;
57        S1.Outlet.T = 298                       * 'K' ;
58        S1.Outlet.z = [1];
59       
60        #HT1.Pdrop = 100        * 'kPa';
61        HT1.Outlet.P = 1        * 'atm';
62       
63end
Note: See TracBrowser for help on using the repository browser.