Changeset 219 for branches/newlanguage/template

Timestamp:

Mar 16, 2007, 10:01:23 PM (17 years ago)

Author:

Rafael de Pelegrini Soares

Message:

Updated templates for the new language

Location:

branches/newlanguage/template

Files:

• flowsheet.mso (modified) (6 diffs)
• flowsheet_eqs.mso (deleted)

branches/newlanguage/template/flowsheet.mso

@@ -27 +27 @@
          *#
         PARAMETERS
-        PP      as CalcObject(Brief="Physical Properties", File="vrpp");
+        PP      as Plugin(Brief="Physical Properties",
+                Type="PP",
+                Components = ["1,3-butadiene", "isobutene", "n-pentane", "1-pentene"],
+                LiquidModel = "PR",
+                VapourModel = "PR"
+        );
         NComp   as Integer;
         SET
-        PP.Components = ["1,3-butadiene", "isobutene", "n-pentane", "1-pentene"];
-        PP.LiquidModel = "PR";
-        PP.VapourModel = "PR";
         NComp = PP.NumberOfComponents;
         
@@ -41 +43 @@
          *#
         DEVICES
-        STR101   as stream_therm;
+        STR101   as source;
         FLASH101 as flash;
+        Q101     as heat_rate;
 
         #*
@@ -49 +52 @@
          *#
         CONNECTIONS
-        STR101     to   FLASH101.Inlet;
+        STR101.Outlet     to   FLASH101.Inlet;
+        Q101              to   FLASH101.Q;
 
         #*
@@ -55 +59 @@
          *#
         SPECIFY
-        STR101.F = 496.3 * "kmol/h";
-        STR101.T = 338 * "K";
-        STR101.P = 507.1 * "kPa";
-        STR101.v = 0.1380;
-        STR101.z = [0.2379, 0.3082, 0.09959, 0.35431];
+        STR101.Outlet.F = 496.3 * 'kmol/h';
+        STR101.Outlet.T = 338 * 'K';
+        STR101.Outlet.P = 507.1 * 'kPa';
+        STR101.Outlet.z = [0.2379, 0.3082, 0.09959, 0.35431];
 
-        FLASH101.OutletV.F = 68.5 * "kmol/h";
-        FLASH101.OutletL.F = 400*sqrt(FLASH101.Level) * "kmol/h";
-        FLASH101.Q = 1 * "kJ/h";
+        FLASH101.OutletV.F = 68.5 * 'kmol/h';
+        FLASH101.OutletL.F = 400*sqrt(FLASH101.Level/'m') * 'kmol/h';
+        FLASH101.Q = 1 * 'kJ/h';
         
         #*
@@ -70 +73 @@
          *#
         SET
-        FLASH101.V = 2000 * "m^3";
-        FLASH101.Across = 1 * "m^2";     
+        FLASH101.V = 2000 * 'm^3';
+        FLASH101.Across = 1 * 'm^2';     
          
         #*
@@ -78 +81 @@
          *#
         INITIAL
-        FLASH101.OutletL.T = 330 *"K";
-        FLASH101.Level = 1 * "m";
+        FLASH101.OutletL.T = 330 *'K';
+        FLASH101.Level = 1 * 'm';
         FLASH101.OutletL.z(1) = 0.1;
         FLASH101.OutletL.z(2) = 0.1;