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

REMOVED SOME VARIABLES

File:
1 edited

Legend:

Unmodified
Added
Removed
  • 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)+
Note: See TracChangeset for help on using the changeset viewer.