Ignore:
Timestamp:
Mar 31, 2008, 4:53:49 PM (15 years ago)
Author:
gerson bicca
Message:

fixed heater/cooler model

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/sample/heat_exchangers/Sample_Heater.mso

    r358 r489  
    3030DEVICES
    3131
    32         Heater          as heater;
    33         streamcold      as simple_source;
    34         Heat            as energy_source;
     32        Heater                  as heater;
     33        IN_1                    as source;
     34        IN_2                    as source;
     35        IN_3                    as source;
     36        Heat                    as energy_source;
     37        Sink_Stream     as sink;
    3538       
    3639CONNECTIONS
    3740
    38         streamcold.Outlet       to Heater.Inlet(1);
     41        IN_1.Outlet                     to Heater.Inlet(1);
     42        IN_2.Outlet                     to Heater.Inlet(2);
     43        IN_3.Outlet                     to Heater.Inlet(3);
    3944        Heat.OutletQ            to Heater.InletQ;
    40 
     45        Heater.Outlet        to Sink_Stream.Inlet;
    4146       
    4247PARAMETERS
    4348
    4449        PP                      as Plugin (Type ="PP", LiquidModel = "PR",VapourModel  = "PR",
    45                                                         Components      = ["isobutane","benzene"]);
     50                                                        Components      = ["nitrogen","methane","ethane","propane","n-hexane","n-octane"]);
    4651        NComp           as Integer;
    4752       
     
    4954
    5055        NComp           = PP.NumberOfComponents;
    51         Heater.Ninlet           = 1;
     56        Heater.Ninlet           = 3;
    5257
    5358SPECIFY
    5459
    55         streamcold.Outlet.F             = 10   * 'kmol/h';
    56         streamcold.Outlet.P             = 1     * 'atm';
    57         streamcold.Outlet.T             = 310   * 'K';
    58     streamcold.Outlet.z                 = [0.5,0.5];
     60        IN_1.Fw                                 = 10   * 'kg/s';
     61        IN_1.Outlet.P           = 5     * 'atm';
     62        IN_1.Outlet.T           = (30+273)   * 'K';
     63    IN_1.Outlet.z               = [0.007,0.75,0.243,0,0,0];
     64       
     65        IN_2.Fw                                 = 12   * 'kg/s';
     66        IN_2.Outlet.P           = 5     * 'atm';
     67        IN_2.Outlet.T           = (33+273)   * 'K';
     68    IN_2.Outlet.z               = [0.003,0.66,0.33,0.005,0.001,0.001];
     69       
     70        IN_3.Fw                                 = 12   * 'kg/s';
     71        IN_3.Outlet.P           = 2     * 'atm';
     72        IN_3.Outlet.T           = (33+273)   * 'K';
     73    IN_3.Outlet.z               = [0,0.7,0.30,0,0,0];
    5974
    60         #Heater.Outlet.T                = 360*'K';
    61         Heater.Outlet.P                 = 0.999* 'atm';
    62         Heat.OutletQ.Q                  = 51* 'kW';
     75        #Heater.Outlet.T                = (66+273)*'K';
     76        Heater.Outlet.P                 = 5* 'atm';
     77        Heater.Outlet.v                 = 0.8;
     78        #Heat.OutletQ.Q                 = 2500* 'kW';
    6379
    6480OPTIONS
    6581        Dynamic = false;
     82       
    6683end
    6784
     
    7087DEVICES
    7188
    72         Cooler          as cooler;
    73         streamhot       as simple_source;
    74         Heat            as energy_source;
     89        Cooler                  as cooler;
     90        IN_1                    as source;
     91        IN_2                    as source;
     92        IN_3                    as source;
     93        Heat                    as energy_source;
     94        Sink_Stream     as sink;
    7595       
    7696CONNECTIONS
    7797
    78         streamhot.Outlet        to Cooler.Inlet(1);
     98        IN_1.Outlet                     to Cooler.Inlet(1);
     99        IN_2.Outlet                     to Cooler.Inlet(2);
     100        IN_3.Outlet                     to Cooler.Inlet(3);
    79101        Heat.OutletQ            to Cooler.InletQ;
    80        
     102        Cooler.Outlet        to Sink_Stream.Inlet;
    81103       
    82104PARAMETERS
    83105
    84106        PP                      as Plugin (Type ="PP", LiquidModel = "PR",VapourModel  = "PR",
    85                                                         Components      = ["isobutane","benzene"]);
     107                                                        Components      = ["nitrogen","methane","ethane","propane","n-hexane","n-octane"]);
    86108        NComp           as Integer;
    87109       
     
    89111
    90112        NComp           = PP.NumberOfComponents;
    91         Cooler.Ninlet           = 1;
     113        Cooler.Ninlet           = 3;
    92114
    93115SPECIFY
    94116
    95         streamhot.Outlet.F              = 10   * 'kmol/h';
    96         streamhot.Outlet.P              = 1     * 'atm';
    97         streamhot.Outlet.T              = 310   * 'K';
    98     streamhot.Outlet.z                  = [0.5,0.5];
     117        IN_1.Fw                                 = 10   * 'kg/s';
     118        IN_1.Outlet.P           = 5     * 'atm';
     119        IN_1.Outlet.T           = (30+273)   * 'K';
     120    IN_1.Outlet.z               = [0.007,0.75,0.243,0,0,0];
     121       
     122        IN_2.Fw                                 = 12   * 'kg/s';
     123        IN_2.Outlet.P           = 5     * 'atm';
     124        IN_2.Outlet.T           = (33+273)   * 'K';
     125    IN_2.Outlet.z               = [0.003,0.66,0.33,0.005,0.001,0.001];
     126       
     127        IN_3.Fw                                 = 12   * 'kg/s';
     128        IN_3.Outlet.P           = 2     * 'atm';
     129        IN_3.Outlet.T           = (33+273)   * 'K';
     130    IN_3.Outlet.z               = [0,0.7,0.30,0,0,0];
    99131
    100 #       Cooler.Outlet.T                 = 300*'K';
    101         Cooler.Outlet.P                 = 0.999* 'atm';
    102         Heat.OutletQ.Q                  = 10* 'kW';
     132        #Cooler.Outlet.T                = (66+273)*'K';
     133        Cooler.Outlet.P                 = 5* 'atm';
     134        Cooler.Outlet.v                 = 0.8;
     135        #Cooler.OutletQ.Q               = 2500* 'kW';
    103136
    104137OPTIONS
    105138        Dynamic = false;
     139       
    106140end
     141
Note: See TracChangeset for help on using the changeset viewer.