Changeset 170 for branches/newlanguage/eml

Timestamp:

Mar 1, 2007, 3:35:36 PM (17 years ago)

Author:

gerson bicca

Message:

updated pfr reactor model for the new language

File:

• branches/newlanguage/eml/reactors/pfr.mso (modified) (2 diffs)

branches/newlanguage/eml/reactors/pfr.mso

@@ -30 +30 @@
 
 Model pfr
-        PARAMETERS
-ext PP   as CalcObject (Brief = "External Physical Properties");
-ext     NComp as Integer(Brief="Number of components");
-        NReac as Integer(Brief="Number of reactions");
-        stoic(NComp, NReac) as Real (Brief = "Stoichiometric Matrix");
-        NDisc as Integer(Brief="Number of points of discretization", Default=10);
-        Mw(NComp)  as molweight (Brief="Component Mol Weight");
+
+ATTRIBUTES
+        Pallete         = true;
+        Brief           = "Brief";
+        Info            =
+        "write some information";
+
+PARAMETERS
+
+outer PP                                                        as Plugin               (Brief = "External Physical Properties");
+outer   NComp                                           as Integer              (Brief="Number of components");
+                NReac                                           as Integer              (Brief="Number of reactions");
+                stoic(NComp, NReac)     as Real                         (Brief = "Stoichiometric Matrix");
+                NDisc                                           as Integer              (Brief="Number of points of discretization", Default=10);
+                Mw(NComp)                               as molweight    (Brief="Component Mol Weight");
+                L                                                               as length               (Brief="Reactor Length");
+                Across                                          as area                 (Brief="Cross section area");
+
+SET
         
-        L as length(Brief="Reactor Length");
-        Across as area(Brief="Cross section area");
-
-        SET
         Mw   = PP.MolecularWeight();
 
-        VARIABLES
-in      Inlet  as stream;
-out     Outlet as stream;
-        str(NDisc+1) as stream_therm;
+VARIABLES
+
+in              Inlet   as stream       (Brief = "Inlet Stream");
+out     Outlet  as stream       (Brief = "Outlet Stream");
+
+        str(NDisc+1) as streamPH;
         vel(NDisc+1) as velocity;
         vol(NDisc+1) as vol_mol;
         rho(NDisc+1) as dens_mass;
         
-        q(NDisc)    as heat_rate;
-        M(NComp, NDisc)    as mol (Brief = "Molar holdup");
-        Mt(NDisc)    as mol (Brief = "Molar holdup");
-        C(NComp, NDisc)  as conc_mol(Brief="Components concentration", Lower=-1e-6);
-        E(NDisc) as energy (Brief="Total Energy Holdup on element");
-        
-        r(NReac, NDisc) as reaction_mol;
-        Hr(NReac, NDisc) as heat_reaction;
+        q(NDisc)                                as heat_rate;
+        M(NComp, NDisc)         as mol                  (Brief = "Molar holdup");
+        Mt(NDisc)                       as mol                  (Brief = "Molar holdup");
+        C(NComp, NDisc)         as conc_mol     (Brief="Components concentration", Lower=-1e-6);
+        E(NDisc)                                as energy               (Brief="Total Energy Holdup on element");
+        r(NReac, NDisc)                 as reaction_mol;
+        Hr(NReac, NDisc)        as heat_reaction;
 
-        EQUATIONS
-        "Vapourisation Fraction"
+EQUATIONS
+
+"Vapourisation Fraction"
         str.v = Inlet.v;
 
-        "Inlet boundary"
+"Inlet boundary"
         str(1).F = Inlet.F;
         str(1).T = Inlet.T;
@@ -71 +81 @@
         str(1).z = Inlet.z;
 
-        "Outlet boundary"
+"Outlet boundary"
         Outlet.F = str(NDisc+1).F;
         Outlet.T = str(NDisc+1).T;