Changeset 601 for branches

Timestamp:

Aug 16, 2008, 8:20:04 PM (15 years ago)

Author:

gerson bicca

Message:

Compressor Model Finished (Missing documentation)

File:

• branches/gui/eml/pressure_changers/compressor.mso (modified) (4 diffs)

branches/gui/eml/pressure_changers/compressor.mso

@@ -14 +14 @@
 *
 *----------------------------------------------------------------------
-* Author: Marcos L. Alencastro,  Estefane S. Horn
+* Author: Marcos L. Alencastro,  Estefane S. Horn (Revised Gerson B. Bicca)
 * $Id$
 *--------------------------------------------------------------------*#
@@ -22 +22 @@
 Model centrifugal_compressor
         
-# Do Not Forget to Update The Losses by Mechanical Efficiency !!!! 
-
 ATTRIBUTES
         Pallete         = true;
         Icon            = "icon/CentrifugalCompressor"; 
-        Brief           = "Testing Model of a centrifugal compressor.";
-
+        Brief           = "Model of a centrifugal compressor.";
+        Info            =
+"To be documented";
         
 PARAMETERS
@@ -56 +55 @@
         
         FluidPower      as power                (Brief = "Fluid Power");
+        BrakePower      as power                (Brief = "Brake Power");
+        PowerLoss       as power                (Brief = "Power Losses");
         Mwm                     as molweight    (Brief = "Mixture Molar Weight");
         rho                     as dens_mass    (Brief = "Mass Density");
@@ -136 +137 @@
 end
 
-"Isentropic Outlet Temperature"#Mollier Method ?
+"Isentropic Outlet Temperature"
         PP.VapourEntropy(Tiso, Outlet.P, Outlet.z) = PP.VapourEntropy(Inlet.T, Inlet.P, Inlet.z);
-
-#"Calculate Politropic Coefficient"
-        #PolyCoeff*(ln(Outlet.T/Inlet.T)) = (PolyCoeff-1)*(ln(Outlet.P/Inlet.P));
 
 "Polytropic Efficiency"
         PolytropicEff * (PolyCoeff-1) * IseCoeff = PolyCoeff * (IseCoeff-1);
 
-"Fluid Power"
-        FluidPower = -WorkIn;
+"Brake Power"
+        BrakePower = -WorkIn;
+
+"Brake Power"
+        BrakePower = (FluidPower/MechanicalEff)-PowerLoss;
+
+"Power Loss"
+        PowerLoss = BrakePower - FluidPower;
 
 end