Changeset 420 for trunk/eml


Ignore:
Timestamp:
Nov 26, 2007, 8:43:17 PM (15 years ago)
Author:
gerson bicca
Message:

REMOVED SOME VARIABLES

Location:
trunk/eml/heat_exchangers
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • trunk/eml/heat_exchangers/DoublePipe.mso

    r408 r420  
    126126        Inner.Properties.Average.Cp             =       PP.LiquidCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    127127
    128 "Inlet Heat Capacity Inner Stream"
    129         Inner.Properties.Inlet.Cp                       =       PP.LiquidCp(InletInner.T,InletInner.P,InletInner.z);
    130 
    131 "Outlet Heat Capacity Inner Stream"
    132         Inner.Properties.Outlet.Cp              =       PP.LiquidCp(OutletInner.T,OutletInner.P,OutletInner.z);
    133 
    134128"Average Mass Density Inner Stream"
    135129        Inner.Properties.Average.rho    =       PP.LiquidDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
     
    144138        Inner.Properties.Average.Mu     =       PP.LiquidViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    145139
    146 "Inlet  Viscosity Inner Stream"
    147         Inner.Properties.Inlet.Mu               =       PP.LiquidViscosity(InletInner.T,InletInner.P,InletInner.z);
    148 
    149 "Outlet Viscosity Inner Stream"
    150         Inner.Properties.Outlet.Mu      =       PP.LiquidViscosity(OutletInner.T,OutletInner.P,OutletInner.z);
    151 
    152140"Average        Conductivity Inner Stream"
    153141        Inner.Properties.Average.K              =       PP.LiquidThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    154142
    155 "Inlet  Conductivity Inner Stream"
    156         Inner.Properties.Inlet.K                =       PP.LiquidThermalConductivity(InletInner.T,InletInner.P,InletInner.z);
    157 
    158 "Outlet Conductivity Inner Stream"
    159         Inner.Properties.Outlet.K               =       PP.LiquidThermalConductivity(OutletInner.T,OutletInner.P,OutletInner.z);
    160 
    161143"Viscosity Inner Stream at wall temperature"
    162144        Inner.Properties.Wall.Mu                =       PP.LiquidViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z);
     
    167149        Inner.Properties.Average.Cp     =       PP.VapourCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    168150
    169 "Inlet Heat Capacity Inner Stream"
    170         Inner.Properties.Inlet.Cp               =       PP.VapourCp(InletInner.T,InletInner.P,InletInner.z);
    171 
    172 "Outlet Heat Capacity Inner Stream"
    173         Inner.Properties.Outlet.Cp      =       PP.VapourCp(OutletInner.T,OutletInner.P,OutletInner.z);
    174 
    175151"Average Mass Density Inner Stream"
    176152        Inner.Properties.Average.rho    =       PP.VapourDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
     
    185161        Inner.Properties.Average.Mu     =       PP.VapourViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    186162
    187 "Inlet Viscosity Inner Stream"
    188         Inner.Properties.Inlet.Mu               =       PP.VapourViscosity(InletInner.T,InletInner.P,InletInner.z);
    189 
    190 "Outlet Viscosity Inner Stream"
    191         Inner.Properties.Outlet.Mu      =       PP.VapourViscosity(OutletInner.T,OutletInner.P,OutletInner.z);
    192 
    193163"Average Conductivity Inner Stream"
    194164        Inner.Properties.Average.K              =       PP.VapourThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    195165
    196 "Inlet Conductivity Inner Stream"
    197         Inner.Properties.Inlet.K                =       PP.VapourThermalConductivity(InletInner.T,InletInner.P,InletInner.z);
    198 
    199 "Outlet Conductivity Inner Stream"
    200         Inner.Properties.Outlet.K               =       PP.VapourThermalConductivity(OutletInner.T,OutletInner.P,OutletInner.z);
    201        
    202166"Viscosity Inner Stream at wall temperature"
    203167        Inner.Properties.Wall.Mu                =       PP.VapourViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z);
     
    212176        Outer.Properties.Average.Cp     =               PP.LiquidCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    213177
    214 "Inlet Heat Capacity Outer Stream"
    215         Outer.Properties.Inlet.Cp               =               PP.LiquidCp(InletOuter.T,InletOuter.P,InletOuter.z);
    216 
    217 "Outlet Heat Capacity Outer Stream"
    218         Outer.Properties.Outlet.Cp      =               PP.LiquidCp(OutletOuter.T,OutletOuter.P,OutletOuter.z);
    219 
    220178"Average Mass Density Outer Stream"
    221179        Outer.Properties.Average.rho =          PP.LiquidDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
     
    230188        Outer.Properties.Average.Mu     =               PP.LiquidViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    231189
    232 "Inlet Viscosity Outer Stream"
    233         Outer.Properties.Inlet.Mu       =               PP.LiquidViscosity(InletOuter.T,InletOuter.P,InletOuter.z);     
    234 
    235 "Outlet Viscosity Outer Stream"
    236         Outer.Properties.Outlet.Mu      =               PP.LiquidViscosity(OutletOuter.T,OutletOuter.P,OutletOuter.z); 
    237 
    238190"Average Conductivity Outer Stream"
    239191        Outer.Properties.Average.K      =               PP.LiquidThermalConductivity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);       
    240192
    241 "Inlet Conductivity Outer Stream"
    242         Outer.Properties.Inlet.K                =               PP.LiquidThermalConductivity(InletOuter.T,InletOuter.P,InletOuter.z);   
    243 
    244 "Outlet Conductivity Outer Stream"
    245         Outer.Properties.Outlet.K       =               PP.LiquidThermalConductivity(OutletOuter.T,OutletOuter.P,OutletOuter.z);       
    246 
    247193"Viscosity Outer Stream at wall temperature"
    248194        Outer.Properties.Wall.Mu                =               PP.LiquidViscosity(Outer.Properties.Wall.Twall,Outer.Properties.Average.P,InletOuter.z);       
     
    254200        Outer.Properties.Average.Cp     =               PP.VapourCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    255201
    256 "Inlet Heat Capacity Outer Stream"
    257         Outer.Properties.Inlet.Cp               =               PP.VapourCp(InletOuter.T,InletOuter.P,InletOuter.z);
    258 
    259 "Outlet Heat Capacity Outer Stream"
    260         Outer.Properties.Outlet.Cp      =               PP.VapourCp(OutletOuter.T,OutletOuter.P,OutletOuter.z);
    261 
    262202"Average Mass Density Outer Stream"
    263203        Outer.Properties.Average.rho =          PP.VapourDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
     
    272212        Outer.Properties.Average.Mu     =               PP.VapourViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    273213
    274 "Inlet Viscosity Outer Stream"
    275         Outer.Properties.Inlet.Mu       =               PP.VapourViscosity(InletOuter.T,InletOuter.P,InletOuter.z);
    276 
    277 "Outlet Viscosity Outer Stream"
    278         Outer.Properties.Outlet.Mu      =               PP.VapourViscosity(OutletOuter.T,OutletOuter.P,OutletOuter.z);
    279 
    280214"Average Conductivity Outer Stream"
    281215        Outer.Properties.Average.K      =               PP.VapourThermalConductivity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);       
    282 
    283 "Inlet Conductivity Outer Stream"
    284         Outer.Properties.Inlet.K                =               PP.VapourThermalConductivity(InletOuter.T,InletOuter.P,InletOuter.z);   
    285 
    286 "Outlet Conductivity Outer Stream"
    287         Outer.Properties.Outlet.K       =               PP.VapourThermalConductivity(OutletOuter.T,OutletOuter.P,OutletOuter.z);       
    288216
    289217"Viscosity Outer Stream at wall temperature"
     
    900828        Inner.Properties.Average.Cp             =       PP.LiquidCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    901829
    902 "Inlet Heat Capacity Inner Stream"
    903         Inner.Properties.Inlet.Cp                       =       PP.LiquidCp(InletInner.T,InletInner.P,InletInner.z);
    904 
    905 "Outlet Heat Capacity Inner Stream"
    906         Inner.Properties.Outlet.Cp              =       PP.LiquidCp(OutletInner.T,OutletInner.P,OutletInner.z);
    907 
    908830"Average Mass Density Inner Stream"
    909831        Inner.Properties.Average.rho    =       PP.LiquidDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
     
    918840        Inner.Properties.Average.Mu     =       PP.LiquidViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    919841
    920 "Inlet  Viscosity Inner Stream"
    921         Inner.Properties.Inlet.Mu               =       PP.LiquidViscosity(InletInner.T,InletInner.P,InletInner.z);
    922 
    923 "Outlet Viscosity Inner Stream"
    924         Inner.Properties.Outlet.Mu      =       PP.LiquidViscosity(OutletInner.T,OutletInner.P,OutletInner.z);
    925 
    926842"Average        Conductivity Inner Stream"
    927843        Inner.Properties.Average.K              =       PP.LiquidThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    928844
    929 "Inlet  Conductivity Inner Stream"
    930         Inner.Properties.Inlet.K                =       PP.LiquidThermalConductivity(InletInner.T,InletInner.P,InletInner.z);
    931 
    932 "Outlet Conductivity Inner Stream"
    933         Inner.Properties.Outlet.K               =       PP.LiquidThermalConductivity(OutletInner.T,OutletInner.P,OutletInner.z);
    934 
    935845"Viscosity Inner Stream at wall temperature"
    936846        Inner.Properties.Wall.Mu                =       PP.LiquidViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z);
     
    941851        Inner.Properties.Average.Cp     =       PP.VapourCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    942852
    943 "Inlet Heat Capacity Inner Stream"
    944         Inner.Properties.Inlet.Cp               =       PP.VapourCp(InletInner.T,InletInner.P,InletInner.z);
    945 
    946 "Outlet Heat Capacity Inner Stream"
    947         Inner.Properties.Outlet.Cp      =       PP.VapourCp(OutletInner.T,OutletInner.P,OutletInner.z);
    948 
    949853"Average Mass Density Inner Stream"
    950854        Inner.Properties.Average.rho    =       PP.VapourDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
     
    959863        Inner.Properties.Average.Mu     =       PP.VapourViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    960864
    961 "Inlet Viscosity Inner Stream"
    962         Inner.Properties.Inlet.Mu               =       PP.VapourViscosity(InletInner.T,InletInner.P,InletInner.z);
    963 
    964 "Outlet Viscosity Inner Stream"
    965         Inner.Properties.Outlet.Mu      =       PP.VapourViscosity(OutletInner.T,OutletInner.P,OutletInner.z);
    966 
    967865"Average Conductivity Inner Stream"
    968866        Inner.Properties.Average.K              =       PP.VapourThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z);
    969867
    970 "Inlet Conductivity Inner Stream"
    971         Inner.Properties.Inlet.K                =       PP.VapourThermalConductivity(InletInner.T,InletInner.P,InletInner.z);
    972 
    973 "Outlet Conductivity Inner Stream"
    974         Inner.Properties.Outlet.K               =       PP.VapourThermalConductivity(OutletInner.T,OutletInner.P,OutletInner.z);
    975        
    976868"Viscosity Inner Stream at wall temperature"
    977869        Inner.Properties.Wall.Mu                =       PP.VapourViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z);
     
    986878        Outer.Properties.Average.Cp     =               PP.LiquidCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    987879
    988 "Inlet Heat Capacity Outer Stream"
    989         Outer.Properties.Inlet.Cp               =               PP.LiquidCp(InletOuter.T,InletOuter.P,InletOuter.z);
    990 
    991 "Outlet Heat Capacity Outer Stream"
    992         Outer.Properties.Outlet.Cp      =               PP.LiquidCp(OutletOuter.T,OutletOuter.P,OutletOuter.z);
    993 
    994880"Average Mass Density Outer Stream"
    995881        Outer.Properties.Average.rho =          PP.LiquidDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
     
    1004890        Outer.Properties.Average.Mu     =               PP.LiquidViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    1005891
    1006 "Inlet Viscosity Outer Stream"
    1007         Outer.Properties.Inlet.Mu       =               PP.LiquidViscosity(InletOuter.T,InletOuter.P,InletOuter.z);     
    1008 
    1009 "Outlet Viscosity Outer Stream"
    1010         Outer.Properties.Outlet.Mu      =               PP.LiquidViscosity(OutletOuter.T,OutletOuter.P,OutletOuter.z); 
    1011 
    1012892"Average Conductivity Outer Stream"
    1013893        Outer.Properties.Average.K      =               PP.LiquidThermalConductivity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);       
    1014894
    1015 "Inlet Conductivity Outer Stream"
    1016         Outer.Properties.Inlet.K                =               PP.LiquidThermalConductivity(InletOuter.T,InletOuter.P,InletOuter.z);   
    1017 
    1018 "Outlet Conductivity Outer Stream"
    1019         Outer.Properties.Outlet.K       =               PP.LiquidThermalConductivity(OutletOuter.T,OutletOuter.P,OutletOuter.z);       
    1020 
    1021895"Viscosity Outer Stream at wall temperature"
    1022896        Outer.Properties.Wall.Mu                =               PP.LiquidViscosity(Outer.Properties.Wall.Twall,Outer.Properties.Average.P,InletOuter.z);       
     
    1028902        Outer.Properties.Average.Cp     =               PP.VapourCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    1029903
    1030 "Inlet Heat Capacity Outer Stream"
    1031         Outer.Properties.Inlet.Cp               =               PP.VapourCp(InletOuter.T,InletOuter.P,InletOuter.z);
    1032 
    1033 "Outlet Heat Capacity Outer Stream"
    1034         Outer.Properties.Outlet.Cp      =               PP.VapourCp(OutletOuter.T,OutletOuter.P,OutletOuter.z);
    1035 
    1036904"Average Mass Density Outer Stream"
    1037905        Outer.Properties.Average.rho =          PP.VapourDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
     
    1046914        Outer.Properties.Average.Mu     =               PP.VapourViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);
    1047915
    1048 "Inlet Viscosity Outer Stream"
    1049         Outer.Properties.Inlet.Mu       =               PP.VapourViscosity(InletOuter.T,InletOuter.P,InletOuter.z);
    1050 
    1051 "Outlet Viscosity Outer Stream"
    1052         Outer.Properties.Outlet.Mu      =               PP.VapourViscosity(OutletOuter.T,OutletOuter.P,OutletOuter.z);
    1053 
    1054916"Average Conductivity Outer Stream"
    1055917        Outer.Properties.Average.K      =               PP.VapourThermalConductivity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z);       
    1056 
    1057 "Inlet Conductivity Outer Stream"
    1058         Outer.Properties.Inlet.K                =               PP.VapourThermalConductivity(InletOuter.T,InletOuter.P,InletOuter.z);   
    1059 
    1060 "Outlet Conductivity Outer Stream"
    1061         Outer.Properties.Outlet.K       =               PP.VapourThermalConductivity(OutletOuter.T,OutletOuter.P,OutletOuter.z);       
    1062918
    1063919"Viscosity Outer Stream at wall temperature"
  • trunk/eml/heat_exchangers/HEX_Engine.mso

    r404 r420  
    4949Fw              as flow_mass            (Brief="Stream Mass Flow");
    5050rho             as dens_mass            (Brief="Stream Density" ,Default=1000, Lower=1e-3, Upper=5e5, Symbol = "\rho");
    51 Mu              as viscosity            (Brief="Stream Viscosity",Default=1, Lower=1e-5, Upper=1e5, Symbol = "\mu");
    52 Cp                      as cp_mol                       (Brief="Stream Molar Heat Capacity", Upper=1e10);
    53 K                       as conductivity         (Brief="Stream Thermal Conductivity", Default=1.0, Lower=1e-5, Upper=500);
    54 
    5551end
    5652
  • trunk/eml/heat_exchangers/HeatExchangerDetailed.mso

    r382 r420  
    205205        Tubes.Properties.Average.Cp     =       PP.LiquidCp(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
    206206
    207 "Tube Stream Inlet Heat Capacity"
    208         Tubes.Properties.Inlet.Cp       =       PP.LiquidCp(OutletTube.T,OutletTube.P,OutletTube.z);
    209 
    210 "Tube Stream Outlet Heat Capacity"
    211         Tubes.Properties.Outlet.Cp      =       PP.LiquidCp(OutletTube.T,OutletTube.P,OutletTube.z);
    212 
    213207"Tube Stream Average Mass Density"
    214208        Tubes.Properties.Average.rho =  PP.LiquidDensity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
     
    223217        Tubes.Properties.Average.Mu     =       PP.LiquidViscosity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
    224218
    225 "Tube Stream inlet Viscosity"
    226         Tubes.Properties.Inlet.Mu       =       PP.LiquidViscosity(OutletTube.T,OutletTube.P,OutletTube.z);
    227        
    228 "Tube Stream Outlet Viscosity"
    229         Tubes.Properties.Outlet.Mu      =       PP.LiquidViscosity(OutletTube.T,OutletTube.P,OutletTube.z);
    230 
    231219"Tube Stream Average Conductivity"
    232220        Tubes.Properties.Average.K      =       PP.LiquidThermalConductivity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
    233221
    234 "Tube Stream Inlet Conductivity"       
    235         Tubes.Properties.Inlet.K        =       PP.LiquidThermalConductivity(OutletTube.T,OutletTube.P,OutletTube.z);
    236 
    237 "Tube Stream Outlet Conductivity"
    238         Tubes.Properties.Outlet.K       =       PP.LiquidThermalConductivity(OutletTube.T,OutletTube.P,OutletTube.z);
    239 
    240222"Tube Stream Viscosity at Wall Temperature"
    241223        Tubes.Properties.Wall.Mu        =       PP.LiquidViscosity(Tubes.Properties.Wall.Twall,Tubes.Properties.Average.P,OutletTube.z);
     
    246228        Tubes.Properties.Average.Cp     =       PP.VapourCp(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
    247229
    248 "Tube Stream Inlet Heat Capacity"       
    249         Tubes.Properties.Inlet.Cp       =       PP.VapourCp(OutletTube.T,OutletTube.P,OutletTube.z);
    250 
    251 "Tube Stream Outlet Heat Capacity"     
    252         Tubes.Properties.Outlet.Cp      =       PP.VapourCp(OutletTube.T,OutletTube.P,OutletTube.z);
    253 
    254230"Tube Stream Average Mass Density"
    255231        Tubes.Properties.Average.rho =  PP.VapourDensity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
     
    264240        Tubes.Properties.Average.Mu     =       PP.VapourViscosity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
    265241
    266 "Tube Stream Inlet Viscosity " 
    267         Tubes.Properties.Inlet.Mu       =       PP.VapourViscosity(OutletTube.T,OutletTube.P,OutletTube.z);
    268 
    269 "Tube Stream Outlet Viscosity "
    270         Tubes.Properties.Outlet.Mu      =       PP.VapourViscosity(OutletTube.T,OutletTube.P,OutletTube.z);
    271 
    272242"Tube Stream Average Conductivity "
    273243        Tubes.Properties.Average.K      =       PP.VapourThermalConductivity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z);
    274244
    275 "Tube Stream Inlet Conductivity "
    276         Tubes.Properties.Inlet.K        =       PP.VapourThermalConductivity(OutletTube.T,OutletTube.P,OutletTube.z);
    277 
    278 "Tube Stream Outlet Conductivity "
    279         Tubes.Properties.Outlet.K       =       PP.VapourThermalConductivity(OutletTube.T,OutletTube.P,OutletTube.z);
    280        
    281245"Tube Stream Viscosity at Wall Temperature"
    282246        Tubes.Properties.Wall.Mu        =       PP.VapourViscosity(Tubes.Properties.Wall.Twall,Tubes.Properties.Average.P,OutletTube.z);
     
    291255        Shell.Properties.Average.Cp     =               PP.LiquidCp(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);
    292256
    293 "Shell Stream Inlet Heat Capacity"
    294         Shell.Properties.Inlet.Cp       =               PP.LiquidCp(InletShell.T,InletShell.P,InletShell.z);
    295 
    296 "Shell Stream Outlet Heat Capacity"
    297         Shell.Properties.Outlet.Cp      =               PP.LiquidCp(OutletShell.T,OutletShell.P,OutletShell.z);
    298 
    299257"Shell Stream Average Mass Density"
    300258        Shell.Properties.Average.rho    =               PP.LiquidDensity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);
     
    309267        Shell.Properties.Average.Mu     =               PP.LiquidViscosity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);
    310268
    311 "Shell Stream Inlet Viscosity"
    312         Shell.Properties.Inlet.Mu       =               PP.LiquidViscosity(InletShell.T,InletShell.P,InletShell.z);     
    313 
    314 "Shell Stream Outlet Viscosity"
    315         Shell.Properties.Outlet.Mu      =               PP.LiquidViscosity(OutletShell.T,OutletShell.P,OutletShell.z); 
    316 
    317269"Shell Stream Average Conductivity"
    318270        Shell.Properties.Average.K      =               PP.LiquidThermalConductivity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);       
    319271
    320 "Shell Stream Inlet Conductivity"
    321         Shell.Properties.Inlet.K                =               PP.LiquidThermalConductivity(InletShell.T,InletShell.P,InletShell.z);   
    322 
    323 "Shell Stream Outlet Conductivity"
    324         Shell.Properties.Outlet.K       =               PP.LiquidThermalConductivity(OutletShell.T,OutletShell.P,OutletShell.z);       
    325 
    326272"ShellStream Viscosity  at Wall Temperature"
    327273        Shell.Properties.Wall.Mu                =               PP.LiquidViscosity(Shell.Properties.Wall.Twall,Shell.Properties.Average.P,InletShell.z);       
     
    333279        Shell.Properties.Average.Cp     =               PP.VapourCp(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);
    334280
    335 "Shell Stream Inlet Heat Capacity"
    336         Shell.Properties.Inlet.Cp       =               PP.VapourCp(InletShell.T,InletShell.P,InletShell.z);
    337 
    338 "Shell Stream Outlet Heat Capacity"
    339         Shell.Properties.Outlet.Cp      =               PP.VapourCp(OutletShell.T,OutletShell.P,OutletShell.z);
    340 
    341281"Shell Stream Average Mass Density"
    342282        Shell.Properties.Average.rho    =               PP.VapourDensity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);
     
    351291        Shell.Properties.Average.Mu     =               PP.VapourViscosity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);
    352292
    353 "Shell Stream Inlet Viscosity"
    354         Shell.Properties.Inlet.Mu       =               PP.VapourViscosity(InletShell.T,InletShell.P,InletShell.z);
    355 
    356 "Shell Stream Outlet Viscosity"
    357         Shell.Properties.Outlet.Mu      =               PP.VapourViscosity(OutletShell.T,OutletShell.P,OutletShell.z);
    358 
    359293"Shell Stream Average Conductivity"
    360294        Shell.Properties.Average.K      =               PP.VapourThermalConductivity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z);       
    361 
    362 "Shell Stream Inlet Conductivity"
    363         Shell.Properties.Inlet.K                =               PP.VapourThermalConductivity(InletShell.T,InletShell.P,InletShell.z);   
    364        
    365 "Shell Stream Outlet Conductivity"
    366         Shell.Properties.Outlet.K       =               PP.VapourThermalConductivity(OutletShell.T,OutletShell.P,OutletShell.z);       
    367295
    368296"Shell Stream Viscosity at Wall Temperature"
  • trunk/eml/heat_exchangers/HeatExchangerSimplified.mso

    r360 r420  
    9494                InletCold.v*PP.VapourCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc);
    9595
    96 "Cold Stream Inlet Heat Capacity"
    97         ColdSide.Properties.Inlet.Cp    =       (1-InletCold.v)*PP.LiquidCp(InletCold.T,InletCold.P,xc)+
    98                 InletCold.v*PP.VapourCp(InletCold.T,InletCold.P,yc);
    99 
    100 "Cold Stream Outlet Heat Capacity"
    101         ColdSide.Properties.Outlet.Cp   =       (1-OutletCold.v)*PP.LiquidCp(OutletCold.T,OutletCold.P,OutletCold.x)+
    102                 OutletCold.v*PP.VapourCp(OutletCold.T,OutletCold.P,OutletCold.y);
    103 
    10496"Cold Stream Average Mass Density"
    10597        ColdSide.Properties.Average.rho =       (1-InletCold.v)*PP.LiquidDensity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,xc)+
     
    118110                InletCold.v*PP.VapourViscosity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc);
    119111
    120 "Cold Stream inlet Viscosity"
    121         ColdSide.Properties.Inlet.Mu    =       (1-InletCold.v)*PP.LiquidViscosity(InletCold.T,InletCold.P,xc)+
    122                 InletCold.v*PP.VapourViscosity(InletCold.T,InletCold.P,yc);
    123 
    124 "Cold Stream Outlet Viscosity"
    125         ColdSide.Properties.Outlet.Mu   =       (1-OutletCold.v)*PP.LiquidViscosity(OutletCold.T,OutletCold.P,OutletCold.x)+
    126                 OutletCold.v*PP.VapourViscosity(OutletCold.T,OutletCold.P,OutletCold.y);
    127 
    128112"Cold Stream Average Conductivity"
    129113        ColdSide.Properties.Average.K   =       (1-InletCold.v)*PP.LiquidThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,xc)+
    130114                InletCold.v*PP.VapourThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc);
    131115
    132 "Cold Stream Inlet Conductivity"       
    133         ColdSide.Properties.Inlet.K     =       (1-InletCold.v)*PP.LiquidThermalConductivity(InletCold.T,InletCold.P,xc)+
    134                 InletCold.v*PP.VapourThermalConductivity(InletCold.T,InletCold.P,yc);
    135 
    136 "Cold Stream Outlet Conductivity"
    137         ColdSide.Properties.Outlet.K    =       (1-OutletCold.v)*PP.LiquidThermalConductivity(OutletCold.T,OutletCold.P,OutletCold.x)+
    138                 OutletCold.v*PP.VapourThermalConductivity(OutletCold.T,OutletCold.P,OutletCold.y);
    139        
    140116"Cold Stream Viscosity at Wall Temperature"
    141117        ColdSide.Properties.Wall.Mu     =       (1-InletCold.v)*PP.LiquidViscosity(ColdSide.Properties.Wall.Twall,ColdSide.Properties.Average.P,xc)+
     
    146122                InletHot.v*PP.VapourCp(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc);
    147123
    148 "Hot Stream Inlet Heat Capacity"
    149         HotSide.Properties.Inlet.Cp     =       (1-InletHot.v)*PP.LiquidCp(InletHot.T,InletHot.P,xc)+
    150                 InletHot.v*PP.VapourCp(InletHot.T,InletHot.P,yc);
    151 
    152 "Hot Stream Outlet Heat Capacity"
    153         HotSide.Properties.Outlet.Cp    =       (1-OutletHot.v)*PP.LiquidCp(OutletHot.T,OutletHot.P,OutletHot.x)+
    154                 OutletHot.v*PP.VapourCp(OutletHot.T,OutletHot.P,OutletHot.y);
    155 
    156124"Hot Stream Average Mass Density"
    157125        HotSide.Properties.Average.rho =        (1-InletHot.v)*PP.LiquidDensity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,xc)+
     
    170138                InletHot.v*PP.VapourViscosity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc);
    171139
    172 "Hot Stream inlet Viscosity"
    173         HotSide.Properties.Inlet.Mu     =       (1-InletHot.v)*PP.LiquidViscosity(InletHot.T,InletHot.P,xc)+
    174                 InletHot.v*PP.VapourViscosity(InletHot.T,InletHot.P,yc);
    175 
    176 "Hot Stream Outlet Viscosity"
    177         HotSide.Properties.Outlet.Mu    =       (1-OutletHot.v)*PP.LiquidViscosity(OutletHot.T,OutletHot.P,OutletHot.x)+
    178                 OutletHot.v*PP.VapourViscosity(OutletHot.T,OutletHot.P,OutletHot.y);
    179 
    180140"Hot Stream Average Conductivity"
    181141        HotSide.Properties.Average.K    =       (1-InletHot.v)*PP.LiquidThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,xc)+
    182142                InletHot.v*PP.VapourThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc);
    183143
    184 "Hot Stream Inlet Conductivity"
    185         HotSide.Properties.Inlet.K      =       (1-InletHot.v)*PP.LiquidThermalConductivity(InletHot.T,InletHot.P,xc)+
    186                 InletHot.v*PP.VapourThermalConductivity(InletHot.T,InletHot.P,yc);
    187 
    188 "Hot Stream Outlet Conductivity"
    189         HotSide.Properties.Outlet.K     =       (1-OutletHot.v)*PP.LiquidThermalConductivity(OutletHot.T,OutletHot.P,OutletHot.x)+
    190                 OutletHot.v*PP.VapourThermalConductivity(OutletHot.T,OutletHot.P,OutletHot.y);
    191        
    192144"Hot Stream Viscosity at Wall Temperature"
    193145        HotSide.Properties.Wall.Mu      =       (1-InletHot.v)*PP.LiquidViscosity(HotSide.Properties.Wall.Twall,HotSide.Properties.Average.P,xc)+
  • trunk/eml/heat_exchangers/PHE.mso

    r387 r420  
    199199        ColdSide.Properties.Average.Cp          =       PP.LiquidCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
    200200
    201 "Inlet Heat Capacity Cold Stream"
    202         ColdSide.Properties.Inlet.Cp                    =       PP.LiquidCp(InletCold.T,InletCold.P,InletCold.z);
    203 
    204 "Outlet Heat Capacity Cold Stream"
    205         ColdSide.Properties.Outlet.Cp           =       PP.LiquidCp(OutletCold.T,OutletCold.P,OutletCold.z);
    206 
    207201"Average Mass Density Cold Stream"
    208202        ColdSide.Properties.Average.rho         =       PP.LiquidDensity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
     
    217211        ColdSide.Properties.Average.Mu  =       PP.LiquidViscosity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
    218212
    219 "Inlet  Viscosity Cold Stream"
    220         ColdSide.Properties.Inlet.Mu            =       PP.LiquidViscosity(InletCold.T,InletCold.P,InletCold.z);
    221 
    222 "Outlet Viscosity Cold Stream"
    223         ColdSide.Properties.Outlet.Mu   =       PP.LiquidViscosity(OutletCold.T,OutletCold.P,OutletCold.z);
    224 
    225213"Average        Conductivity Cold Stream"
    226214        ColdSide.Properties.Average.K           =       PP.LiquidThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
    227215
    228 "Inlet  Conductivity Cold Stream"
    229         ColdSide.Properties.Inlet.K             =       PP.LiquidThermalConductivity(InletCold.T,InletCold.P,InletCold.z);
    230 
    231 "Outlet Conductivity Cold Stream"
    232         ColdSide.Properties.Outlet.K            =       PP.LiquidThermalConductivity(OutletCold.T,OutletCold.P,OutletCold.z);
    233 
    234216"Viscosity Cold Stream at wall temperature"
    235217        ColdSide.Properties.Wall.Mu             =       PP.LiquidViscosity(ColdSide.Properties.Wall.Twall,ColdSide.Properties.Average.P,InletCold.z);
     
    240222        ColdSide.Properties.Average.Cp  =       PP.VapourCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
    241223
    242 "Inlet Heat Capacity Cold Stream"
    243         ColdSide.Properties.Inlet.Cp            =       PP.VapourCp(InletCold.T,InletCold.P,InletCold.z);
    244 
    245 "Outlet Heat Capacity Cold Stream"
    246         ColdSide.Properties.Outlet.Cp   =       PP.VapourCp(OutletCold.T,OutletCold.P,OutletCold.z);
    247 
    248224"Average Mass Density Cold Stream"
    249225        ColdSide.Properties.Average.rho         =       PP.VapourDensity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
     
    258234        ColdSide.Properties.Average.Mu  =       PP.VapourViscosity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
    259235
    260 "Inlet Viscosity Cold Stream"
    261         ColdSide.Properties.Inlet.Mu            =       PP.VapourViscosity(InletCold.T,InletCold.P,InletCold.z);
    262 
    263 "Outlet Viscosity Cold Stream"
    264         ColdSide.Properties.Outlet.Mu   =       PP.VapourViscosity(OutletCold.T,OutletCold.P,OutletCold.z);
    265 
    266236"Average Conductivity Cold Stream"
    267237        ColdSide.Properties.Average.K           =       PP.VapourThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z);
    268238
    269 "Inlet Conductivity Cold Stream"
    270         ColdSide.Properties.Inlet.K             =       PP.VapourThermalConductivity(InletCold.T,InletCold.P,InletCold.z);
    271 
    272 "Outlet Conductivity Cold Stream"
    273         ColdSide.Properties.Outlet.K            =       PP.VapourThermalConductivity(OutletCold.T,OutletCold.P,OutletCold.z);
    274        
    275239"Viscosity Cold Stream at wall temperature"
    276240        ColdSide.Properties.Wall.Mu             =       PP.VapourViscosity(ColdSide.Properties.Wall.Twall,ColdSide.Properties.Average.P,InletCold.z);
     
    285249        HotSide.Properties.Average.Cp   =               PP.LiquidCp(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);
    286250
    287 "Inlet Heat Capacity Hot Stream"
    288         HotSide.Properties.Inlet.Cp             =               PP.LiquidCp(InletHot.T,InletHot.P,InletHot.z);
    289 
    290 "Outlet Heat Capacity Hot Stream"
    291         HotSide.Properties.Outlet.Cp    =               PP.LiquidCp(OutletHot.T,OutletHot.P,OutletHot.z);
    292 
    293251"Average Mass Density Hot Stream"
    294252        HotSide.Properties.Average.rho =                PP.LiquidDensity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);
     
    303261        HotSide.Properties.Average.Mu   =               PP.LiquidViscosity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);       
    304262
    305 "Inlet Viscosity Hot Stream"
    306         HotSide.Properties.Inlet.Mu     =               PP.LiquidViscosity(InletHot.T,InletHot.P,InletHot.z);   
    307 
    308 "Outlet Viscosity Hot Stream"
    309         HotSide.Properties.Outlet.Mu    =               PP.LiquidViscosity(OutletHot.T,OutletHot.P,OutletHot.z);       
    310 
    311263"Average Conductivity Hot Stream"
    312264        HotSide.Properties.Average.K    =               PP.LiquidThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);     
    313265
    314 "Inlet Conductivity Hot Stream"
    315         HotSide.Properties.Inlet.K              =               PP.LiquidThermalConductivity(InletHot.T,InletHot.P,InletHot.z);
    316 
    317 "Outlet Conductivity Hot Stream"
    318         HotSide.Properties.Outlet.K     =               PP.LiquidThermalConductivity(OutletHot.T,OutletHot.P,OutletHot.z);     
    319 
    320266"Viscosity Hot Stream at wall temperature"
    321267        HotSide.Properties.Wall.Mu              =               PP.LiquidViscosity(HotSide.Properties.Wall.Twall,HotSide.Properties.Average.P,InletHot.z);     
     
    327273        HotSide.Properties.Average.Cp   =               PP.VapourCp(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);
    328274
    329 "Inlet Heat Capacity Hot Stream"
    330         HotSide.Properties.Inlet.Cp             =               PP.VapourCp(InletHot.T,InletHot.P,InletHot.z);
    331 
    332 "Outlet Heat Capacity Hot Stream"
    333         HotSide.Properties.Outlet.Cp    =               PP.VapourCp(OutletHot.T,OutletHot.P,OutletHot.z);
    334 
    335275"Average Mass Density Hot Stream"
    336276        HotSide.Properties.Average.rho =                PP.VapourDensity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);
     
    345285        HotSide.Properties.Average.Mu   =               PP.VapourViscosity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);
    346286
    347 "Inlet Viscosity Hot Stream"
    348         HotSide.Properties.Inlet.Mu     =               PP.VapourViscosity(InletHot.T,InletHot.P,InletHot.z);
    349 
    350 "Outlet Viscosity Hot Stream"
    351         HotSide.Properties.Outlet.Mu    =               PP.VapourViscosity(OutletHot.T,OutletHot.P,OutletHot.z);
    352 
    353287"Average Conductivity Hot Stream"
    354288        HotSide.Properties.Average.K    =               PP.VapourThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z);     
    355 
    356 "Inlet Conductivity Hot Stream"
    357         HotSide.Properties.Inlet.K              =               PP.VapourThermalConductivity(InletHot.T,InletHot.P,InletHot.z);
    358 
    359 "Outlet Conductivity Hot Stream"
    360         HotSide.Properties.Outlet.K     =               PP.VapourThermalConductivity(OutletHot.T,OutletHot.P,OutletHot.z);     
    361289
    362290"Viscosity Hot Stream at wall temperature"
Note: See TracChangeset for help on using the changeset viewer.