Changeset 130

Timestamp:

Jan 23, 2007, 7:01:59 PM (15 years ago)

Author:

gerson bicca

Message:

updated for better convergence

File:

• trunk/sample/heat_exchangers/Sample_DoublePipe_Series.mso (modified) (6 diffs)

trunk/sample/heat_exchangers/Sample_DoublePipe_Series.mso

@@ -8 +8 @@
 DEVICES
 
-        Pipe(2)         as DoublePipe_LMTD;
+        Pipe1   as DoublePipe_LMTD;
+        Pipe2   as DoublePipe_NTU;
+        
         streamhot       as streamTP;
         streamcold      as streamTP;
@@ -14 +16 @@
 CONNECTIONS
 
-        streamhot                       to Pipe(1).Inlet.Hot;
-        Pipe(1).Outlet.Hot      to Pipe(2).Inlet.Hot;
+        streamhot                       to Pipe1.Inlet.Hot;
+        Pipe1.Outlet.Hot        to Pipe2.Inlet.Hot;
         
-        streamcold                      to Pipe(1).Inlet.Cold;
-        Pipe(1).Outlet.Cold to Pipe(2).Inlet.Cold;
+        streamcold                      to Pipe1.Inlet.Cold;
+        Pipe1.Outlet.Cold   to Pipe2.Inlet.Cold;
         
 PARAMETERS
@@ -36 +38 @@
 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
-Pipe.HE.FlowDirection  = "Cocurrent";
-Pipe.HE.TurbulentFlow  = "SiederTate";
+Pipe1.HE.FlowDirection  = "Cocurrent";
+Pipe2.HE.FlowDirection  = "Cocurrent";
+Pipe1.HE.TurbulentFlow  = "SiederTate";
+Pipe2.HE.TurbulentFlow  = "SiederTate";
         
 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
@@ -43 +47 @@
 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
-Pipe.HE.HotSide         =       "Inner";
-Pipe.DoInner            =       0.04826*"m";
-Pipe.DiInner            =       0.04089*"m";
-Pipe.DiOuter            =       0.07793*"m";
-Pipe.Kwall              =       0.057 *"kW/m/K";
-Pipe.Lpipe                      =       3*"m";
+Pipe1.HE.HotSide        =       "Inner";
+Pipe1.DoInner           =       0.04826*"m";
+Pipe1.DiInner           =       0.04089*"m";
+Pipe1.DiOuter           =       0.07793*"m";
+Pipe1.Kwall             =       0.057 *"kW/m/K";
+Pipe1.Lpipe                     =       1.7*"m";
+
+Pipe2.HE.HotSide        =       "Inner";
+Pipe2.DoInner           =       0.04826*"m";
+Pipe2.DiInner           =       0.04089*"m";
+Pipe2.DiOuter           =       0.07793*"m";
+Pipe2.Kwall             =       0.057 *"kW/m/K";
+Pipe2.Lpipe                     =       1.7*"m";
 
 SPECIFY
@@ -55 +66 @@
 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
-        streamhot.F = 100               * "kmol/h";
-        streamhot.T = (70+273.15)   * "K";
-        streamhot.P = 5                         * "bar";
+        streamhot.F = 100       * "kmol/h";
+        streamhot.T = 415       * "K";
+        streamhot.P = 5                 * "bar";
         streamhot.z = [1,0];
         
@@ -64 +75 @@
 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
-        streamcold.F = 5                        * "kmol/h";
-        streamcold.P = 5                * "bar";
-        streamcold.T = (25+273.15)      * "K";
+        streamcold.F = 5        * "kmol/h";
+        streamcold.P = 5    * "bar";
+        streamcold.T = 310      * "K";
     streamcold.z = [0,1];
 #=====================================================================
 #       Fouling
 #=====================================================================
-        Pipe.Resistances.Rfi = 0*"m^2*K/kW";
-        Pipe.Resistances.Rfo = 0*"m^2*K/kW";
+        Pipe1.Resistances.Rfi = 0*"m^2*K/kW";
+        Pipe2.Resistances.Rfi = 0*"m^2*K/kW";
+        Pipe1.Resistances.Rfo = 0*"m^2*K/kW";
+        Pipe2.Resistances.Rfo = 0*"m^2*K/kW";
         
 OPTIONS
-mode            = "steady";
+mode = "steady";
 
 end