Changeset 156


Ignore:
Timestamp:
Feb 7, 2007, 11:40:14 AM (15 years ago)
Author:
gerson bicca
Message:

updated double pipe model

Location:
branches/newlanguage
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • branches/newlanguage/eml/heat_exchangers/DoublePipe.mso

    r150 r156  
    968968CONNECTIONS
    969969
    970 Unity([1:Npipe-1]).Outlet.Hot   to Unity([2:Npipe]).Inlet.Hot;
    971 Unity([2:Npipe]).Outlet.Cold    to Unity([1:Npipe-1]).Inlet.Cold;
     970Unity([1:Npipe-1]).Outlet.Hot  to Unity([2:Npipe]).Inlet.Hot;
     971Unity([2:Npipe]).Outlet.Cold     to Unity([1:Npipe-1]).Inlet.Cold;
    972972
    973973EQUATIONS
  • branches/newlanguage/eml/heat_exchangers/HEX_Engine.mso

    r150 r156  
    293293VARIABLES
    294294
    295 Rtube   as positive     (Brief="Tube Resistance",Unit="m^2*K/kW",Lower=1e-6);
    296 Rwall           as positive     (Brief="Wall Resistance",Unit="m^2*K/kW",Lower=1e-6);
    297 Rshell          as positive     (Brief="Shell Resistance",Unit="m^2*K/kW",Lower=1e-6);
    298 Rfi                     as positive     (Brief="Inside Fouling Resistance",Unit="m^2*K/kW",Default=1e-6,Lower=0);
    299 Rfo             as positive     (Brief="Outside Fouling Resistance",Unit="m^2*K/kW",Default=1e-6,Lower=0);
     295Rtube   as positive     (Brief="Tube Resistance",Unit='m^2*K/kW',Lower=1e-6);
     296Rwall           as positive     (Brief="Wall Resistance",Unit='m^2*K/kW',Lower=1e-6);
     297Rshell          as positive     (Brief="Shell Resistance",Unit='m^2*K/kW',Lower=1e-6);
     298Rfi                     as positive     (Brief="Inside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
     299Rfo             as positive     (Brief="Outside Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0);
    300300
    301301end
     
    314314Uc      as heat_trans_coeff (Brief="Overall Heat Transfer Coefficient Clean",Default=1,Lower=1e-6,Upper=1e10);
    315315Ud      as heat_trans_coeff (Brief="Overall Heat Transfer Coefficient Dirty",Default=1,Lower=1e-6,Upper=1e10);
    316 Ch      as positive                             (Brief="Hot Stream Heat Capacity",Lower=1e-3,Default=1e3,Unit="W/K");
    317 Cc      as positive                             (Brief="Cold Stream Heat Capacity",Lower=1e-3,Default=1e3,Unit="W/K");
     316Ch      as positive                             (Brief="Hot Stream Heat Capacity",Lower=1e-3,Default=1e3,Unit='W/K');
     317Cc      as positive                             (Brief="Cold Stream Heat Capacity",Lower=1e-3,Default=1e3,Unit='W/K');
    318318Cr      as positive                             (Brief="Heat Capacity Ratio",Default=0.5,Lower=1e-6);
    319 Cmin  as positive                               (Brief="Minimum Heat Capacity",Lower=1e-10,Default=1e3,Unit="W/K");
    320 Cmax as positive                                (Brief="Maximum Heat Capacity",Lower=1e-10,Default=1e3,Unit="W/K");
     319Cmin  as positive                               (Brief="Minimum Heat Capacity",Lower=1e-10,Default=1e3,Unit='W/K');
     320Cmax as positive                                (Brief="Maximum Heat Capacity",Lower=1e-10,Default=1e3,Unit='W/K');
    321321NTU     as positive                             (Brief="Number of Units Transference",Default=0.05,Lower=1e-10);
    322322
  • branches/newlanguage/sample/heat_exchangers/Sample_DoublePipe.mso

    r151 r156  
    6767
    6868exchanger.HotSide               =       "inner";
    69 exchanger.DoInner               =       0.04826*"m";
    70 exchanger.DiInner               =       0.04089*"m";
    71 exchanger.DiOuter               =       0.07793*"m";
    72 exchanger.Kwall                 =       0.057 *"kW/m/K";
    73 exchanger.Lpipe                 =       3*"m";
     69exchanger.DoInner               =       0.04826*'m';
     70exchanger.DiInner               =       0.04089*'m';
     71exchanger.DiOuter               =       0.07793*'m';
     72exchanger.Kwall                 =       0.057 *'kW/m/K';
     73exchanger.Lpipe                 =       3*'m';
    7474
    7575SPECIFY
     
    7777#               Hot Stream
    7878#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    79         streamhot.F = 10                        * "kmol/h";
    80         streamhot.T = (68+273.15)   * "K";
    81         streamhot.P = 5.4                       * "bar";
     79        streamhot.F = 10                        * 'kmol/h';
     80        streamhot.T = (68+273.15)   * 'K';
     81        streamhot.P = 5.4                       * 'bar';
    8282        streamhot.z = [1,0];
    8383       
     
    8585#       Cold Stream
    8686#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    87         streamcold.F = 5                        * "kmol/h";
    88         streamcold.P = 5.1              * "bar";
    89         streamcold.T = (23+273.15)      * "K";
     87        streamcold.F = 5                        * 'kmol/h';
     88        streamcold.P = 5.1              * 'bar';
     89        streamcold.T = (23+273.15)      * 'K';
    9090    streamcold.z = [0,1];
    9191#=====================================================================
    9292#       Fouling
    9393#=====================================================================
    94 exchanger.Resistances.Rfi = 0.0018*"m^2*K/kW";
    95 exchanger.Resistances.Rfo = 0.0021*"m^2*K/kW";
     94exchanger.Resistances.Rfi = 0.0018*'m^2*K/kW';
     95exchanger.Resistances.Rfo = 0.0021*'m^2*K/kW';
    9696
    9797OPTIONS
Note: See TracChangeset for help on using the changeset viewer.