Changeset 185 for branches/newlanguage/sample

Timestamp:

Mar 6, 2007, 2:25:34 PM (16 years ago)

Author:

Rafael de Pelegrini Soares

Message:

Updated the ammonia optimization sample

Location:

branches/newlanguage/sample/optimization

Files:

• ammonia.mso (modified) (12 diffs)
• ammonia_opt.mso (modified) (1 diff)

branches/newlanguage/sample/optimization/ammonia.mso

@@ -31 +31 @@
 Model Compressor
         PARAMETERS
-ext PP as CalcObject;
-ext NComp as Integer;
+outer PP as Plugin;
+outer NComp as Integer;
         
         VARIABLES
 in      Inlet as stream;
-out     Outlet as stream_therm;
+out     Outlet as streamPH;
 
         EQUATIONS
@@ -47 +47 @@
         "Component Molar Balance"
         Inlet.z = Outlet.z;
-        
-        "vaporization fraction "
-        Outlet.v = 1.0;
 end
 
@@ -55 +52 @@
 Model Mixer
         PARAMETERS
-ext PP as CalcObject;
-ext NComp as Integer;
+outer PP as Plugin;
+outer NComp as Integer;
         
         VARIABLES
 in      Inlet1 as stream;
 in      Inlet2 as stream;
-out     Outlet as stream_therm;
+out     Outlet as streamPH;
 
         EQUATIONS
@@ -73 +70 @@
         "Component Molar Balance"
         Inlet1.z*Inlet1.F + Inlet2.z*Inlet2.F = Outlet.F * Outlet.z;
-        "vaporization fraction"
-        Outlet.v = Inlet1.v;
 end
 
@@ -80 +75 @@
 Model Reactor
         PARAMETERS
-ext PP as CalcObject;
-ext NComp as Integer;
+outer PP as Plugin;
+outer NComp as Integer;
         NReac as Integer(Default=1);
         stoic(NComp, NReac) as Real (Brief = "Stoichiometric Matrix");
@@ -88 +83 @@
         VARIABLES
 in      Inlet as stream;
-out     Outlet as stream_therm;
+out     Outlet as streamPH;
         Outletz(NComp) as fraction;
         X(NReac) as fraction(Brief="Convertion of the key component");
@@ -108 +103 @@
 
         Outlet.P = Inlet.P;
-        
-        "vaporization fraction"
-        Outlet.v = Inlet.v;
 end
 
@@ -116 +108 @@
 FlowSheet Ammonia
         PARAMETERS
-        PP      as CalcObject(Brief="Physical Properties", File="vrpp");
+        PP      as Plugin(Brief="Physical Properties", File="vrpp");
         NComp   as Integer;
         SET
@@ -125 +117 @@
         
         DEVICES
-        FEED   as streamTP;
+        FEED   as source;
         C101   as Compressor;
         R101   as Reactor;
-        F101   as flash_Steady;
-        F102   as flash_Steady;
+        F101   as flash_steady;
+        F102   as flash_steady;
         S101   as splitter;
         M101   as Mixer;
@@ -137 +129 @@
         VARIABLES
         purity as fraction(Brief="Purity of the product");
-        production as flow_mol(Unit = "lbmol/h", Brief="Ammonia in the product");
-        loose as flow_mol(Unit = "lbmol/h", Brief="Ammonia in the purge");
+        production as flow_mol(DisplayUnit = 'lbmol/h', Brief="Ammonia in the product");
+        loose as flow_mol(DisplayUnit = 'lbmol/h', Brief="Ammonia in the purge");
         Q1 as heat_rate;
         Q2 as heat_rate;
 
         CONNECTIONS
-        FEED           to   M101.Inlet1;
+        FEED.Outlet    to   M101.Inlet1;
         M101.Outlet    to   C101.Inlet;
         C101.Outlet    to   M102.Inlet1;
@@ -162 +154 @@
 
         SPECIFY
-        FEED.F = 2000 * "lbmol/h";
-        FEED.T = (27 + 273.15) * "K";
-        FEED.P = 10 * "atm";
-        FEED.z = [0.74, 0.24, 0.01, 0.01, 0.0];
+        FEED.Outlet.F = 2000 * 'lbmol/h';
+        FEED.Outlet.T = (27 + 273.15) * 'K';
+        FEED.Outlet.P = 10 * 'atm';
+        FEED.Outlet.z = [0.74, 0.24, 0.01, 0.01, 0.0];
         
-        C101.Outlet.P = 200 * "atm";
-        C102.Outlet.P = 200 * "atm";
+        C101.Outlet.P = 200 * 'atm';
+        C102.Outlet.P = 200 * 'atm';
         
         R101.X = 0.4; # Convertion of the reactor
         
-        F101.OutletV.P = 199 * "atm";
-        F101.OutletV.T = (-34 + 273.15) * "K";
+        F101.OutletV.P = 199 * 'atm';
+        F101.OutletV.T = (-34 + 273.15) * 'K';
         
-        F102.OutletV.P = 10 * "atm";
-        F102.Q = 0 * "kJ/h";
+        F102.OutletV.P = 10 * 'atm';
+        F102.Q = 0 * 'kJ/h';
         
         # We can choose between one of the following specs
         S101.frac = 0.78; # Recycle fraction
-        #loose = 1 * "lbmol/h"; # Ammonia in the purge
+        #loose = 1 * 'lbmol/h'; # Ammonia in the purge
         
         EQUATIONS
@@ -188 +180 @@
         
         OPTIONS
-        mode = "steady";
-        relativeAccuracy = 1e-5;
+        Dynamic = false;
+        RelativeAccuracy = 1e-5;
 end
 

branches/newlanguage/sample/optimization/ammonia_opt.mso

@@ -42 +42 @@
         
         OPTIONS
-        relativeAccuracy = 1e-1;
+        RelativeAccuracy = 1e-1;
 end