Changeset 333 for trunk

Timestamp:

Aug 5, 2007, 8:05:52 PM (15 years ago)

Author:

Argimiro Resende Secchi

Message:

Add vfrac in dynamic flash.

File:

• trunk/eml/stage_separators/flash.mso (modified) (6 diffs)

trunk/eml/stage_separators/flash.mso

@@ -63 +63 @@
         Level as length (Brief="liquid height");
         Across as area (Brief="Flash Cross section area");
+        vfrac as fraction (Brief="Vapourization fraction");
 
         EQUATIONS
@@ -79 +80 @@
         "Mol fraction normalisation"
         sum(OutletL.z)=1.0;
+
         "Mol fraction normalisation"
         sum(OutletL.z)=sum(OutletV.z);
-        
+
+        "Vaporization Fraction"
+        OutletV.F = Inlet.F * vfrac;
+
         "Liquid Volume"
         vL = PP.LiquidVolume(OutletL.T, OutletL.P, OutletL.z);
+
         "Vapour Volume"
         vV = PP.VapourVolume(OutletV.T, OutletV.P, OutletV.z);
@@ -144 +150 @@
 out     OutletV as vapour_stream(Brief="Vapour outlet stream", PosX=0.4877, PosY=0);
 in      InletQ as energy_stream (Brief="Rate of heat supply", PosX=1, PosY=0.7559);
-        vfrac as fraction;
+        vfrac as fraction (Brief="Vapourization fraction");
 
         EQUATIONS
@@ -152 +158 @@
         "Global Molar Balance"
         Inlet.F = OutletV.F + OutletL.F;
-        "Vaporisation Fraction"
+        
+        "Vaporization Fraction"
         OutletV.F = Inlet.F * vfrac;
         
@@ -195 +202 @@
 out     OutletV as vapour_stream(Brief="Vapour outlet stream", PosX=0.4877, PosY=0);
 in      InletQ as energy_stream (Brief="Rate of heat supply", PosX=1, PosY=0.7559);
-        vfrac as fraction(Brief="Real vaporization fraction");
+        vfrac as fraction(Brief="Vaporization fraction");
         h as enth_mol(Brief="Mixture enthalpy");
 
@@ -253 +260 @@
 out     OutletV as vapour_stream(Brief="Vapour outlet stream", PosX=0.4877, PosY=0);
 in      InletQ as energy_stream (Brief="Rate of heat supply", PosX=1, PosY=0.7559);
-        vfrac as fraction(Brief="Real vaporization fraction");
+        vfrac as fraction(Brief="Vaporization fraction");
         vsat as Real(Lower=-0.1, Upper=1.1, Brief="Vaporization fraction if saturated");
         Tsat as temperature(Lower=173, Upper=1473, Brief="Temperature if saturated");