Changeset 753 for trunk/eml/streams.mso

Timestamp:

May 22, 2009, 1:55:00 PM (14 years ago)

Author:

Argimiro Resende Secchi

Message:

Adding standard volumetric flow in source and sink.

File:

• trunk/eml/streams.mso (modified) (10 diffs)

trunk/eml/streams.mso

@@ -175 +175 @@
                   CompositionBasis              as Switcher             (Brief = "Molar or Mass Composition", Valid = ["Molar", "Mass"], Default="Molar");
                   ValidPhases                           as Switcher             (Brief = "Valid Phases for Flash Calculation", Valid = ["Vapour-Only", "Liquid-Only","Vapour-Liquid"], Default="Vapour-Liquid");
-        
-
+                  T_std                                         as temperature (Brief = "Standard temperature", Hidden=true, Default = 298.15);
+                  P_std                                         as pressure (Brief = "Standard pressure", Hidden=true, Default = 1);
 SET
 
@@ -189 +189 @@
         Fw                                                      as flow_mass            (Brief = "Stream Mass Flow");
         Fvol                                    as flow_vol        (Brief = "Volumetric Flow");
+        Fvol_std                                as flow_vol        (Brief = "Standard Volumetric Flow (1 atm, 20 C)");
         T                                                               as temperature  (Brief = "Stream Temperature");
         T_Cdeg                                          as temperature  (Brief = "Temperature in °C", Lower=-200);
@@ -198 +199 @@
         Mw                                              as molweight                    (Brief = "Average Mol Weight",Protected=true);
         vm                                              as volume_mol           (Brief = "Molar Volume",Protected=true);        
+        vm_std                                  as volume_mol           (Brief = "Standard Molar Volume",Protected=true);       
         rho                                             as dens_mass                    (Brief = "Stream Mass Density",Protected=true);
         rhom                                            as dens_mol                     (Brief = "Stream Molar Density",Protected=true);
@@ -242 +244 @@
         vm = PP.LiquidVolume(Outlet.T, Outlet.P, x);
 
+"Standard Molar Volume"
+        vm_std = PP.LiquidVolume(T_std, P_std, x);
+
         case "Vapour-Only":
 
@@ -259 +264 @@
         vm = PP.VapourVolume(Outlet.T, Outlet.P, y);
 
+"Standard Molar Volume"
+        vm_std = PP.VapourVolume(T_std, P_std, y);
 
         case "Vapour-Liquid":
@@ -269 +276 @@
 
 "Molar Volume"
-        vm = (1-Outlet.v)*PP.LiquidVolume(Outlet.T, Outlet.P, x) + Outlet.v*PP.VapourVolume(Outlet.T,Outlet.P,y);
+        vm = (1-Outlet.v)*PP.LiquidVolume(Outlet.T, Outlet.P, x) + Outlet.v*PP.VapourVolume(Outlet.T, Outlet.P, y);
+
+"Standard Molar Volume"
+        vm_std = (1-Outlet.v)*PP.LiquidVolume(T_std, P_std, x) + Outlet.v*PP.VapourVolume(T_std, P_std, y);
 
 end
@@ -287 +297 @@
 "Volumetric Flow"
         Fvol = Outlet.F*vm ;
-        
+
+"Standard Volumetric Flow"
+        Fvol_std = Outlet.F*vm_std ;
+
 "Temperature in °C"
         T_Cdeg = Outlet.T - 273.15 * 'K';
@@ -431 +444 @@
                   M(NComp)      as molweight    (Brief = "Component Mol Weight");
                   rhoModel              as Switcher             (Brief = "Density model", Valid = ["volume", "correlation"], Default="volume");
-        
+                  T_std                 as temperature  (Brief = "Standard temperature", Hidden=true, Default = 298.15);
+                  P_std                 as pressure             (Brief = "Standard pressure", Hidden=true, Default = 1);
+
         SET
 
@@ -444 +459 @@
         Mw                              as molweight    (Brief = "Average Mol Weight");
         vm                              as volume_mol   (Brief = "Molar Volume");       
+        vm_std                  as volume_mol   (Brief = "Standard Molar Volume",Protected=true);       
         rho                             as dens_mass    (Brief = "Stream Mass Density");
         rhom                    as dens_mol             (Brief = "Stream Molar Density");
         Fw                              as flow_mass    (Brief = "Stream Mass Flow");
         Fvol            as flow_vol     (Brief = "Volumetric Flow");
+        Fvol_std        as flow_vol     (Brief = "Standard Volumetric Flow (1 atm, 20 C)");
         s                               as entr_mol             (Brief = "Stream Entropy");
         T_Cdeg                  as temperature  (Brief = "Temperature in °C", Lower=-200);
@@ -475 +492 @@
 
         "Molar Volume"
-        vm = (1-v)*PP.LiquidVolume(Inlet.T, Inlet.P, x) + v*PP.VapourVolume(Inlet.T,Inlet.P,y);
-        
+        vm = (1-v)*PP.LiquidVolume(Inlet.T, Inlet.P, x) + v*PP.VapourVolume(Inlet.T, Inlet.P, y);
+
+        "Standard Molar Volume"
+        vm_std = (1-v)*PP.LiquidVolume(T_std, P_std, x) + v*PP.VapourVolume(T_std, P_std, y);
+
         "Volumetric Flow"
         Fvol = Inlet.F*vm ;
-        
+
+        "Standard Volumetric Flow"
+        Fvol_std = Inlet.F*vm_std ;
+
         "Mass Fraction"
         zmass = M*Inlet.z / Mw;