source: branches/gui/sample/pressure_changers/sample_compressor.mso @ 714

#*-------------------------------------------------------------------
* EMSO Model Library (EML) Copyright (C) 2004 - 2007 ALSOC.
*
* This LIBRARY is free software; you can distribute it and/or modify
* it under the therms of the ALSOC FREE LICENSE as available at
* http://www.enq.ufrgs.br/alsoc.
*
* EMSO Copyright (C) 2004 - 2007 ALSOC, original code
* from http://www.rps.eng.br Copyright (C) 2002-2004.
* All rights reserved.
*
* EMSO is distributed under the therms of the ALSOC LICENSE as
* available at http://www.enq.ufrgs.br/alsoc.
*
*--------------------------------------------------------------------
* Sample file for model centrifugal_compressor
*--------------------------------------------------------------------
* 
* This sample file needs VRTherm (www.vrtech.com.br) to run.
*
*----------------------------------------------------------------------
* Author: Marcos L. Alencastro, Estefane da S. Horn
* $Id: sample_compressor.mso 606 2008-08-23 20:26:51Z bicca $
*--------------------------------------------------------------------*#

using "pressure_changers/compressor";

FlowSheet compressor_C1

        PARAMETERS 
        PP              as Plugin       (Brief="External Physical Properties",
                Type="PP",
                Components = ["nitrogen", "oxygen"],
                LiquidModel = "IdealLiquid",
                VapourModel = "Ideal"
        );
        NComp   as Integer              (Default= 1);
        
        DEVICES
        S1 as source;
        W1 as work_source;
        C1 as centrifugal_compressor;
        
        CONNECTIONS
        S1.Outlet to C1.Inlet;
        W1.Work to C1.WorkIn;
        
        
        SET
        NComp = PP.NumberOfComponents;
        
        S1.ValidPhases = "Vapour-Only";
        S1.CompositionBasis = "Molar";
        C1.CompressorType = "Isentropic Operation";

        SPECIFY
        C1.EfficiencyOperation  = 1;
        C1.MechanicalEff        = 1;
        S1.F = 41.05            * 'kmol/h';
        S1.P = 1                        * 'atm';
        S1.T = 298                      * 'K' ;
        S1.Composition = [0.79,0.21];
        
        C1.Outlet.P = 3 * 'atm';
end

FlowSheet compressor_C2

        PARAMETERS 
        PP              as Plugin       (Brief="External Physical Properties",
                Type="PP",
                Components = ["propane"],
                LiquidModel = "PR",
                VapourModel = "PR"
        );
        NComp   as Integer              (Default= 1);
        
        DEVICES
        S1 as source;
        W1 as work_source;
        C1 as centrifugal_compressor;
        
        CONNECTIONS
        S1.Outlet to C1.Inlet;
        W1.Work to C1.WorkIn;
        
        
        SET
        NComp = PP.NumberOfComponents;
        
        S1.ValidPhases = "Vapour-Only";
        S1.CompositionBasis = "Molar";
        C1.CompressorType = "Polytropic Operation";
        #C1.CompressorType = "Isentropic Operation";

        SPECIFY
        C1.EfficiencyOperation  = 0.75;
        C1.MechanicalEff        = 0.80;
        
        #W1.Work = 2*'kW';
        
        S1.F = 4                * 'kmol/h';
        S1.P = 100                      * 'kPa';
        S1.T = 298                      * 'K' ;
        S1.Composition = [1];
        
        C1.Outlet.P = 1500      * 'kPa';
end