Ignore:
Timestamp:
Feb 5, 2007, 9:31:00 AM (16 years ago)
Author:
gerson bicca
Message:

updated samples and testing new heat exchangers models

File:
1 edited

Legend:

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

    r148 r149  
    3232NComp    as Integer;
    3333       
     34DEVICES
     35exchanger       as Shell_and_Tubes_NTU;
     36streamhot       as source;
     37streamcold  as source;
     38
    3439SET
    3540
    3641PP.LiquidModel          = "PR";
    3742PP.VapourModel          = "PR";
    38 PP.Components   = ["water","n-butane", "benzene", "n-octane" ];
    39 NComp                                           = PP.NumberOfComponents;
     43PP.Components           = ["water","n-butane", "benzene", "n-octane" ];
     44NComp                                   = PP.NumberOfComponents;
    4045
    41 DEVICES
    42 exchanger       as E_Shell_NTU;
    43 streamhot       as streamTP;
    44 streamcold  as streamTP;
    45        
     46exchanger.ShellType             = "Eshell";
     47
    4648CONNECTIONS
    4749
    48 streamhot               to exchanger.Inlet.Hot;
    49 streamcold      to exchanger.Inlet.Cold;
     50streamhot.Outlet        to exchanger.Inlet.Hot;
     51streamcold.Outlet       to exchanger.Inlet.Cold;
    5052       
    5153SPECIFY
     
    5557exchanger.PressureDrop.Hot.Pdrop        = 0.1*"kPa";
    5658exchanger.PressureDrop.Cold.Pdrop   = 0.2*"kPa";
    57 streamhot.F             = 20    * "kmol/h";
    58 streamhot.T             = 450     * "K";
    59 streamhot.P             = 120    * "kPa";
    60 streamhot.z             = [1,0,0,0];
    61 streamcold.F            = 10 * "kmol/h";
    62 streamcold.P            = 120 * "kPa";
    63 streamcold.T            = 300 * "K";   
    64 streamcold.z            = [0,0.5, 0.1, 0.4];
     59
     60streamhot.Outlet.F              = 20    * "kmol/h";
     61streamhot.Outlet.T              = 450     * "K";
     62streamhot.Outlet.P              = 120    * "kPa";
     63streamhot.Outlet.z              = [1,0,0,0];
     64
     65streamcold.Outlet.F             = 10 * "kmol/h";
     66streamcold.Outlet.P             = 120 * "kPa";
     67streamcold.Outlet.T             = 300 * "K";   
     68streamcold.Outlet.z             = [0,0.5, 0.1, 0.4];
     69
    6570exchanger.Outlet.Cold.T = 347*"K";
    6671       
    6772OPTIONS
    68  mode                     = "steady";
     73Dynamic   = false;
    6974 end
Note: See TracChangeset for help on using the changeset viewer.