Changeset 158


Ignore:
Timestamp:
Feb 8, 2007, 11:02:49 AM (16 years ago)
Author:
nubinha
Message:

Changes in compressor model: a new way of calculate the outlet temperature using the efficiency equation defined by the enthalpy.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/eml/pressure_changers/compressor.mso

    r77 r158  
    5050        FPower          as power                (Brief = "Fluid Power", Unit="kW");
    5151        Mwm                     as molweight    (Brief = "Mixture Molar Weight");
     52        hiso            as enth_mol             (Brief = "Isentropic Enthalpy");
    5253       
    5354        SET
     
    7677        "Calculate Isentropic Head"
    7778        Ws = (k/(k-1))*R*Inlet.T*((Outlet.P/Inlet.P)^((k-1)/k) - 1);
     79
     80        "Calculate Isoentropic Enthalpy"
     81
     82        hiso =  PP.VapourEnthalpy(Tiso, Outlet.P, Outlet.z);
     83
    7884       
    7985        "Calculate Isentropic Outlet Temperature"
     
    8187       
    8288        "Calculate Real Outlet Temperature"
    83         Effs * (Outlet.T- Inlet.T) = (Tiso - Inlet.T);
     89
     90        Effs * (Outlet.h - Inlet.h) = (hiso - Inlet.h);
     91
    8492       
    8593        "Calculate Politropic Coefficient"
Note: See TracChangeset for help on using the changeset viewer.