Changeset 601 for branches/gui


Ignore:
Timestamp:
Aug 16, 2008, 8:20:04 PM (14 years ago)
Author:
gerson bicca
Message:

Compressor Model Finished (Missing documentation)

File:
1 edited

Legend:

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

    r599 r601  
    1414*
    1515*----------------------------------------------------------------------
    16 * Author: Marcos L. Alencastro,  Estefane S. Horn
     16* Author: Marcos L. Alencastro,  Estefane S. Horn (Revised Gerson B. Bicca)
    1717* $Id$
    1818*--------------------------------------------------------------------*#
     
    2222Model centrifugal_compressor
    2323       
    24 # Do Not Forget to Update The Losses by Mechanical Efficiency !!!!
    25 
    2624ATTRIBUTES
    2725        Pallete         = true;
    2826        Icon            = "icon/CentrifugalCompressor";
    29         Brief           = "Testing Model of a centrifugal compressor.";
    30 
     27        Brief           = "Model of a centrifugal compressor.";
     28        Info            =
     29"To be documented";
    3130       
    3231PARAMETERS
     
    5655       
    5756        FluidPower      as power                (Brief = "Fluid Power");
     57        BrakePower      as power                (Brief = "Brake Power");
     58        PowerLoss       as power                (Brief = "Power Losses");
    5859        Mwm                     as molweight    (Brief = "Mixture Molar Weight");
    5960        rho                     as dens_mass    (Brief = "Mass Density");
     
    136137end
    137138
    138 "Isentropic Outlet Temperature"#Mollier Method ?
     139"Isentropic Outlet Temperature"
    139140        PP.VapourEntropy(Tiso, Outlet.P, Outlet.z) = PP.VapourEntropy(Inlet.T, Inlet.P, Inlet.z);
    140 
    141 #"Calculate Politropic Coefficient"
    142         #PolyCoeff*(ln(Outlet.T/Inlet.T)) = (PolyCoeff-1)*(ln(Outlet.P/Inlet.P));
    143141
    144142"Polytropic Efficiency"
    145143        PolytropicEff * (PolyCoeff-1) * IseCoeff = PolyCoeff * (IseCoeff-1);
    146144
    147 "Fluid Power"
    148         FluidPower = -WorkIn;
     145"Brake Power"
     146        BrakePower = -WorkIn;
     147
     148"Brake Power"
     149        BrakePower = (FluidPower/MechanicalEff)-PowerLoss;
     150
     151"Power Loss"
     152        PowerLoss = BrakePower - FluidPower;
    149153
    150154end
Note: See TracChangeset for help on using the changeset viewer.