Changeset 310 for trunk/sample/stage_separators/sample_column.mso

Timestamp:

Jul 13, 2007, 6:28:33 PM (16 years ago)

Author:

Argimiro Resende Secchi

Message:

Creating energy_stream and set its use.

File:

• trunk/sample/stage_separators/sample_column.mso (modified) (10 diffs)

trunk/sample/stage_separators/sample_column.mso

@@ -201 +201 @@
         
         VARIABLES
-        Qc as heat_rate (Brief="Heat rate removed from condenser");
-        Qr as heat_rate (Brief="Heat rate supplied to reboiler");
+        Qc as energy_source (Brief="Heat rate removed from condenser");
+        Qr as energy_source (Brief="Heat rate supplied to reboiler");
         
         SET
@@ -217 +217 @@
         zero to col.trays([1:4]).Inlet;
         zero to col.trays([6:col.NTrays]).Inlet;
-        Qc to col.cond.Q;
-        Qr to col.reb.Q;
+        Qc.Outlet to col.cond.InletQ;
+        Qr.Outlet to col.reb.InletQ;
         
         SPECIFY
@@ -237 +237 @@
         col.sptop.frac = 0.444445;
         col.cond.OutletV.F = 0 * 'kmol/h';
-        Qr = 3.7743e6 * 'kJ/h';
-        Qc = -3.71e6 * 'kJ/h';
+        Qr.Outlet.Q = 3.7743e6 * 'kJ/h';
+        Qc.Outlet.Q = -3.71e6 * 'kJ/h';
         col.pump1.dP = 16 * 'kPa';
         col.trays.Emv = 1;
@@ -293 +293 @@
         
         VARIABLES
-        Qc as heat_rate (Brief="Heat rate removed from condenser");
-        Qr as heat_rate (Brief="Heat rate supplied to reboiler");
-        Qttop as heat_rate (Brief="Heat rate removed from condenser");
-        Qtbottom as heat_rate (Brief="Heat rate supplied to reboiler");
+        Qc as energy_source (Brief="Heat rate removed from condenser");
+        Qr as energy_source (Brief="Heat rate supplied to reboiler");
+        Qttop as energy_source (Brief="Heat rate removed from condenser");
+        Qtbottom as energy_source (Brief="Heat rate supplied to reboiler");
         
         SET
@@ -310 +310 @@
         zero to col.trays([1:4]).Inlet;
         zero to col.trays([6:col.NTrays]).Inlet;
-        Qttop to col.ttop.Q;
-        Qtbottom to col.tbottom.Q;
-        Qc to col.cond.Q;
-        Qr to col.reb.Q;
+        Qttop.Outlet to col.ttop.InletQ;
+        Qtbottom.Outlet to col.tbottom.InletQ;
+        Qc.Outlet to col.cond.InletQ;
+        Qr.Outlet to col.reb.InletQ;
         
         SPECIFY
@@ -332 +332 @@
         col.spbottom.Outlet1.F = 100 * 'kmol/h';
         
-        Qr = 3.7743e6 * 'kJ/h';
-        Qc = -3.71e6 * 'kJ/h';
-        Qttop = 0 * 'kJ/h';
-        Qtbottom = 0 * 'kJ/h';
+        Qr.Outlet.Q = 3.7743e6 * 'kJ/h';
+        Qc.Outlet.Q = -3.71e6 * 'kJ/h';
+        Qttop.Outlet.Q = 0 * 'kJ/h';
+        Qtbottom.Outlet.Q = 0 * 'kJ/h';
         
         col.pump1.dP = 16 * 'kPa';
@@ -407 +407 @@
 
         VARIABLES
-        Qc as heat_rate (Brief="Heat rate removed from condenser");
-        Qr as heat_rate (Brief="Heat rate supplied to reboiler");
+        Qc as energy_source (Brief="Heat rate removed from condenser");
+        Qr as energy_source (Brief="Heat rate supplied to reboiler");
         Had_top as Real (Brief="Dimensionless condenser level");
         Had_bot as Real (Brief="Dimensionless reboiler level");
@@ -432 +432 @@
         zero to col.trays([1:4]).Inlet;
         zero to col.trays([6:col.NTrays]).Inlet;
-        Qc to col.cond.Q;
-        Qr to col.reb.Q;
+        Qc.Outlet to col.cond.InletQ;
+        Qr.Outlet to col.reb.InletQ;
 
         EQUATIONS
@@ -452 +452 @@
         TCcond.Ports.input = Tad;
         Tad = (col.cond.OutletL.T-Tmin)/(Tmax-Tmin);
-        Qc = Qcmin+(Qcmax-Qcmin)*TCcond.Ports.output;   
+        Qc.Outlet.Q = Qcmin+(Qcmax-Qcmin)*TCcond.Ports.output;  
 
         "Pressure Controller"
@@ -529 +529 @@
         zero.h = 0 * 'J/mol';
         
-        Qr = 3e6 * 'kJ/h';
+        Qr.Outlet.Q = 3e6 * 'kJ/h';
         col.pump1.dP = 16 * 'kPa';
         col.trays.Emv = 1;