Changeset 151 for branches/newlanguage


Ignore:
Timestamp:
Feb 5, 2007, 6:47:59 PM (17 years ago)
Author:
gerson bicca
Message:

updated double pipe samples

Location:
branches/newlanguage/sample/heat_exchangers
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/newlanguage/sample/heat_exchangers/Sample_DoublePipe.mso

    r139 r151  
    3636
    3737        exchanger       as DoublePipe_LMTD;
    38         streamhot       as source;
    39         streamcold      as source;
     38#       exchanger       as DoublePipe_NTU;
     39        streamhot       as liquid_stream;
     40        streamcold      as liquid_stream;
    4041
    4142CONNECTIONS
    4243
    43         streamhot.Outlet        to exchanger.Inlet.Hot;
    44         streamcold.Outlet       to exchanger.Inlet.Cold;
     44        streamhot       to exchanger.Inlet.Hot;
     45        streamcold      to exchanger.Inlet.Cold;
    4546       
    4647SET
     
    5556#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    5657
    57 exchanger.HE.FlowDirection  = "Counter";
    58 exchanger.HE.TurbulentFlow  = "SiederTate";
     58exchanger.FlowDirection  = "counter";
     59exchanger.InnerTurbulentCorrelation  = "SiederTate";
     60
     61exchanger.OuterTurbulentCorrelation  = "SiederTate";
     62exchanger.OuterLaminarCorrelation     = "Schlunder";
    5963       
    6064#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
     
    6266#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    6367
    64 exchanger.HE.HotSide    =       "Inner";
     68exchanger.HotSide               =       "inner";
    6569exchanger.DoInner               =       0.04826*"m";
    6670exchanger.DiInner               =       0.04089*"m";
     
    7377#               Hot Stream
    7478#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    75         streamhot.Outlet.F = 10                         * "kmol/h";
    76         streamhot.Outlet.T = (68+273.15)   * "K";
    77         streamhot.Outlet.P = 5.4                        * "bar";
    78         streamhot.Outlet.z = [1,0];
     79        streamhot.F = 10                        * "kmol/h";
     80        streamhot.T = (68+273.15)   * "K";
     81        streamhot.P = 5.4                       * "bar";
     82        streamhot.z = [1,0];
    7983       
    8084#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    8185#       Cold Stream
    8286#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    83         streamcold.Outlet.F = 5                         * "kmol/h";
    84         streamcold.Outlet.P = 5.1               * "bar";
    85         streamcold.Outlet.T = (23+273.15)       * "K";
    86     streamcold.Outlet.z = [0,1];
     87        streamcold.F = 5                        * "kmol/h";
     88        streamcold.P = 5.1              * "bar";
     89        streamcold.T = (23+273.15)      * "K";
     90    streamcold.z = [0,1];
    8791#=====================================================================
    8892#       Fouling
     
    9498
    9599Dynamic = false;
     100#GuessFile = "Pipe";
    96101
    97102end
  • branches/newlanguage/sample/heat_exchangers/Sample_DoublePipe_Series.mso

    r139 r151  
    88DEVICES
    99
    10         Pipe(2)                 as DoublePipe_LMTD;
     10        Pipe(2)                 as DoublePipe_NTU;
    1111        streamhot       as source;
    1212        streamcold      as source;
     
    1414CONNECTIONS
    1515
    16         streamhotOutlet.        to Pipe(1).Inlet.Hot;
     16        streamhot.Outlet        to Pipe(1).Inlet.Hot;
    1717        Pipe(1).Outlet.Hot      to Pipe(2).Inlet.Hot;
    1818       
    19         streamcoldOutlet.       to Pipe(1).Inlet.Cold;
     19        streamcold.Outlet       to Pipe(1).Inlet.Cold;
    2020        Pipe(1).Outlet.Cold   to Pipe(2).Inlet.Cold;
    2121       
    2222PARAMETERS
    2323
    24         PP                      as CalcObject (File="vrpp");
     24        PP                      as Plugin(File="vrpp");
    2525        NComp           as Integer;
    2626
     
    3636#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    3737
    38 Pipe.HE.FlowDirection  = "Cocurrent";
    39 Pipe.HE.TurbulentFlow  = "SiederTate";
     38Pipe.FlowDirection                                      = "cocurrent";
     39Pipe.InnerTurbulentCorrelation          = "SiederTate";
    4040       
    4141#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
     
    4343#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    4444
    45 Pipe.HE.HotSide         =       "Inner";
     45Pipe.HotSide    =       "inner";
    4646Pipe.DoInner            =       0.04826*"m";
    4747Pipe.DiInner            =       0.04089*"m";
Note: See TracChangeset for help on using the changeset viewer.