Changeset 169 for branches/newlanguage/eml

Timestamp:

Mar 1, 2007, 3:09:21 PM (17 years ago)

Author:

gerson bicca

Message:

updated cstr reactor model for the new language

File:

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

branches/newlanguage/eml/reactors/cstr.mso

@@ -16 +16 @@
 * Model of cstr reactor
 *--------------------------------------------------------------------
-*
-*
-*
-*----------------------------------------------------------------------
 * Author: Paula B. Staudt
 * $Id$
@@ -27 +23 @@
 
 Model cstr_basic
-        PARAMETERS
-ext     NComp as Integer;
-        NReac as Integer;
-        stoic(NComp, NReac) as Real (Brief = "Stoichiometric Matrix");
 
-        VARIABLES
-in      Inlet  as stream;
-out     Outlet as stream_therm;
-        q    as heat_rate;
-        Vr   as volume (Brief="Reacting Volume");
-        M    as mol (Brief = "Molar total amount");
-        C(NComp)  as conc_mol(Brief="Components concentration");
+ATTRIBUTES
+        Pallete         = false;
+        Brief           = "Brief";
+        Info            =
+        "write some information";
+        
+PARAMETERS
 
-        EQUATIONS
-        "Molar fraction"
+outer   NComp                                           as Integer      (Brief = "Number Of Components");
+                NReac                                           as Integer      (Brief = "Number Of Reactions");
+                stoic(NComp, NReac)     as Real                 (Brief = "Stoichiometric Matrix");
+
+VARIABLES
+
+in              Inlet   as stream               (Brief="Inlet Stream");
+out     Outlet  as streamPH     (Brief="Outlet Stream");
+
+        q                       as heat_rate    (Brief="Heat");
+        Vr                      as volume               (Brief="Reacting Volume");
+        M                       as mol                  (Brief = "Molar total amount");
+        C(NComp)        as conc_mol     (Brief="Components concentration");
+
+EQUATIONS
+
+"Molar fraction"
         Outlet.z * M = C * Vr;
-        "Vapourisation Fraction"
+        
+"Vapourisation Fraction"
         Outlet.v = Inlet.v;
+
 end
 
 Model cstr_yield as cstr_basic
-        PARAMETERS
-        yield(NReac) as fraction;
+
+ATTRIBUTES
+        Pallete         = true;
+        Brief           = "Brief";
+        Info            =
+        "write some information";
         
-        EQUATIONS
+PARAMETERS
+        
+        yield(NReac) as fraction (Brief="Yield");
+        
+EQUATIONS
+
         Outlet.z*Outlet.F = Inlet.z*Inlet.F * sumt(stoic*(1-yield));
-        "Reactor Energy Balance"
+
+"Reactor Energy Balance"
         diff(M*Outlet.h) = Inlet.F*Inlet.h - Outlet.F*Outlet.h - q;
+
 end
 
 
 Model cstr as cstr_basic
-        VARIABLES
-        r(NReac) as reaction_mol;
-        Hr(NReac) as heat_reaction;
         
-        EQUATIONS
-        "Component Molar Balance"
+ATTRIBUTES
+        Pallete         = true;
+        Brief           = "Brief";
+        Info            =
+        "write some information";
+        
+VARIABLES
+        
+        r(NReac)        as reaction_mol         (Brief="Molar Reaction Rate");
+        Hr(NReac)       as heat_reaction        (Brief="Heat Reaction");
+        
+EQUATIONS
+
+"Component Molar Balance"
         diff(Outlet.z*M) = (Inlet.F*Inlet.z - Outlet.F*Outlet.z) + sumt(stoic*r)*Vr;
 
-        "Reactor Energy Balance"
-        diff(M*Outlet.h) = Inlet.F*Inlet.h - Outlet.F*Outlet.h +
-                sum(Hr*sum(stoic*r))*Vr - q;
+"Reactor Energy Balance"
+        diff(M*Outlet.h) = Inlet.F*Inlet.h - Outlet.F*Outlet.h +sum(Hr*sum(stoic*r))*Vr - q;
+
 end