Ignore:
Timestamp:
Mar 2, 2007, 1:57:58 PM (16 years ago)
Author:
gerson bicca
Message:

updated sepComp model and samples of mixers/splitter

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/newlanguage/sample/mixers_splitters/sample_sepComp.mso

    r80 r175  
    2727
    2828FlowSheet Sample_sepComp_n
    29         PARAMETERS
    30         PP      as CalcObject(Brief="Physical Properties",File="vrpp");
    31         NComp as Integer;
    3229       
    33         DEVICES
    34         stream as stream_therm;
    35         sep as sepComp_n;
     30PARAMETERS
    3631       
    37         CONNECTIONS
    38         stream to sep.Inlet;
     32        PP                      as Plugin       (Brief="Physical Properties",File="vrpp");
     33        NComp   as Integer;
    3934       
    40         SET
     35DEVICES
     36        Stream  as source;
     37        sep             as sepComp_n;
     38       
     39CONNECTIONS
     40        Stream.Outlet to sep.Inlet;
     41       
     42SET
    4143        PP.Components = [ "isobutane", "benzene"];
    4244        PP.LiquidModel = "PR";
    4345        PP.VapourModel = "PR";
    4446        NComp = PP.NumberOfComponents;
     47       
    4548        sep.mainComp = 1;
    4649        sep.NOutlet = 3;
    4750
    48         SPECIFY
    49         stream.F = 30 * "kmol/h";
    50         stream.P = 120 * "kPa";
    51         stream.T = 290 * "K";
    52         stream.z = [0.6, 0.4];
    53         stream.v = 0;
     51SPECIFY
     52        Stream.Outlet.F = 30 * 'kmol/h';
     53        Stream.Outlet.P = 120 * 'kPa';
     54        Stream.Outlet.T = 290 * 'K';
     55        Stream.Outlet.z = [0.6, 0.4];
     56       
    5457        sep.Outlet(1).z(1) = 0.7;
    5558        sep.Outlet(2).z(1) = 0.1;
     
    5962#       sep.recovery(2) = 0.033333;
    6063
    61         OPTIONS
    62         relativeAccuracy = 1e-7;
     64OPTIONS
     65        RelativeAccuracy = 1e-7;
    6366       
    6467end
     
    6770FlowSheet Sample_sepComp
    6871        PARAMETERS
    69         PP      as CalcObject(Brief="Physical Properties",File="vrpp");
     72        PP      as Plugin(Brief="Physical Properties",File="vrpp");
    7073        NComp as Integer;
    7174       
    7275        DEVICES
    73         stream as streamTP;
     76        Stream as source;
    7477        sep as sepComp;
    7578       
    7679        CONNECTIONS
    77         stream to sep.Inlet;
     80        Stream.Outlet to sep.Inlet;
    7881       
    7982        SET
     
    8588
    8689        SPECIFY
    87         stream.F = 30 * "kmol/h";
    88         stream.P = 120 * "kPa";
    89         stream.T = 290 * "K";
    90         stream.z = [0.6, 0.4];
     90        Stream.Outlet .F = 30 * 'kmol/h';
     91        Stream.Outlet .P = 120 * 'kPa';
     92        Stream.Outlet .T = 290 * 'K';
     93        Stream.Outlet .z = [0.6, 0.4];
     94       
    9195        sep.Outlet1.z(1) = 0.7;
    9296        sep.frac = 0.4;
     
    9498
    9599        OPTIONS
    96         relativeAccuracy = 1e-7;
     100        RelativeAccuracy = 1e-7;
    97101       
    98102end
Note: See TracChangeset for help on using the changeset viewer.