Changeset 158

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:

• trunk/eml/pressure_changers/compressor.mso (modified) (3 diffs)

trunk/eml/pressure_changers/compressor.mso

@@ -50 +50 @@
         FPower          as power                (Brief = "Fluid Power", Unit="kW");
         Mwm                     as molweight    (Brief = "Mixture Molar Weight");
+        hiso            as enth_mol             (Brief = "Isentropic Enthalpy");
         
         SET
@@ -76 +77 @@
         "Calculate Isentropic Head"
         Ws = (k/(k-1))*R*Inlet.T*((Outlet.P/Inlet.P)^((k-1)/k) - 1);
+
+        "Calculate Isoentropic Enthalpy"
+
+        hiso =  PP.VapourEnthalpy(Tiso, Outlet.P, Outlet.z);
+
         
         "Calculate Isentropic Outlet Temperature"
@@ -81 +87 @@
         
         "Calculate Real Outlet Temperature"
-        Effs * (Outlet.T- Inlet.T) = (Tiso - Inlet.T);
+
+        Effs * (Outlet.h - Inlet.h) = (hiso - Inlet.h);
+
         
         "Calculate Politropic Coefficient"