Changeset 420 for trunk/eml/heat_exchangers/HeatExchangerSimplified.mso

Timestamp:

Nov 26, 2007, 8:43:17 PM (16 years ago)

Author:

gerson bicca

Message:

REMOVED SOME VARIABLES

File:

• trunk/eml/heat_exchangers/HeatExchangerSimplified.mso (modified) (4 diffs)

trunk/eml/heat_exchangers/HeatExchangerSimplified.mso

@@ -94 +94 @@
                 InletCold.v*PP.VapourCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc);
 
-"Cold Stream Inlet Heat Capacity"
-        ColdSide.Properties.Inlet.Cp    =       (1-InletCold.v)*PP.LiquidCp(InletCold.T,InletCold.P,xc)+
-                InletCold.v*PP.VapourCp(InletCold.T,InletCold.P,yc);
-
-"Cold Stream Outlet Heat Capacity"
-        ColdSide.Properties.Outlet.Cp   =       (1-OutletCold.v)*PP.LiquidCp(OutletCold.T,OutletCold.P,OutletCold.x)+
-                OutletCold.v*PP.VapourCp(OutletCold.T,OutletCold.P,OutletCold.y);
-
 "Cold Stream Average Mass Density"
         ColdSide.Properties.Average.rho =       (1-InletCold.v)*PP.LiquidDensity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,xc)+
@@ -118 +110 @@
                 InletCold.v*PP.VapourViscosity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc);
 
-"Cold Stream inlet Viscosity"
-        ColdSide.Properties.Inlet.Mu    =       (1-InletCold.v)*PP.LiquidViscosity(InletCold.T,InletCold.P,xc)+
-                InletCold.v*PP.VapourViscosity(InletCold.T,InletCold.P,yc);
-
-"Cold Stream Outlet Viscosity"
-        ColdSide.Properties.Outlet.Mu   =       (1-OutletCold.v)*PP.LiquidViscosity(OutletCold.T,OutletCold.P,OutletCold.x)+
-                OutletCold.v*PP.VapourViscosity(OutletCold.T,OutletCold.P,OutletCold.y);
-
 "Cold Stream Average Conductivity"
         ColdSide.Properties.Average.K   =       (1-InletCold.v)*PP.LiquidThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,xc)+
                 InletCold.v*PP.VapourThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc);
 
-"Cold Stream Inlet Conductivity"        
-        ColdSide.Properties.Inlet.K     =       (1-InletCold.v)*PP.LiquidThermalConductivity(InletCold.T,InletCold.P,xc)+
-                InletCold.v*PP.VapourThermalConductivity(InletCold.T,InletCold.P,yc);
-
-"Cold Stream Outlet Conductivity"
-        ColdSide.Properties.Outlet.K    =       (1-OutletCold.v)*PP.LiquidThermalConductivity(OutletCold.T,OutletCold.P,OutletCold.x)+
-                OutletCold.v*PP.VapourThermalConductivity(OutletCold.T,OutletCold.P,OutletCold.y);
-        
 "Cold Stream Viscosity at Wall Temperature"
         ColdSide.Properties.Wall.Mu     =       (1-InletCold.v)*PP.LiquidViscosity(ColdSide.Properties.Wall.Twall,ColdSide.Properties.Average.P,xc)+
@@ -146 +122 @@
                 InletHot.v*PP.VapourCp(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc);
 
-"Hot Stream Inlet Heat Capacity"
-        HotSide.Properties.Inlet.Cp     =       (1-InletHot.v)*PP.LiquidCp(InletHot.T,InletHot.P,xc)+
-                InletHot.v*PP.VapourCp(InletHot.T,InletHot.P,yc);
-
-"Hot Stream Outlet Heat Capacity"
-        HotSide.Properties.Outlet.Cp    =       (1-OutletHot.v)*PP.LiquidCp(OutletHot.T,OutletHot.P,OutletHot.x)+
-                OutletHot.v*PP.VapourCp(OutletHot.T,OutletHot.P,OutletHot.y);
-
 "Hot Stream Average Mass Density"
         HotSide.Properties.Average.rho =        (1-InletHot.v)*PP.LiquidDensity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,xc)+
@@ -170 +138 @@
                 InletHot.v*PP.VapourViscosity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc);
 
-"Hot Stream inlet Viscosity"
-        HotSide.Properties.Inlet.Mu     =       (1-InletHot.v)*PP.LiquidViscosity(InletHot.T,InletHot.P,xc)+
-                InletHot.v*PP.VapourViscosity(InletHot.T,InletHot.P,yc);
-
-"Hot Stream Outlet Viscosity"
-        HotSide.Properties.Outlet.Mu    =       (1-OutletHot.v)*PP.LiquidViscosity(OutletHot.T,OutletHot.P,OutletHot.x)+
-                OutletHot.v*PP.VapourViscosity(OutletHot.T,OutletHot.P,OutletHot.y);
-
 "Hot Stream Average Conductivity"
         HotSide.Properties.Average.K    =       (1-InletHot.v)*PP.LiquidThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,xc)+
                 InletHot.v*PP.VapourThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc);
 
-"Hot Stream Inlet Conductivity" 
-        HotSide.Properties.Inlet.K      =       (1-InletHot.v)*PP.LiquidThermalConductivity(InletHot.T,InletHot.P,xc)+
-                InletHot.v*PP.VapourThermalConductivity(InletHot.T,InletHot.P,yc);
-
-"Hot Stream Outlet Conductivity"
-        HotSide.Properties.Outlet.K     =       (1-OutletHot.v)*PP.LiquidThermalConductivity(OutletHot.T,OutletHot.P,OutletHot.x)+
-                OutletHot.v*PP.VapourThermalConductivity(OutletHot.T,OutletHot.P,OutletHot.y);
-        
 "Hot Stream Viscosity at Wall Temperature"
         HotSide.Properties.Wall.Mu      =       (1-InletHot.v)*PP.LiquidViscosity(HotSide.Properties.Wall.Twall,HotSide.Properties.Average.P,xc)+