Changeset 420
- Timestamp:
- Nov 26, 2007, 8:43:17 PM (15 years ago)
- Location:
- trunk/eml/heat_exchangers
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/eml/heat_exchangers/DoublePipe.mso
r408 r420 126 126 Inner.Properties.Average.Cp = PP.LiquidCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 127 127 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 134 128 "Average Mass Density Inner Stream" 135 129 Inner.Properties.Average.rho = PP.LiquidDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); … … 144 138 Inner.Properties.Average.Mu = PP.LiquidViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 145 139 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 152 140 "Average Conductivity Inner Stream" 153 141 Inner.Properties.Average.K = PP.LiquidThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 154 142 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 161 143 "Viscosity Inner Stream at wall temperature" 162 144 Inner.Properties.Wall.Mu = PP.LiquidViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z); … … 167 149 Inner.Properties.Average.Cp = PP.VapourCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 168 150 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 175 151 "Average Mass Density Inner Stream" 176 152 Inner.Properties.Average.rho = PP.VapourDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); … … 185 161 Inner.Properties.Average.Mu = PP.VapourViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 186 162 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 193 163 "Average Conductivity Inner Stream" 194 164 Inner.Properties.Average.K = PP.VapourThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 195 165 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 202 166 "Viscosity Inner Stream at wall temperature" 203 167 Inner.Properties.Wall.Mu = PP.VapourViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z); … … 212 176 Outer.Properties.Average.Cp = PP.LiquidCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 213 177 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 220 178 "Average Mass Density Outer Stream" 221 179 Outer.Properties.Average.rho = PP.LiquidDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); … … 230 188 Outer.Properties.Average.Mu = PP.LiquidViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 231 189 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 238 190 "Average Conductivity Outer Stream" 239 191 Outer.Properties.Average.K = PP.LiquidThermalConductivity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 240 192 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 247 193 "Viscosity Outer Stream at wall temperature" 248 194 Outer.Properties.Wall.Mu = PP.LiquidViscosity(Outer.Properties.Wall.Twall,Outer.Properties.Average.P,InletOuter.z); … … 254 200 Outer.Properties.Average.Cp = PP.VapourCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 255 201 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 262 202 "Average Mass Density Outer Stream" 263 203 Outer.Properties.Average.rho = PP.VapourDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); … … 272 212 Outer.Properties.Average.Mu = PP.VapourViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 273 213 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 280 214 "Average Conductivity Outer Stream" 281 215 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);288 216 289 217 "Viscosity Outer Stream at wall temperature" … … 900 828 Inner.Properties.Average.Cp = PP.LiquidCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 901 829 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 908 830 "Average Mass Density Inner Stream" 909 831 Inner.Properties.Average.rho = PP.LiquidDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); … … 918 840 Inner.Properties.Average.Mu = PP.LiquidViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 919 841 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 926 842 "Average Conductivity Inner Stream" 927 843 Inner.Properties.Average.K = PP.LiquidThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 928 844 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 935 845 "Viscosity Inner Stream at wall temperature" 936 846 Inner.Properties.Wall.Mu = PP.LiquidViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z); … … 941 851 Inner.Properties.Average.Cp = PP.VapourCp(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 942 852 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 949 853 "Average Mass Density Inner Stream" 950 854 Inner.Properties.Average.rho = PP.VapourDensity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); … … 959 863 Inner.Properties.Average.Mu = PP.VapourViscosity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 960 864 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 967 865 "Average Conductivity Inner Stream" 968 866 Inner.Properties.Average.K = PP.VapourThermalConductivity(Inner.Properties.Average.T,Inner.Properties.Average.P,InletInner.z); 969 867 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 976 868 "Viscosity Inner Stream at wall temperature" 977 869 Inner.Properties.Wall.Mu = PP.VapourViscosity(Inner.Properties.Wall.Twall,Inner.Properties.Average.P,InletInner.z); … … 986 878 Outer.Properties.Average.Cp = PP.LiquidCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 987 879 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 994 880 "Average Mass Density Outer Stream" 995 881 Outer.Properties.Average.rho = PP.LiquidDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); … … 1004 890 Outer.Properties.Average.Mu = PP.LiquidViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 1005 891 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 1012 892 "Average Conductivity Outer Stream" 1013 893 Outer.Properties.Average.K = PP.LiquidThermalConductivity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 1014 894 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 1021 895 "Viscosity Outer Stream at wall temperature" 1022 896 Outer.Properties.Wall.Mu = PP.LiquidViscosity(Outer.Properties.Wall.Twall,Outer.Properties.Average.P,InletOuter.z); … … 1028 902 Outer.Properties.Average.Cp = PP.VapourCp(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 1029 903 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 1036 904 "Average Mass Density Outer Stream" 1037 905 Outer.Properties.Average.rho = PP.VapourDensity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); … … 1046 914 Outer.Properties.Average.Mu = PP.VapourViscosity(Outer.Properties.Average.T,Outer.Properties.Average.P,InletOuter.z); 1047 915 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 1054 916 "Average Conductivity Outer Stream" 1055 917 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);1062 918 1063 919 "Viscosity Outer Stream at wall temperature" -
trunk/eml/heat_exchangers/HEX_Engine.mso
r404 r420 49 49 Fw as flow_mass (Brief="Stream Mass Flow"); 50 50 rho 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 55 51 end 56 52 -
trunk/eml/heat_exchangers/HeatExchangerDetailed.mso
r382 r420 205 205 Tubes.Properties.Average.Cp = PP.LiquidCp(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); 206 206 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 213 207 "Tube Stream Average Mass Density" 214 208 Tubes.Properties.Average.rho = PP.LiquidDensity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); … … 223 217 Tubes.Properties.Average.Mu = PP.LiquidViscosity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); 224 218 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 231 219 "Tube Stream Average Conductivity" 232 220 Tubes.Properties.Average.K = PP.LiquidThermalConductivity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); 233 221 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 240 222 "Tube Stream Viscosity at Wall Temperature" 241 223 Tubes.Properties.Wall.Mu = PP.LiquidViscosity(Tubes.Properties.Wall.Twall,Tubes.Properties.Average.P,OutletTube.z); … … 246 228 Tubes.Properties.Average.Cp = PP.VapourCp(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); 247 229 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 254 230 "Tube Stream Average Mass Density" 255 231 Tubes.Properties.Average.rho = PP.VapourDensity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); … … 264 240 Tubes.Properties.Average.Mu = PP.VapourViscosity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); 265 241 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 272 242 "Tube Stream Average Conductivity " 273 243 Tubes.Properties.Average.K = PP.VapourThermalConductivity(Tubes.Properties.Average.T,Tubes.Properties.Average.P,OutletTube.z); 274 244 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 281 245 "Tube Stream Viscosity at Wall Temperature" 282 246 Tubes.Properties.Wall.Mu = PP.VapourViscosity(Tubes.Properties.Wall.Twall,Tubes.Properties.Average.P,OutletTube.z); … … 291 255 Shell.Properties.Average.Cp = PP.LiquidCp(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); 292 256 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 299 257 "Shell Stream Average Mass Density" 300 258 Shell.Properties.Average.rho = PP.LiquidDensity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); … … 309 267 Shell.Properties.Average.Mu = PP.LiquidViscosity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); 310 268 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 317 269 "Shell Stream Average Conductivity" 318 270 Shell.Properties.Average.K = PP.LiquidThermalConductivity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); 319 271 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 326 272 "ShellStream Viscosity at Wall Temperature" 327 273 Shell.Properties.Wall.Mu = PP.LiquidViscosity(Shell.Properties.Wall.Twall,Shell.Properties.Average.P,InletShell.z); … … 333 279 Shell.Properties.Average.Cp = PP.VapourCp(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); 334 280 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 341 281 "Shell Stream Average Mass Density" 342 282 Shell.Properties.Average.rho = PP.VapourDensity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); … … 351 291 Shell.Properties.Average.Mu = PP.VapourViscosity(Shell.Properties.Average.T,Shell.Properties.Average.P,InletShell.z); 352 292 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 359 293 "Shell Stream Average Conductivity" 360 294 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);367 295 368 296 "Shell Stream Viscosity at Wall Temperature" -
trunk/eml/heat_exchangers/HeatExchangerSimplified.mso
r360 r420 94 94 InletCold.v*PP.VapourCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc); 95 95 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 104 96 "Cold Stream Average Mass Density" 105 97 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); 119 111 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 128 112 "Cold Stream Average Conductivity" 129 113 ColdSide.Properties.Average.K = (1-InletCold.v)*PP.LiquidThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,xc)+ 130 114 InletCold.v*PP.VapourThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,yc); 131 115 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 140 116 "Cold Stream Viscosity at Wall Temperature" 141 117 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); 147 123 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 156 124 "Hot Stream Average Mass Density" 157 125 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); 171 139 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 180 140 "Hot Stream Average Conductivity" 181 141 HotSide.Properties.Average.K = (1-InletHot.v)*PP.LiquidThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,xc)+ 182 142 InletHot.v*PP.VapourThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,yc); 183 143 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 192 144 "Hot Stream Viscosity at Wall Temperature" 193 145 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 199 199 ColdSide.Properties.Average.Cp = PP.LiquidCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); 200 200 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 207 201 "Average Mass Density Cold Stream" 208 202 ColdSide.Properties.Average.rho = PP.LiquidDensity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); … … 217 211 ColdSide.Properties.Average.Mu = PP.LiquidViscosity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); 218 212 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 225 213 "Average Conductivity Cold Stream" 226 214 ColdSide.Properties.Average.K = PP.LiquidThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); 227 215 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 234 216 "Viscosity Cold Stream at wall temperature" 235 217 ColdSide.Properties.Wall.Mu = PP.LiquidViscosity(ColdSide.Properties.Wall.Twall,ColdSide.Properties.Average.P,InletCold.z); … … 240 222 ColdSide.Properties.Average.Cp = PP.VapourCp(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); 241 223 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 248 224 "Average Mass Density Cold Stream" 249 225 ColdSide.Properties.Average.rho = PP.VapourDensity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); … … 258 234 ColdSide.Properties.Average.Mu = PP.VapourViscosity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); 259 235 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 266 236 "Average Conductivity Cold Stream" 267 237 ColdSide.Properties.Average.K = PP.VapourThermalConductivity(ColdSide.Properties.Average.T,ColdSide.Properties.Average.P,InletCold.z); 268 238 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 275 239 "Viscosity Cold Stream at wall temperature" 276 240 ColdSide.Properties.Wall.Mu = PP.VapourViscosity(ColdSide.Properties.Wall.Twall,ColdSide.Properties.Average.P,InletCold.z); … … 285 249 HotSide.Properties.Average.Cp = PP.LiquidCp(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); 286 250 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 293 251 "Average Mass Density Hot Stream" 294 252 HotSide.Properties.Average.rho = PP.LiquidDensity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); … … 303 261 HotSide.Properties.Average.Mu = PP.LiquidViscosity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); 304 262 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 311 263 "Average Conductivity Hot Stream" 312 264 HotSide.Properties.Average.K = PP.LiquidThermalConductivity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); 313 265 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 320 266 "Viscosity Hot Stream at wall temperature" 321 267 HotSide.Properties.Wall.Mu = PP.LiquidViscosity(HotSide.Properties.Wall.Twall,HotSide.Properties.Average.P,InletHot.z); … … 327 273 HotSide.Properties.Average.Cp = PP.VapourCp(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); 328 274 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 335 275 "Average Mass Density Hot Stream" 336 276 HotSide.Properties.Average.rho = PP.VapourDensity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); … … 345 285 HotSide.Properties.Average.Mu = PP.VapourViscosity(HotSide.Properties.Average.T,HotSide.Properties.Average.P,InletHot.z); 346 286 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 353 287 "Average Conductivity Hot Stream" 354 288 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);361 289 362 290 "Viscosity Hot Stream at wall temperature"
Note: See TracChangeset
for help on using the changeset viewer.