Changeset 597


Ignore:
Timestamp:
Aug 12, 2008, 5:33:05 PM (14 years ago)
Author:
gerson bicca
Message:

added expander model (testing)

Location:
branches/gui
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/gui/eml/pressure_changers/turbine.mso

    r596 r597  
    9898end
    9999
    100 
    101100Model HidraulicTurbineGenerator as HidraulicTurbine
    102101        ATTRIBUTES
     
    126125        EPower = BPower * Meff;
    127126end
     127
     128Model expander
     129       
     130        ATTRIBUTES
     131        Pallete         = true;
     132        Icon            = "icon/HidraulicTurbine";
     133        Brief           = "Testing Model of a expander.";
     134       
     135PARAMETERS
     136
     137outer NComp     as Integer                      (Brief = "Number of chemical components", Lower = 1);
     138outer PP                as Plugin                       (Brief = "External Physical Properties", Type="PP");
     139        Mw(NComp)       as molweight            (Brief = "Molar Weight");
     140       
     141VARIABLES
     142        Eff     as efficiency           (Brief = "Turbine efficiency");
     143        Meff    as efficiency           (Brief = "Brake efficiency");
     144        Beta    as positive             (Brief = "Volumetric expansivity", Unit = '1/K');
     145        Head    as head                         (Brief = "Head Developed");
     146        FPower  as power                        (Brief = "Fluid Power");
     147        BPower  as power                        (Brief = "Brake Power");
     148        Pratio  as positive                     (Brief = "Pressure Ratio");
     149        Pdrop   as press_delta          (Brief = "Pressure Drop", DisplayUnit = 'kPa', Symbol ="\Delta P");
     150        Mwm     as molweight            (Brief = "Mixture Molar Weight");
     151        rho             as dens_mass            (Brief = "Specific Mass");
     152        Cp              as cp_mol                       (Brief = "Heat Capacity");
     153       
     154in      Inlet           as stream       (Brief = "Inlet stream", PosX=0.05, PosY=0.0, Symbol="_{in}");
     155out     Outlet          as stream       (Brief = "Outlet stream", PosX=0.65, PosY=1, Symbol="_{out}");
     156out WorkOut             as power        (Brief = "Work Outlet", PosX=1, PosY=0.46);
     157
     158SET
     159        Mw = PP.MolecularWeight();     
     160       
     161EQUATIONS
     162
     163"Calculate Mwm for Inlet Mixture"
     164        Mwm = sum(Mw*Inlet.z);
     165
     166"Calculate rho using a External Physical Properties Routine"
     167        rho = PP.LiquidDensity(Inlet.T,Inlet.P,Inlet.z);
     168       
     169"Calculate Outlet Vapour Fraction"
     170        Outlet.v = PP.VapourFraction(Outlet.T, Outlet.P, Outlet.z);
     171       
     172"Calculate Cp Using a External Physical Properties Routine"
     173        Cp = PP.LiquidCp(Inlet.T,Inlet.P,Inlet.z);
     174       
     175"Pressure Ratio"
     176        Outlet.P = Inlet.P * Pratio;
     177
     178"Pressure Drop"
     179        Outlet.P  = Inlet.P - Pdrop;
     180
     181"Calculate Fluid Power"
     182        FPower * rho = -Pdrop * Inlet.F * Mwm;
     183
     184"Calculate Brake Power"
     185        BPower = FPower * Eff;
     186
     187        BPower = WorkOut;
     188
     189"Calculate Outlet Temperature"
     190        (Outlet.T - Inlet.T) * rho * Cp = (Outlet.h - Inlet.h) * rho
     191        + Pdrop * Mwm * (1-Beta*Inlet.T);
     192
     193"Calculate Outlet Enthalpy"
     194        (Outlet.h - Inlet.h) * rho =  -Pdrop * Mwm;
     195
     196"Molar Balance"
     197        Outlet.F = Inlet.F;
     198"Outlet Composition"
     199        Outlet.z = Inlet.z;
     200
     201"Calculate Head"
     202        Head = Outlet.h - Inlet.h;
     203
     204end
  • branches/gui/sample/pressure_changers/sample_compressor.mso

    r595 r597  
    7676        DEVICES
    7777        S1 as source;
     78        W1 as work_source;
    7879        C1 as centrifugal_compressor;
    7980       
    8081        CONNECTIONS
    8182        S1.Outlet to C1.Inlet;
     83        W1.Work to C1.WorkIn;
    8284       
    8385       
Note: See TracChangeset for help on using the changeset viewer.