Changeset 863


Ignore:
Timestamp:
Oct 9, 2009, 5:59:23 PM (13 years ago)
Author:
gerson bicca
Message:

Empty Message

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/sample/pressure_changers/sample_pump.mso

    r631 r863  
    2727FlowSheet Pump_P1
    2828       
    29         DEVICES
    30         S1 as source;
    31         P1 as centrifugal_pump;
    32        
    33         CONNECTIONS
    34         S1.Outlet to P1.Inlet;
    35        
    36         PARAMETERS
    37         PP              as Plugin       (Brief="External Physical Properties",
     29        PARAMETERS
     30
     31        PP as Plugin(Brief="Physical Properties",
     32
    3833                Type="PP",
    39                 Components = ["water", "benzene"],
     34
     35                Components = ["water"],
     36
    4037                LiquidModel = "PR",
     38
    4139                VapourModel = "PR"
     40
    4241        );
    43         Mw              as positive     (Brief = "Molar Mass", Unit = 'kg/kmol');
    44         NComp   as Integer              (Default= 1);
     42
     43        NComp as Integer;
    4544
    4645        SET
     46
    4747        NComp = PP.NumberOfComponents;
    48         P1.N = 1000                     * 'rpm';               
    49         P1.Lev = 0                      * 'm';
    50         P1.Meff = 0.95;
    51         P1.Eff = 0.72;
    52         P1.Beta = 425e-6        * '1/K';
    53        
    54         S1.ValidPhases = "Vapour-Liquid";
    55         S1.CompositionBasis = "Molar";
    56        
     48
     49        DEVICES
     50
     51        suction as simple_source;
     52
     53
    5754        SPECIFY
    58         S1.F = 1000             * 'kmol/h';
    59         S1.P = 10                       * 'atm';
    60         S1.T = 298                      * 'K' ;
    61         S1.Composition = [1,0];
    62        
    63         P1.Pdrop = -8           * 'kPa';
    64         #P1.Outlet.P = 2        * 'atm';
    65         #P1.BPower = 1          * 'kW';
    66        
    67 end
    6855
    69 FlowSheet pump_Test
    70         PARAMETERS
    71         PP              as Plugin       (Brief="External Physical Properties",
    72                 Type="PP",
    73                 Components = ["water", "benzene"],
    74                 LiquidModel = "PR",
    75                 VapourModel = "PR"
    76         );
    77         NComp   as Integer;
     56        suction.MolarComposition = 1;
     57        suction.F = 1 * 'kmol/h';
     58        suction.T = 298 * 'K';
     59        suction.P = 2 * 'atm';
    7860
    79 DEVICES
    80         p1 as pump;
    81         s1 as source;
     61
     62        DEVICES
     63
     64        discharge as simple_sink;
     65        Pump_Operation as centrifugal_pump;
    8266
    8367        SET
    84         NComp = PP.NumberOfComponents;
    85        
    86         s1.ValidPhases = "Vapour-Liquid";
    87         s1.CompositionBasis = "Molar";
    88        
    8968
    90        
    91         CONNECTIONS
    92         s1.Outlet to p1.Inlet;
     69        Pump_Operation.PumpEfficiency = 0.10;
     70
     71        Pump_Operation.MechanicalEff = 0.95;
     72
     73        Pump_Operation.NPSH_Options = "Include Kinetic Head";
     74
     75        Pump_Operation.SuctionArea = 0.01 * 'm^2';
    9376
    9477        SPECIFY
    95         s1.F = 826 * 'kmol/h';
    96         s1.P = 549 * 'kPa';
    97         s1.T = 313 * 'K';
    98         s1.Composition = 1/NComp;
    99         #s1.Outlet.v = 0.68;
    100        
    101         p1.dP = 90 * 'kPa';
     78
     79        Pump_Operation.Pratio = 7;
     80
     81        Pump_Operation.StaticHead = 12 * 'm';
     82
     83
     84        DEVICES
     85
     86        work_inlet as work_source;
     87
     88
     89        CONNECTIONS
     90
     91        suction.Outlet to Pump_Operation.Inlet;
     92
     93        Pump_Operation.Outlet to discharge.Inlet;
     94
     95        work_inlet.OutletWork to Pump_Operation.WorkIn;
    10296
    10397        OPTIONS
     98
    10499        Dynamic = false;
     100
     101
    105102end
Note: See TracChangeset for help on using the changeset viewer.