Changeset 462 for branches/packed

Timestamp:

Feb 15, 2008, 3:15:33 PM (16 years ago)

Author:

Paula Bettio Staudt

Message:

More changes

Location:

branches/packed

Files:

• eml/stage_separators/tray.mso (modified) (2 diffs)
• sample/stage_separators/sample_tray.mso (modified) (2 diffs)

branches/packed/eml/stage_separators/tray.mso

@@ -403 +403 @@
         if Rev > 1e-4 then
                 "Resistance Coefficient"        
-                Qsio = 1;#Cpo * (64/Rev + 1.8/Rev^0.08);
+                Qsio = Cpo * (64/Rev + 1.8/Rev^0.08);
         else
                 Qsio = 1;
@@ -409 +409 @@
 
         "Pressure drop and Vapor flow"
-        (InletV.P - OutletV.P)/hs  = Qsio*a*uV^2*rhoV*invK / (2*e^3);
+        (InletV.P - OutletV.P)*0.0091/hs  = Qsio*a*uV^2*rhoV*invK / (2*e^3);
         
         "Efficiency"

branches/packed/sample/stage_separators/sample_tray.mso

@@ -133 +133 @@
         feed.Outlet.z = 1/NComp;
 
-        inL.F = 7121 * 'kmol/h';        
+        inL.F = 71.21 * 'kmol/h';       
         inL.P = 2.22 * 'atm';
         inL.T = 297.6 * 'K';
@@ -148 +148 @@
         #Metal Pall Ring - nominal packing size 50 mm - Billet and Schultes, 1999.
         t1.Q = 0 * 'kW';
-        t1.Ap = 0.2 * 'm^2'; #0.8 * 'm^2';
-        t1.V = 0.2 * 'm^2' * 0.1 * 'm';#0.8 * 'm^2' * 0.4 * 'm';
-        t1.ds = 0.5 * 'm'; #1.009 * 'm';
+        t1.Ap = 0.8 * 'm^2';
+        t1.V = 0.8 * 'm^2' * 0.4 * 'm';
+        t1.ds = 1.009 * 'm';
         t1.Cpo = 0.763;
         t1.e = 0.951;
         t1.a = 112.6 * 'm^2/m^3';
-        t1.hs = 0.1 * 'm'; #0.4 * 'm';
+        t1.hs = 0.4 * 'm';
 
         INITIAL
         t1.OutletL.T = 280 *'K';
-        t1.ML = 0.01 * 'kmol';
+        t1.ML = 0.05 * 'kmol';
         t1.OutletL.z([1:4]) = [0.286, 0.203, 0.148, 0.006];
         
         OPTIONS
-        #NLASolver(File="nlasolver");
+        DAESolver(File="sundials");
         #InitialFile = "packedStage_BilletSchultes_Test.rlt";
         TimeStep = 2;