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

updated sepComp model and samples of mixers/splitter

Location:
branches/newlanguage/sample/mixers_splitters
Files:
2 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

  • branches/newlanguage/sample/mixers_splitters/sample_splitter.mso

    r80 r175  
    2828FlowSheet TestSplitter
    2929        PARAMETERS
    30         PP      as CalcObject(Brief="Physical Properties",File="vrpp");
     30        PP      as Plugin (Brief="Physical Properties",File="vrpp");
    3131        NComp   as Integer;
    3232        NOutlet as Integer;
    3333       
    3434        DEVICES
    35         stream as stream_therm;
    36         splitter as splitter_n;
     35        Stream as source;
     36        Splitter as splitter_n;
    3737       
    3838        CONNECTIONS
    39         stream to splitter.Inlet;
     39        Stream.Outlet to Splitter.Inlet;
    4040       
    4141        SET
    … …  
    4444        PP.VapourModel = "PR";
    4545        NComp = PP.NumberOfComponents;
    46         splitter.NOutlet = 3;
     46        Splitter.NOutlet = 3;
    4747
    4848        SPECIFY
    49         stream.F = 153 * "kmol/h";
    50         stream.P = 150 * "kPa";
    51         stream.T = 298.6 * "K";
    52         stream.z = [0.6, 0.4];
    53         stream.v = 0;
    54         splitter.frac(1) = 0.4;
    55         splitter.frac(2) = 0.1;
     49        Stream.Outlet.F = 153 * 'kmol/h';
     50        Stream.Outlet.P = 150 * 'kPa';
     51        Stream.Outlet.T = 298.6 * 'K';
     52        Stream.Outlet.z = [0.6, 0.4];
     53       
     54        Splitter.frac(1) = 0.4;
     55        Splitter.frac(2) = 0.1;
    5656
    5757        OPTIONS
    58         relativeAccuracy = 1e-7;
     58        RelativeAccuracy = 1e-7;
    5959       
    6060end
Note: See TracChangeset for help on using the changeset viewer.