Changeset 363

Timestamp:

Sep 8, 2007, 4:23:17 PM (16 years ago)

Author:

Argimiro Resende Secchi

Message:

Improved mixer model.

Location:

trunk/eml

Files:

• mixers_splitters/mixer.mso (modified) (3 diffs)
• stage_separators/column.mso (modified) (1 diff)

trunk/eml/mixers_splitters/mixer.mso

@@ -20 +20 @@
 using "stage_separators/flash";
 
-Model mixer as flash_steady
+Model mixer
         ATTRIBUTES
         Pallete         = true;
@@ -27 +27 @@
         Info            =
 "== Assumptions ==
-* thermodynamics equilibrium
+* static
 * adiabatic
-        
+
 == Specify ==
 * the inlet streams";
@@ -39 +39 @@
         VARIABLES
 in  Inlet_mixer(Ninlet) as stream (Brief = "Inlet streams", PosX=0.5, PosY=0, Symbol="_{inMix}");
-out Outlet                      as stream (Brief = "Outlet stream", PosX=1, PosY=0.5059, Symbol="_{out}");
-out Out_int                             as stream (Brief = "Intermediate Outlet stream", Symbol="_{outint}");
-        zeroQ as energy_source (Brief="No Heat rate supplied");
+out Outlet                      as streamPH (Brief = "Outlet stream", PosX=1, PosY=0.5059, Symbol="_{out}");
         
-        CONNECTIONS
-        
-        Out_int to Inlet;
-        zeroQ.OutletQ to InletQ;
-
         EQUATIONS
         
         "Flow"
-        Out_int.F = sum(Inlet_mixer.F);
-                
+        Outlet.F = sum(Inlet_mixer.F);
+
          for i in [1:NComp]
        
                 "Composition"
-        Out_int.F*Out_int.z(i) = sum(Inlet_mixer.F*Inlet_mixer.z(i));
+        Outlet.F*Outlet.z(i) = sum(Inlet_mixer.F*Inlet_mixer.z(i));
     end
 
         "Energy Balance"
-        Out_int.F*Out_int.h = sum(Inlet_mixer.F*Inlet_mixer.h);
-        
+        Outlet.F*Outlet.h = sum(Inlet_mixer.F*Inlet_mixer.h);
+
         "Pressure"
-        Out_int.P = min(Inlet_mixer.P);
-        Out_int.P = OutletV.P;
-        
-        "Temperature"
-        Out_int.T = OutletV.T;
-        
-        "Vapourisation Fraction"
-        Out_int.v = vfrac;
-        
-        Outlet.F = Inlet.F;
-        Outlet.z = Inlet.z;
-        Outlet.v = Inlet.v;
-        Outlet.T = Inlet.T;
-        Outlet.h = Inlet.h;
-        Outlet.P = Inlet.P;
-        
-        zeroQ.OutletQ.Q = 0*'kW';       
-        
+        Outlet.P = min(Inlet_mixer.P);
 end
-

trunk/eml/stage_separators/column.mso

@@ -35 +35 @@
 using "condenser";
 using "mixers_splitters/splitter";
-using "mixers_splitters/mixer";
 using "tank";
 using "pressure_changers/pump";