Changeset 133 for branches/newlanguage


Ignore:
Timestamp:
Jan 25, 2007, 12:15:43 PM (17 years ago)
Author:
gerson bicca
Message:

some modifications for the new language

Location:
branches/newlanguage
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • branches/newlanguage/eml/heat_exchangers/heater.mso

    r78 r133  
    3636#+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++#   
    3737PARAMETERS
    38         ext PP          as CalcObject(Brief="Physical Properties");
    39         ext     NComp   as Integer       (Brief="Number of Components");       
    40                 Ninlet  as Integer       (Brief="Number of Inlet Streams",Lower=1);
     38        outer PP                as Plugin               (Brief="Physical Properties");
     39        outer   NComp   as Integer              (Brief="Number of Components");
     40        Ninlet                          as Integer              (Brief="Number of Inlet Streams",Lower=1);
    4141       
    4242VARIABLES
    43         in  Inlet(Ninlet)       as stream;              #(Brief="Inlet Streams")
    44         out Outlet              as stream_therm;#(Brief="Outlet Stream")
    45         Q                               as power                (Brief = "Heat Transfer");
    46         Vfrac                           as fraction     (Brief = "Vapor fraction Outlet Stream");
    47         Lfrac                           as fraction     (Brief = "Liquid fraction Outlet Stream");
     43        in  Inlet(Ninlet)       as stream                       (Brief="Inlet Streams");
     44        out Outlet              as liquid_stream        (Brief="Outlet Stream");
     45        Q                                       as power                        (Brief = "Heat Transfer");
     46        Vfrac                                   as fraction                     (Brief = "Vapor fraction Outlet Stream");
     47        Lfrac                                   as fraction                     (Brief = "Liquid fraction Outlet Stream");
    4848       
    4949EQUATIONS
    … …  
    5959end
    6060
    61 "Outlet Vapourisation Fraction"
    62         Outlet.v = PP.VapourFraction(Outlet.T,Outlet.P,Outlet.z);
     61#"Outlet Vapourisation Fraction"
     62        #Outlet.v = PP.VapourFraction(Outlet.T,Outlet.P,Outlet.z);
    6363
    64 "Vapor fraction Outlet Stream"
    65         Vfrac = Outlet.v;
     64#"Vapor fraction Outlet Stream"
     65#       Vfrac = Outlet.v;
    6666
    6767"Liquid fraction Outlet Stream"

  • branches/newlanguage/sample/heat_exchangers/heater_project.mso

    r89 r133  
    2828FlowSheet Heater_Project
    2929
     30PARAMETERS
     31
     32        PP                      as Plugin (File="vrpp");
     33        NComp           as Integer;
     34       
    3035DEVICES
    3136
    3237        heater                  as Heater;
    33         streamcold1     as stream_therm;
     38        streamcold1     as source;
    3439       
    3540       
    3641CONNECTIONS
    3742
    38         streamcold1     to heater.Inlet(1);
    39        
    40        
    41 PARAMETERS
    42 
    43         PP                      as CalcObject (File="vrpp");
    44         NComp           as Integer;
     43        streamcold1.Outlet      to heater.Inlet(1);
    4544       
    4645SET
    4746
    48         PP.LiquidModel  = "RK";
    49         PP.VapourModel  = "RK";
     47        PP.LiquidModel  = "PR";
     48        PP.VapourModel  = "PR";
    5049       
    5150        PP.Components   = ["water"];
    … …  
    5554SPECIFY
    5655
    57         streamcold1.F           = 100   * "kmol/h";
    58         streamcold1.P           = 1     * "atm";
    59         streamcold1.T           = 343   * "K";
    60         streamcold1.v           = 0;
    61     streamcold1.z               = [1];
     56        streamcold1.Outlet.F            = 100   * "kmol/h";
     57        streamcold1.Outlet.P            = 1     * "atm";
     58        streamcold1.Outlet.T            = 343   * "K";
     59    streamcold1.Outlet.z                = [1];
    6260
    6361       
    … …  
    6967OPTIONS
    7068 
    71         mode                    = "steady";
     69        Dynamic    = false;
    7270       
    7371end
    … …  
    7573FlowSheet Cooler_Project
    7674
     75PARAMETERS
     76
     77        PP                      as Plugin(File="vrpp");
     78        NComp           as Integer;
     79       
    7780DEVICES
    7881
    7982        cooler                  as Cooler;
    80         streamcold1     as stream_therm;
     83        streamcold1     as source;
    8184       
    8285       
    8386CONNECTIONS
    8487
    85         streamcold1     to cooler.Inlet(1);
     88        streamcold1.Outlet      to cooler.Inlet(1);
    8689       
    87        
    88 PARAMETERS
    89 
    90         PP                      as CalcObject (File="vrpp");
    91         NComp   as Integer;
    9290       
    9391SET
    … …  
    10199SPECIFY
    102100
    103         streamcold1.F           = 100   * "kmol/h";
    104         streamcold1.P           = 1     * "atm";
    105         streamcold1.T           = 343   * "K";
    106         streamcold1.v           = 0;
    107     streamcold1.z               = [1];
     101        streamcold1.Outlet.F            = 100   * "kmol/h";
     102        streamcold1.Outlet.P            = 1     * "atm";
     103        streamcold1.Outlet.T            = 343   * "K";
     104    streamcold1.Outlet.z                = [1];
    108105
    109106       
    … …  
    115112OPTIONS
    116113 
    117         mode    = "steady";
     114        Dynamic = false;
    118115       
    119116       
Note: See TracChangeset for help on using the changeset viewer.