Changeset 523
- Timestamp:
- May 23, 2008, 4:44:08 PM (15 years ago)
- Location:
- trunk
- Files:
-
- 5 edited
-
eml/heat_exchangers/HEX_Engine.mso (modified) (1 diff)
-
eml/heat_exchangers/PHE.mso (modified) (19 diffs)
-
eml/streams.mso (modified) (1 diff)
-
sample/heat_exchangers/PHE_diagram.pfd (modified) (24 diffs)
-
sample/heat_exchangers/Sample_PHE.mso (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/eml/heat_exchangers/HEX_Engine.mso
r492 r523 416 416 417 417 end 418 419 Model PHE_HeatTransfer420 421 ATTRIBUTES422 Pallete = false;423 Brief = "to be documented";424 Info =425 "to be documented";426 427 VARIABLES428 429 Re as positive (Brief="Reynolds Number",Default=100,Lower=1);430 PR as positive (Brief="Prandtl Number",Default=0.5,Lower=1e-8);431 NTU as positive (Brief="Number of Units Transference",Default=0.05,Lower=1e-10);432 WCp as positive (Brief="Stream Heat Capacity",Lower=1e-3,Default=1e3,Unit='W/K');433 hcoeff as heat_trans_coeff (Brief="Film Coefficient",Default=1,Lower=1e-12, Upper=1e6);434 Gchannel as flux_mass (Brief ="Channel Mass Flux", Default=1, Lower=1e-6, Symbol ="G^{channel}");435 Gports as flux_mass (Brief ="Ports Mass Flux", Default=1, Lower=1e-6, Symbol ="G^{ports}");436 Phi as positive (Brief="Viscosity Correction",Default=1,Lower=1e-6, Symbol="\phi");437 438 end439 440 Model PHE_PressureDrop441 442 ATTRIBUTES443 Pallete = false;444 Brief = "to be documented";445 Info =446 "to be documented";447 448 VARIABLES449 450 DPchannel as press_delta (Brief="Channel Pressure Drop",Default=0.01, Lower=1e-10,DisplayUnit='kPa', Symbol ="\Delta P^{channel}");451 DPports as press_delta (Brief="Ports Pressure Drop",Default=0.01, Lower=1e-10,DisplayUnit='kPa', Symbol ="\Delta P^{ports}");452 Pdrop as press_delta (Brief="Total Pressure Drop",Default=0.01, Lower=1e-10,DisplayUnit='kPa', Symbol ="\Delta P");453 fi as fricfactor (Brief="Friction Factor", Default=0.05, Lower=1e-10, Upper=2000);454 Vchannel as velocity (Brief="Stream Velocity in Channel",Lower=1e-8, Symbol ="V^{channel}");455 Vports as velocity (Brief="Stream Velocity in Ports",Lower=1e-8, Symbol ="V^{ports}");456 Npassage as Real (Brief="Number of Channels per Pass", Symbol ="N^{passage}");457 end458 459 Model Main_PHE460 461 ATTRIBUTES462 Pallete = false;463 Brief = "to be documented";464 Info =465 "to be documented";466 467 VARIABLES468 469 HeatTransfer as PHE_HeatTransfer (Brief="PHE Heat Transfer", Symbol = " ");470 PressureDrop as PHE_PressureDrop (Brief="PHE Pressure Drop", Symbol = " ");471 Properties as Physical_Properties (Brief="PHE Properties", Symbol = " ");472 473 end474 475 Model Thermal_PHE476 477 ATTRIBUTES478 Pallete = false;479 Brief = "to be documented";480 Info =481 "to be documented";482 483 VARIABLES484 Cr as positive (Brief="Heat Capacity Ratio",Default=0.5,Lower=1e-6);485 Cmin as positive (Brief="Minimum Heat Capacity",Lower=1e-10,Default=1e3,Unit='W/K');486 Cmax as positive (Brief="Maximum Heat Capacity",Lower=1e-10,Default=1e3,Unit='W/K');487 NTU as positive (Brief="Number of Units Transference",Default=0.05,Lower=1e-10);488 Eft as positive (Brief="Effectiveness",Default=0.5,Lower=0.4,Upper=1, Symbol = "\varepsilon");489 Q as power (Brief="Heat Transfer", Default=7000, Lower=1e-6, Upper=1e10);490 Uc as heat_trans_coeff (Brief="Overall Heat Transfer Coefficient Clean",Default=1,Lower=1e-6,Upper=1e10);491 Ud as heat_trans_coeff (Brief="Overall Heat Transfer Coefficient Dirty",Default=1,Lower=1e-6,Upper=1e10);492 end -
trunk/eml/heat_exchangers/PHE.mso
r420 r523 18 18 using "HEX_Engine"; 19 19 20 Model PHE_PressureDrop 21 22 ATTRIBUTES 23 Pallete = false; 24 Brief = "to be documented"; 25 Info = 26 "to be documented"; 27 28 VARIABLES 29 30 DPchannel as press_delta (Brief="Channel Pressure Drop",Default=0.01, Lower=1E10,DisplayUnit='kPa', Symbol ="\Delta P^{channel}"); 31 DPports as press_delta (Brief="Ports Pressure Drop",Default=0.01, Lower=1E-10,DisplayUnit='kPa', Symbol ="\Delta P^{ports}"); 32 Pdrop as press_delta (Brief="Total Pressure Drop",Default=0.01, Lower=1E-10,DisplayUnit='kPa', Symbol ="\Delta P"); 33 fi as fricfactor (Brief="Friction Factor", Default=0.05, Lower=1E-10, Upper=2000); 34 Vchannel as velocity (Brief="Stream Velocity in Channel",Lower=1E-8, Symbol ="V^{channel}"); 35 Vports as velocity (Brief="Stream Velocity in Ports",Lower=1E-8, Symbol ="V^{ports}"); 36 Npassage as positive (Brief="Number of Channels per Pass", Symbol ="N^{passage}"); 37 38 end 39 40 Model PHE_HeatTransfer 41 42 ATTRIBUTES 43 Pallete = false; 44 Brief = "to be documented"; 45 Info = 46 "to be documented"; 47 48 VARIABLES 49 50 Re as positive (Brief="Reynolds Number",Default=100,Lower=1); 51 PR as positive (Brief="Prandtl Number",Default=0.5,Lower=1e-8); 52 NTU as positive (Brief="Number of Units Transference",Default=0.05,Lower=1E-10); 53 WCp as positive (Brief="Stream Heat Capacity",Lower=1E-3,Default=1E3,Unit='W/K'); 54 hcoeff as heat_trans_coeff (Brief="Film Coefficient",Default=1,Lower=1E-12, Upper=1E6); 55 Gchannel as flux_mass (Brief ="Channel Mass Flux", Default=1, Lower=1E-6, Symbol ="G^{channel}"); 56 Gports as flux_mass (Brief ="Ports Mass Flux", Default=1, Lower=1E-6, Symbol ="G^{ports}"); 57 Phi as positive (Brief="Viscosity Correction",Default=1,Lower=1E-6, Symbol="\phi"); 58 59 end 60 61 Model Main_PHE 62 63 ATTRIBUTES 64 Pallete = false; 65 Brief = "to be documented"; 66 Info = 67 "to be documented"; 68 69 VARIABLES 70 71 HeatTransfer as PHE_HeatTransfer (Brief="PHE Heat Transfer", Symbol = " "); 72 PressureDrop as PHE_PressureDrop (Brief="PHE Pressure Drop", Symbol = " "); 73 Properties as Physical_Properties (Brief="PHE Properties", Symbol = " "); 74 75 end 76 77 Model Thermal_PHE 78 79 ATTRIBUTES 80 Pallete = false; 81 Brief = "to be documented"; 82 Info = 83 "to be documented"; 84 85 VARIABLES 86 Cr as positive (Brief="Heat Capacity Ratio",Default=0.5,Lower=1E-6); 87 Cmin as positive (Brief="Minimum Heat Capacity",Lower=1E-10,Default=1E3,Unit='W/K'); 88 Cmax as positive (Brief="Maximum Heat Capacity",Lower=1E-10,Default=1E3,Unit='W/K'); 89 NTU as positive (Brief="Number of Units Transference",Default=0.05,Lower=1E-10); 90 Eft as positive (Brief="Effectiveness",Default=0.5,Lower=0.1,Upper=1.1, Symbol = "\varepsilon"); 91 Q as power (Brief="Heat Transfer", Default=7000, Lower=1E-6, Upper=1E10); 92 Uc as heat_trans_coeff (Brief="Overall Heat Transfer Coefficient Clean",Default=1,Lower=1E-6,Upper=1E10); 93 Ud as heat_trans_coeff (Brief="Overall Heat Transfer Coefficient Dirty",Default=1,Lower=1E-6,Upper=1E10); 94 95 end 96 97 Model PHE_Geometry 98 99 ATTRIBUTES 100 Pallete = false; 101 Brief = "Parameters for a gasketed plate heat exchanger."; 102 103 PARAMETERS 104 105 outer PP as Plugin (Brief="External Physical Properties", Type="PP"); 106 outer NComp as Integer (Brief="Number of Chemical Components",Hidden=true); 107 108 Pi as constant (Brief="Pi Number",Default=3.14159265, Hidden=true,Symbol = "\pi"); 109 N1 as Integer (Brief="Auxiliar Constant", Hidden=true,Default = 15); 110 N2 as Integer (Brief="Auxiliar Constant",Hidden=true,Default = 14); 111 Kp1(N1) as constant (Brief="First constant in Kumar calculation for Pressure Drop", Hidden=true); 112 Kp2(N1) as constant (Brief="Second constant in Kumar calculation for Pressure Drop", Hidden=true); 113 Kc1(N2) as constant (Brief="First constant in Kumar calculation for Heat Transfer", Hidden=true); 114 Kc2(N2) as constant (Brief="Second constant Kumar calculation for Heat Transfer", Hidden=true); 115 M(NComp) as molweight (Brief="Component Mol Weight", Hidden=true); 116 117 118 Lv as length (Brief="Vertical Ports Distance",Lower=0.1); 119 Nplates as Integer (Brief="Total Number of Plates in The Whole Heat Exchanger",Default=25, Symbol ="N_{plates}"); 120 NpassHot as Integer (Brief="Number of Passes for Hot Side", Symbol ="Npasshot"); 121 NpassCold as Integer (Brief="Number of Passes for Cold Side", Symbol ="Npasscold"); 122 Dports as length (Brief="Ports Diameter",Lower=1e-6, Symbol ="D_{ports}"); 123 Lw as length (Brief="Plate Width",Lower=0.1); 124 pitch as length (Brief="Plate Pitch",Lower=0.1); 125 pt as length (Brief="Plate Thickness",Lower=0.1); 126 Kwall as conductivity (Brief="Plate Thermal Conductivity",Default=1.0, Symbol ="K_{wall}"); 127 Rfh as positive (Brief="Hot Side Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0); 128 Rfc as positive (Brief="Cold Side Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0); 129 PhiFactor as Real (Brief="Enlargement Factor",Lower=1e-6, Symbol ="\phi"); 130 131 Atotal as area (Brief="Total Effective Area",Lower=1e-6, Symbol ="A_{total}", Protected=true); 132 Aports as area (Brief="Port Opening Area of Plate",Lower=1e-6, Symbol ="A_{ports}", Protected=true); 133 Achannel as area (Brief="Cross-Sectional Area for Channel Flow",Lower=1e-6, Symbol ="A_{channel}", Protected=true); 134 Dh as length (Brief="Equivalent Diameter of Channel",Lower=1e-6, Protected=true); 135 Depth as length (Brief="Corrugation Depth",Lower=1e-6, Protected=true); 136 Nchannels as Integer (Brief="Total Number of Channels in The Whole Heat Exchanger", Protected=true); 137 Lp as length (Brief="Plate Vertical Distance between Port Centers",Lower=0.1, Protected=true); 138 Lpack as length (Brief="Compact Plate Pack Length",Lower=0.1, Protected=true); 139 Lh as length (Brief="Plate Horizontal Distance between Port Centers",Lower=0.1, Protected=true); 140 141 SET 142 143 #"Vector Length of constants for Kumar's calculating Pressure Drop" 144 N1 = 15; 145 146 #"Vector Length of constants for Kumar's calculating Heat Transfer" 147 N2 = 14; 148 149 #"First constant for Kumar's calculating Pressure Drop" 150 Kp1 = [50,19.40,2.990,47,18.290,1.441,34,11.250,0.772,24,3.240,0.760,24,2.80,0.639]; 151 152 #"Second constant for Kumar's calculating Pressure Drop" 153 Kp2 = [1,0.589,0.183,1,0.652,0.206,1,0.631,0.161,1,0.457,0.215,1,0.451,0.213]; 154 155 #"First constant for Kumar's calculating Heat Transfer" 156 Kc1 = [0.718,0.348,0.718,0.400,0.300,0.630,0.291,0.130,0.562,0.306,0.108,0.562,0.331,0.087]; 157 158 #"Second constant for Kumar's calculating Heat Transfer" 159 Kc2 = [0.349,0.663,0.349,0.598,0.663,0.333,0.591,0.732,0.326,0.529,0.703,0.326,0.503,0.718]; 160 161 #"Component Molecular Weight" 162 M = PP.MolecularWeight(); 163 164 #"Pi Number" 165 Pi = 3.14159265; 166 167 #"Plate Vertical Distance between Port Centers" 168 Lp = Lv - Dports; 169 170 #"Corrugation Depth" 171 Depth=pitch-pt; 172 173 #"Plate Horizontal Distance between Port Centers" 174 Lh=Lw-Dports; 175 176 #"Hydraulic Diameter" 177 Dh=2*Depth/PhiFactor; 178 179 #"Ports Area" 180 Aports=0.25*Pi*Dports*Dports; 181 182 #"Channel Area" 183 Achannel=Depth*Lw; 184 185 #"Pack Length" 186 Lpack=Depth*(Nplates-1)+Nplates*pt; 187 188 #"Total Number of Channels" 189 Nchannels = Nplates -1; 190 191 #"Exchange Surface Area" 192 Atotal =(Nplates-2)*Lw*Lp*PhiFactor; 193 194 end 195 20 196 Model PHE 21 197 … … 23 199 Icon = "icon/phe"; 24 200 Pallete = true; 25 Brief = "Shortcut model for plate and Frame heat exchanger.";201 Brief = "Shortcut model for Plate and Frame heat exchanger."; 26 202 Info = 27 203 "Model of a gasketed plate heat exchanger. … … 69 245 70 246 outer PP as Plugin (Brief="External Physical Properties", Type="PP"); 71 outer NComp as Integer (Brief="Number of Chemical Components"); 72 Pi as constant (Brief="Pi Number",Default=3.14159265, Symbol = "\pi"); 73 N1 as Integer (Brief="Auxiliar Constant",Default = 15); 74 N2 as Integer (Brief="Auxiliar Constant",Default = 14); 75 Kp1(N1) as constant (Brief="First constant in Kumar calculation for Pressure Drop"); 76 Kp2(N1) as constant (Brief="Second constant in Kumar calculation for Pressure Drop"); 77 Kc1(N2) as constant (Brief="First constant in Kumar calculation for Heat Transfer"); 78 Kc2(N2) as constant (Brief="Second constant Kumar calculation for Heat Transfer"); 79 M(NComp) as molweight (Brief="Component Mol Weight"); 80 81 ChevronAngle as Switcher (Brief="Chevron Corrugation Inclination Angle in Degrees ",Valid=["A30_Deg","A45_Deg","A50_Deg","A60_Deg","A65_Deg"],Default="A30_Deg"); 82 SideOne as Switcher (Brief="Fluid Alocation in the Side I - (The odd channels)",Valid=["hot","cold"],Default="hot"); 83 Nchannels as Integer (Brief="Total Number of Channels in The Whole Heat Exchanger"); 84 Nplates as Integer (Brief="Total Number of Plates in The Whole Heat Exchanger",Default=25, Symbol ="N_{plates}"); 85 NpassHot as Integer (Brief="Number of Passes for Hot Side", Symbol ="Npasshot"); 86 NpassCold as Integer (Brief="Number of Passes for Cold Side", Symbol ="Npasscold"); 87 Dports as length (Brief="Ports Diameter",Lower=1e-6, Symbol ="D_{ports}"); 88 Atotal as area (Brief="Total Effective Area",Lower=1e-6, Symbol ="A_{total}"); 89 Aports as area (Brief="Port Opening Area of Plate",Lower=1e-6, Symbol ="A_{ports}"); 90 Achannel as area (Brief="Cross-Sectional Area for Channel Flow",Lower=1e-6, Symbol ="A_{channel}"); 91 Dh as length (Brief="Equivalent Diameter of Channel",Lower=1e-6); 92 Depth as length (Brief="Corrugation Depth",Lower=1e-6); 93 PhiFactor as Real (Brief="Enlargement Factor",Lower=1e-6, Symbol ="\phi"); 94 Lp as length (Brief="Plate Vertical Distance between Port Centers",Lower=0.1); 95 Lpack as length (Brief="Compact Plate Pack Length",Lower=0.1); 96 Lv as length (Brief="Vertical Ports Distance",Lower=0.1); 97 Lh as length (Brief="Plate Horizontal Distance between Port Centers",Lower=0.1); 98 Lw as length (Brief="Plate Width",Lower=0.1); 99 pitch as length (Brief="Plate Pitch",Lower=0.1); 100 pt as length (Brief="Plate Thickness",Lower=0.1); 101 Kwall as conductivity (Brief="Plate Thermal Conductivity",Default=1.0, Symbol ="K_{wall}"); 102 Rfh as positive (Brief="Hot Side Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0); 103 Rfc as positive (Brief="Cold Side Fouling Resistance",Unit='m^2*K/kW',Default=1e-6,Lower=0); 247 outer NComp as Integer (Brief="Number of Chemical Components"); 248 249 ChevronAngle as Switcher (Brief="Chevron Corrugation Inclination Angle in Degrees ",Valid=["A30_Deg","A45_Deg","A50_Deg","A60_Deg","A65_Deg"],Default="A30_Deg"); 250 SideOne as Switcher (Brief="Fluid Alocation in the Side I - (The odd channels)",Valid=["hot","cold"],Default="hot"); 104 251 105 252 VARIABLES 106 253 107 in InletHot as stream (Brief="Inlet Hot Stream", PosX=0, PosY=0.75, Symbol="^{inHot}"); 108 in InletCold as stream (Brief="Inlet Cold Stream", PosX=0, PosY=0.25, Symbol="^{inCold}"); 109 out OutletHot as streamPH (Brief="Outlet Hot Stream", PosX=1, PosY=0.25, Symbol="^{outHot}"); 110 out OutletCold as streamPH (Brief="Outlet Cold Stream", PosX=1, PosY=0.75, Symbol="^{outCold}"); 111 112 HotSide as Main_PHE (Brief="Plate Heat Exchanger Hot Side", Symbol="_{hot}"); 113 ColdSide as Main_PHE (Brief="Plate Heat Exchanger Cold Side", Symbol="_{cold}"); 114 Thermal as Thermal_PHE (Brief="Thermal Results", Symbol = " "); 115 116 SET 117 #"Vector Length of constants for Kumar's calculating Pressure Drop" 118 N1 = 15; 119 120 #"Vector Length of constants for Kumar's calculating Heat Transfer" 121 N2 = 14; 122 123 #"First constant for Kumar's calculating Pressure Drop" 124 Kp1 = [50,19.40,2.990,47,18.290,1.441,34,11.250,0.772,24,3.240,0.760,24,2.80,0.639]; 125 126 #"Second constant for Kumar's calculating Pressure Drop" 127 Kp2 = [1,0.589,0.183,1,0.652,0.206,1,0.631,0.161,1,0.457,0.215,1,0.451,0.213]; 128 129 #"First constant for Kumar's calculating Heat Transfer" 130 Kc1 = [0.718,0.348,0.718,0.400,0.300,0.630,0.291,0.130,0.562,0.306,0.108,0.562,0.331,0.087]; 131 132 #"Second constant for Kumar's calculating Heat Transfer" 133 Kc2 = [0.349,0.663,0.349,0.598,0.663,0.333,0.591,0.732,0.326,0.529,0.703,0.326,0.503,0.718]; 134 135 #"Component Molecular Weight" 136 M = PP.MolecularWeight(); 137 138 #"Pi Number" 139 Pi = 3.14159265; 140 141 #"Plate Vertical Distance between Port Centers" 142 Lp = Lv - Dports; 143 144 #"Corrugation Depth" 145 Depth=pitch-pt; 146 147 #"Plate Horizontal Distance between Port Centers" 148 Lh=Lw-Dports; 149 150 #"Hydraulic Diameter" 151 Dh=2*Depth/PhiFactor; 152 153 #"Ports Area" 154 Aports=0.25*Pi*Dports*Dports; 155 156 #"Channel Area" 157 Achannel=Depth*Lw; 158 159 #"Pack Length" 160 Lpack=Depth*(Nplates-1)+Nplates*pt; 161 162 #"Total Number of Channels" 163 Nchannels = Nplates -1; 164 165 #"Exchange Surface Area" 166 Atotal =(Nplates-2)*Lw*Lp*PhiFactor; 167 254 Geometry as PHE_Geometry (Brief="Plate Heat Exchanger Geometrical Parameters", Symbol=" "); 255 in InletHot as stream (Brief="Inlet Hot Stream", PosX=0, PosY=0.75, Symbol="^{inHot}"); 256 in InletCold as stream (Brief="Inlet Cold Stream", PosX=0, PosY=0.25, Symbol="^{inCold}"); 257 out OutletHot as streamPH (Brief="Outlet Hot Stream", PosX=1, PosY=0.25, Symbol="^{outHot}"); 258 out OutletCold as streamPH (Brief="Outlet Cold Stream", PosX=1, PosY=0.75, Symbol="^{outCold}"); 259 260 261 HotSide as Main_PHE (Brief="Plate Heat Exchanger Hot Side", Symbol="_{hot}"); 262 ColdSide as Main_PHE (Brief="Plate Heat Exchanger Cold Side", Symbol="_{cold}"); 263 Thermal as Thermal_PHE (Brief="Thermal Results", Symbol = " "); 264 168 265 EQUATIONS 169 266 … … 187 284 188 285 "Hot Stream Average Molecular Weight" 189 HotSide.Properties.Average.Mw = sum( M*InletHot.z);286 HotSide.Properties.Average.Mw = sum(Geometry.M*InletHot.z); 190 287 191 288 "Cold Stream Average Molecular Weight" 192 ColdSide.Properties.Average.Mw = sum( M*InletCold.z);289 ColdSide.Properties.Average.Mw = sum(Geometry.M*InletCold.z); 193 290 194 291 if InletCold.v equal 0 … … 300 397 301 398 "Flow Mass Inlet Cold Stream" 302 ColdSide.Properties.Inlet.Fw = sum( M*InletCold.z)*InletCold.F;399 ColdSide.Properties.Inlet.Fw = sum(Geometry.M*InletCold.z)*InletCold.F; 303 400 304 401 "Flow Mass Outlet Cold Stream" 305 ColdSide.Properties.Outlet.Fw = sum( M*OutletCold.z)*OutletCold.F;402 ColdSide.Properties.Outlet.Fw = sum(Geometry.M*OutletCold.z)*OutletCold.F; 306 403 307 404 "Flow Mass Inlet Hot Stream" 308 HotSide.Properties.Inlet.Fw = sum( M*InletHot.z)*InletHot.F;405 HotSide.Properties.Inlet.Fw = sum(Geometry.M*InletHot.z)*InletHot.F; 309 406 310 407 "Flow Mass Outlet Hot Stream" 311 HotSide.Properties.Outlet.Fw = sum( M*OutletHot.z)*OutletHot.F;408 HotSide.Properties.Outlet.Fw = sum(Geometry.M*OutletHot.z)*OutletHot.F; 312 409 313 410 "Molar Balance Hot Stream" … … 328 425 329 426 "Total Number of Passages Cold Side" 330 ColdSide.PressureDrop.Npassage = (2* Nchannels+1+(-1)^(Nchannels+1))/(4*NpassCold);427 ColdSide.PressureDrop.Npassage = (2*Geometry.Nchannels+1+(-1)^(Geometry.Nchannels+1))/(4*Geometry.NpassCold); 331 428 332 429 "Total Number of Passages Hot Side" 333 HotSide.PressureDrop.Npassage = (2* Nchannels-1+(-1)^(Nchannels))/(4*NpassHot);430 HotSide.PressureDrop.Npassage = (2*Geometry.Nchannels-1+(-1)^(Geometry.Nchannels))/(4*Geometry.NpassHot); 334 431 335 432 case "hot": 336 433 337 434 "Total Number of Passages Cold Side" 338 HotSide.PressureDrop.Npassage = (2* Nchannels+1+(-1)^(Nchannels+1))/(4*NpassHot);435 HotSide.PressureDrop.Npassage = (2*Geometry.Nchannels+1+(-1)^(Geometry.Nchannels+1))/(4*Geometry.NpassHot); 339 436 340 437 "Total Number of Passages Hot Side" 341 ColdSide.PressureDrop.Npassage = (2* Nchannels-1+(-1)^(Nchannels))/(4*NpassCold);438 ColdSide.PressureDrop.Npassage = (2*Geometry.Nchannels-1+(-1)^(Geometry.Nchannels))/(4*Geometry.NpassCold); 342 439 343 440 end 344 441 345 442 "Hot Stream Mass Flux in the Channel" 346 HotSide.HeatTransfer.Gchannel=HotSide.Properties.Inlet.Fw/(HotSide.PressureDrop.Npassage* Achannel);443 HotSide.HeatTransfer.Gchannel=HotSide.Properties.Inlet.Fw/(HotSide.PressureDrop.Npassage*Geometry.Achannel); 347 444 348 445 "Hot Stream Mass Flux in the Ports" 349 HotSide.HeatTransfer.Gports=HotSide.Properties.Inlet.Fw/ Aports;446 HotSide.HeatTransfer.Gports=HotSide.Properties.Inlet.Fw/Geometry.Aports; 350 447 351 448 "Cold Stream Mass Flux in the Ports" 352 ColdSide.HeatTransfer.Gports=ColdSide.Properties.Inlet.Fw/ Aports;449 ColdSide.HeatTransfer.Gports=ColdSide.Properties.Inlet.Fw/Geometry.Aports; 353 450 354 451 "Cold Stream Mass Flux in the Channel" 355 ColdSide.HeatTransfer.Gchannel=ColdSide.Properties.Inlet.Fw/(ColdSide.PressureDrop.Npassage* Achannel);452 ColdSide.HeatTransfer.Gchannel=ColdSide.Properties.Inlet.Fw/(ColdSide.PressureDrop.Npassage*Geometry.Achannel); 356 453 357 454 "Hot Stream Pressure Drop in Ports" 358 HotSide.PressureDrop.DPports =1.5* NpassHot*HotSide.HeatTransfer.Gports^2/(2*HotSide.Properties.Average.rho);455 HotSide.PressureDrop.DPports =1.5*Geometry.NpassHot*HotSide.HeatTransfer.Gports^2/(2*HotSide.Properties.Average.rho); 359 456 360 457 "Cold Stream Pressure Drop in Ports" 361 ColdSide.PressureDrop.DPports =1.5* NpassCold*ColdSide.HeatTransfer.Gports^2/(2*ColdSide.Properties.Average.rho);458 ColdSide.PressureDrop.DPports =1.5*Geometry.NpassCold*ColdSide.HeatTransfer.Gports^2/(2*ColdSide.Properties.Average.rho); 362 459 363 460 "Hot Stream Pressure Drop in Channels" 364 HotSide.PressureDrop.DPchannel =2*HotSide.PressureDrop.fi* NpassHot*Lv*HotSide.HeatTransfer.Gchannel^2/(HotSide.Properties.Average.rho*Dh*HotSide.HeatTransfer.Phi^0.17);461 HotSide.PressureDrop.DPchannel =2*HotSide.PressureDrop.fi*Geometry.NpassHot*Geometry.Lv*HotSide.HeatTransfer.Gchannel^2/(HotSide.Properties.Average.rho*Geometry.Dh*HotSide.HeatTransfer.Phi^0.17); 365 462 366 463 "Cold Stream Pressure Drop in Channels" 367 ColdSide.PressureDrop.DPchannel =2*ColdSide.PressureDrop.fi* NpassCold*Lv*ColdSide.HeatTransfer.Gchannel^2/(ColdSide.Properties.Average.rho*Dh*ColdSide.HeatTransfer.Phi^0.17);464 ColdSide.PressureDrop.DPchannel =2*ColdSide.PressureDrop.fi*Geometry.NpassCold*Geometry.Lv*ColdSide.HeatTransfer.Gchannel^2/(ColdSide.Properties.Average.rho*Geometry.Dh*ColdSide.HeatTransfer.Phi^0.17); 368 465 369 466 "Hot Stream Total Pressure Drop" … … 379 476 if HotSide.HeatTransfer.Re < 10 380 477 then 381 HotSide.PressureDrop.fi = Kp1(1)/HotSide.HeatTransfer.Re^Kp2(1);382 ColdSide.PressureDrop.fi = Kp1(1)/ColdSide.HeatTransfer.Re^Kp2(1);478 HotSide.PressureDrop.fi = Geometry.Kp1(1)/HotSide.HeatTransfer.Re^Geometry.Kp2(1); 479 ColdSide.PressureDrop.fi = Geometry.Kp1(1)/ColdSide.HeatTransfer.Re^Geometry.Kp2(1); 383 480 else 384 481 if HotSide.HeatTransfer.Re < 100 385 482 then 386 HotSide.PressureDrop.fi = Kp1(2)/HotSide.HeatTransfer.Re^Kp2(2);387 ColdSide.PressureDrop.fi = Kp1(2)/ColdSide.HeatTransfer.Re^Kp2(2);388 else 389 HotSide.PressureDrop.fi = Kp1(3)/HotSide.HeatTransfer.Re^Kp2(3);390 ColdSide.PressureDrop.fi = Kp1(3)/ColdSide.HeatTransfer.Re^Kp2(3);483 HotSide.PressureDrop.fi = Geometry.Kp1(2)/HotSide.HeatTransfer.Re^Geometry.Kp2(2); 484 ColdSide.PressureDrop.fi = Geometry.Kp1(2)/ColdSide.HeatTransfer.Re^Geometry.Kp2(2); 485 else 486 HotSide.PressureDrop.fi = Geometry.Kp1(3)/HotSide.HeatTransfer.Re^Geometry.Kp2(3); 487 ColdSide.PressureDrop.fi = Geometry.Kp1(3)/ColdSide.HeatTransfer.Re^Geometry.Kp2(3); 391 488 end 392 489 … … 397 494 if HotSide.HeatTransfer.Re < 15 398 495 then 399 HotSide.PressureDrop.fi = Kp1(4)/HotSide.HeatTransfer.Re^Kp2(4);400 ColdSide.PressureDrop.fi = Kp1(4)/ColdSide.HeatTransfer.Re^Kp2(4);496 HotSide.PressureDrop.fi = Geometry.Kp1(4)/HotSide.HeatTransfer.Re^Geometry.Kp2(4); 497 ColdSide.PressureDrop.fi = Geometry.Kp1(4)/ColdSide.HeatTransfer.Re^Geometry.Kp2(4); 401 498 else 402 499 if HotSide.HeatTransfer.Re < 300 403 500 then 404 HotSide.PressureDrop.fi = Kp1(5)/HotSide.HeatTransfer.Re^Kp2(5);405 ColdSide.PressureDrop.fi = Kp1(5)/ColdSide.HeatTransfer.Re^Kp2(5);406 else 407 HotSide.PressureDrop.fi = Kp1(6)/HotSide.HeatTransfer.Re^Kp2(6);408 ColdSide.PressureDrop.fi = Kp1(6)/ColdSide.HeatTransfer.Re^Kp2(6);501 HotSide.PressureDrop.fi = Geometry.Kp1(5)/HotSide.HeatTransfer.Re^Geometry.Kp2(5); 502 ColdSide.PressureDrop.fi = Geometry.Kp1(5)/ColdSide.HeatTransfer.Re^Geometry.Kp2(5); 503 else 504 HotSide.PressureDrop.fi = Geometry.Kp1(6)/HotSide.HeatTransfer.Re^Geometry.Kp2(6); 505 ColdSide.PressureDrop.fi = Geometry.Kp1(6)/ColdSide.HeatTransfer.Re^Geometry.Kp2(6); 409 506 end 410 507 … … 415 512 if HotSide.HeatTransfer.Re < 20 416 513 then 417 HotSide.PressureDrop.fi = Kp1(7)/HotSide.HeatTransfer.Re^Kp2(7);418 ColdSide.PressureDrop.fi = Kp1(7)/ColdSide.HeatTransfer.Re^Kp2(7);514 HotSide.PressureDrop.fi = Geometry.Kp1(7)/HotSide.HeatTransfer.Re^Geometry.Kp2(7); 515 ColdSide.PressureDrop.fi = Geometry.Kp1(7)/ColdSide.HeatTransfer.Re^Geometry.Kp2(7); 419 516 else 420 517 if HotSide.HeatTransfer.Re < 300 421 518 then 422 HotSide.PressureDrop.fi = Kp1(8)/HotSide.HeatTransfer.Re^Kp2(8);423 ColdSide.PressureDrop.fi = Kp1(8)/ColdSide.HeatTransfer.Re^Kp2(8);424 else 425 HotSide.PressureDrop.fi = Kp1(9)/HotSide.HeatTransfer.Re^Kp2(9);426 ColdSide.PressureDrop.fi = Kp1(9)/ColdSide.HeatTransfer.Re^Kp2(9);519 HotSide.PressureDrop.fi = Geometry.Kp1(8)/HotSide.HeatTransfer.Re^Geometry.Kp2(8); 520 ColdSide.PressureDrop.fi = Geometry.Kp1(8)/ColdSide.HeatTransfer.Re^Geometry.Kp2(8); 521 else 522 HotSide.PressureDrop.fi = Geometry.Kp1(9)/HotSide.HeatTransfer.Re^Geometry.Kp2(9); 523 ColdSide.PressureDrop.fi = Geometry.Kp1(9)/ColdSide.HeatTransfer.Re^Geometry.Kp2(9); 427 524 end 428 525 … … 433 530 if HotSide.HeatTransfer.Re < 40 434 531 then 435 HotSide.PressureDrop.fi = Kp1(10)/HotSide.HeatTransfer.Re^Kp2(10);436 ColdSide.PressureDrop.fi = Kp1(10)/ColdSide.HeatTransfer.Re^Kp2(10);532 HotSide.PressureDrop.fi = Geometry.Kp1(10)/HotSide.HeatTransfer.Re^Geometry.Kp2(10); 533 ColdSide.PressureDrop.fi = Geometry.Kp1(10)/ColdSide.HeatTransfer.Re^Geometry.Kp2(10); 437 534 else 438 535 if HotSide.HeatTransfer.Re < 400 439 536 then 440 HotSide.PressureDrop.fi = Kp1(11)/HotSide.HeatTransfer.Re^Kp2(11);441 ColdSide.PressureDrop.fi = Kp1(11)/ColdSide.HeatTransfer.Re^Kp2(11);442 else 443 HotSide.PressureDrop.fi = Kp1(12)/HotSide.HeatTransfer.Re^Kp2(12);444 ColdSide.PressureDrop.fi = Kp1(12)/ColdSide.HeatTransfer.Re^Kp2(12);537 HotSide.PressureDrop.fi = Geometry.Kp1(11)/HotSide.HeatTransfer.Re^Geometry.Kp2(11); 538 ColdSide.PressureDrop.fi = Geometry.Kp1(11)/ColdSide.HeatTransfer.Re^Geometry.Kp2(11); 539 else 540 HotSide.PressureDrop.fi = Geometry.Kp1(12)/HotSide.HeatTransfer.Re^Geometry.Kp2(12); 541 ColdSide.PressureDrop.fi = Geometry.Kp1(12)/ColdSide.HeatTransfer.Re^Geometry.Kp2(12); 445 542 end 446 543 … … 451 548 if HotSide.HeatTransfer.Re < 50 452 549 then 453 HotSide.PressureDrop.fi = Kp1(13)/HotSide.HeatTransfer.Re^Kp2(13);454 ColdSide.PressureDrop.fi = Kp1(13)/ColdSide.HeatTransfer.Re^Kp2(13);550 HotSide.PressureDrop.fi = Geometry.Kp1(13)/HotSide.HeatTransfer.Re^Geometry.Kp2(13); 551 ColdSide.PressureDrop.fi = Geometry.Kp1(13)/ColdSide.HeatTransfer.Re^Geometry.Kp2(13); 455 552 else 456 553 if HotSide.HeatTransfer.Re < 500 457 554 then 458 HotSide.PressureDrop.fi = Kp1(14)/HotSide.HeatTransfer.Re^Kp2(14);459 ColdSide.PressureDrop.fi = Kp1(14)/ColdSide.HeatTransfer.Re^Kp2(14);460 else 461 HotSide.PressureDrop.fi = Kp1(15)/HotSide.HeatTransfer.Re^Kp2(15);462 ColdSide.PressureDrop.fi = Kp1(15)/ColdSide.HeatTransfer.Re^Kp2(15);555 HotSide.PressureDrop.fi = Geometry.Kp1(14)/HotSide.HeatTransfer.Re^Geometry.Kp2(14); 556 ColdSide.PressureDrop.fi = Geometry.Kp1(14)/ColdSide.HeatTransfer.Re^Geometry.Kp2(14); 557 else 558 HotSide.PressureDrop.fi = Geometry.Kp1(15)/HotSide.HeatTransfer.Re^Geometry.Kp2(15); 559 ColdSide.PressureDrop.fi = Geometry.Kp1(15)/ColdSide.HeatTransfer.Re^Geometry.Kp2(15); 463 560 end 464 561 … … 473 570 if HotSide.HeatTransfer.Re < 10 474 571 then 475 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(1)*HotSide.HeatTransfer.Re^Kc2(1))/Dh;476 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(1)*ColdSide.HeatTransfer.Re^Kc2(1))/Dh;477 else 478 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(2)*HotSide.HeatTransfer.Re^Kc2(2))/Dh;479 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(2)*ColdSide.HeatTransfer.Re^Kc2(2))/Dh;572 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(1)*HotSide.HeatTransfer.Re^Geometry.Kc2(1))/Geometry.Dh; 573 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(1)*ColdSide.HeatTransfer.Re^Geometry.Kc2(1))/Geometry.Dh; 574 else 575 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(2)*HotSide.HeatTransfer.Re^Geometry.Kc2(2))/Geometry.Dh; 576 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(2)*ColdSide.HeatTransfer.Re^Geometry.Kc2(2))/Geometry.Dh; 480 577 end 481 578 … … 484 581 if HotSide.HeatTransfer.Re < 10 485 582 then 486 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(3)*HotSide.HeatTransfer.Re^Kc2(3))/Dh;487 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(3)*ColdSide.HeatTransfer.Re^Kc2(3))/Dh;583 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(3)*HotSide.HeatTransfer.Re^Geometry.Kc2(3))/Geometry.Dh; 584 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(3)*ColdSide.HeatTransfer.Re^Geometry.Kc2(3))/Geometry.Dh; 488 585 else 489 586 if HotSide.HeatTransfer.Re < 100 490 587 then 491 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(4)*HotSide.HeatTransfer.Re^Kc2(4))/Dh;492 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(4)*ColdSide.HeatTransfer.Re^Kc2(4))/Dh;493 else 494 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(5)*HotSide.HeatTransfer.Re^Kc2(5))/Dh;495 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(5)*ColdSide.HeatTransfer.Re^Kc2(5))/Dh;588 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(4)*HotSide.HeatTransfer.Re^Geometry.Kc2(4))/Geometry.Dh; 589 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(4)*ColdSide.HeatTransfer.Re^Geometry.Kc2(4))/Geometry.Dh; 590 else 591 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(5)*HotSide.HeatTransfer.Re^Geometry.Kc2(5))/Geometry.Dh; 592 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(5)*ColdSide.HeatTransfer.Re^Geometry.Kc2(5))/Geometry.Dh; 496 593 end 497 594 end … … 501 598 if HotSide.HeatTransfer.Re < 20 502 599 then 503 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(6)*HotSide.HeatTransfer.Re^Kc2(6))/Dh;504 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(6)*ColdSide.HeatTransfer.Re^Kc2(6))/Dh;600 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(6)*HotSide.HeatTransfer.Re^Geometry.Kc2(6))/Geometry.Dh; 601 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(6)*ColdSide.HeatTransfer.Re^Geometry.Kc2(6))/Geometry.Dh; 505 602 else 506 603 if HotSide.HeatTransfer.Re < 300 507 604 then 508 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(7)*HotSide.HeatTransfer.Re^Kc2(7))/Dh;509 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(7)*ColdSide.HeatTransfer.Re^Kc2(7))/Dh;510 else 511 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(8)*HotSide.HeatTransfer.Re^Kc2(8))/Dh;512 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(8)*ColdSide.HeatTransfer.Re^Kc2(8))/Dh;605 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(7)*HotSide.HeatTransfer.Re^Geometry.Kc2(7))/Geometry.Dh; 606 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(7)*ColdSide.HeatTransfer.Re^Geometry.Kc2(7))/Geometry.Dh; 607 else 608 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(8)*HotSide.HeatTransfer.Re^Geometry.Kc2(8))/Geometry.Dh; 609 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(8)*ColdSide.HeatTransfer.Re^Geometry.Kc2(8))/Geometry.Dh; 513 610 end 514 611 end … … 518 615 if HotSide.HeatTransfer.Re < 20 519 616 then 520 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(9)*HotSide.HeatTransfer.Re^Kc2(9))/Dh;521 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(9)*ColdSide.HeatTransfer.Re^Kc2(9))/Dh;617 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(9)*HotSide.HeatTransfer.Re^Geometry.Kc2(9))/Geometry.Dh; 618 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(9)*ColdSide.HeatTransfer.Re^Geometry.Kc2(9))/Geometry.Dh; 522 619 else 523 620 if HotSide.HeatTransfer.Re < 400 524 621 then 525 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(10)*HotSide.HeatTransfer.Re^Kc2(10))/Dh;526 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(10)*ColdSide.HeatTransfer.Re^Kc2(10))/Dh;527 else 528 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(11)*HotSide.HeatTransfer.Re^Kc2(11))/Dh;529 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(11)*ColdSide.HeatTransfer.Re^Kc2(11))/Dh;622 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(10)*HotSide.HeatTransfer.Re^Geometry.Kc2(10))/Geometry.Dh; 623 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(10)*ColdSide.HeatTransfer.Re^Geometry.Kc2(10))/Geometry.Dh; 624 else 625 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(11)*HotSide.HeatTransfer.Re^Geometry.Kc2(11))/Geometry.Dh; 626 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(11)*ColdSide.HeatTransfer.Re^Geometry.Kc2(11))/Geometry.Dh; 530 627 end 531 628 end … … 535 632 if HotSide.HeatTransfer.Re < 20 536 633 then 537 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(12)*HotSide.HeatTransfer.Re^Kc2(12))/Dh;538 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(12)*ColdSide.HeatTransfer.Re^Kc2(12))/Dh;634 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(12)*HotSide.HeatTransfer.Re^Geometry.Kc2(12))/Geometry.Dh; 635 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(12)*ColdSide.HeatTransfer.Re^Geometry.Kc2(12))/Geometry.Dh; 539 636 else 540 637 if HotSide.HeatTransfer.Re < 500 541 638 then 542 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(13)*HotSide.HeatTransfer.Re^Kc2(13))/Dh;543 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(13)*ColdSide.HeatTransfer.Re^Kc2(13))/Dh;544 else 545 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17* Kc1(14)*HotSide.HeatTransfer.Re^Kc2(14))/Dh;546 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17* Kc1(14)*ColdSide.HeatTransfer.Re^Kc2(14))/Dh;639 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(13)*HotSide.HeatTransfer.Re^Geometry.Kc2(13))/Geometry.Dh; 640 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(13)*ColdSide.HeatTransfer.Re^Geometry.Kc2(13))/Geometry.Dh; 641 else 642 HotSide.HeatTransfer.hcoeff=(HotSide.Properties.Average.K*HotSide.HeatTransfer.PR^(1/3)*HotSide.HeatTransfer.Phi^0.17*Geometry.Kc1(14)*HotSide.HeatTransfer.Re^Geometry.Kc2(14))/Geometry.Dh; 643 ColdSide.HeatTransfer.hcoeff =(ColdSide.Properties.Average.K*ColdSide.HeatTransfer.PR^(1/3)*ColdSide.HeatTransfer.Phi^0.17*Geometry.Kc1(14)*ColdSide.HeatTransfer.Re^Geometry.Kc2(14))/Geometry.Dh; 547 644 end 548 645 end … … 557 654 558 655 "Hot Stream Velocity in Ports" 559 HotSide.PressureDrop.Vports =HotSide.Properties.Inlet.Fw/( Aports*HotSide.Properties.Inlet.rho);656 HotSide.PressureDrop.Vports =HotSide.Properties.Inlet.Fw/(Geometry.Aports*HotSide.Properties.Inlet.rho); 560 657 561 658 "Cold Stream Velocity in Ports" 562 ColdSide.PressureDrop.Vports =ColdSide.Properties.Inlet.Fw/( Aports*ColdSide.Properties.Inlet.rho);659 ColdSide.PressureDrop.Vports =ColdSide.Properties.Inlet.Fw/(Geometry.Aports*ColdSide.Properties.Inlet.rho); 563 660 564 661 "Hot Stream Reynolds Number" 565 HotSide.HeatTransfer.Re = Dh*HotSide.HeatTransfer.Gchannel/HotSide.Properties.Average.Mu;662 HotSide.HeatTransfer.Re =Geometry.Dh*HotSide.HeatTransfer.Gchannel/HotSide.Properties.Average.Mu; 566 663 567 664 "Cold Stream Reynolds Number" 568 ColdSide.HeatTransfer.Re = Dh*ColdSide.HeatTransfer.Gchannel/ColdSide.Properties.Average.Mu;665 ColdSide.HeatTransfer.Re =Geometry.Dh*ColdSide.HeatTransfer.Gchannel/ColdSide.Properties.Average.Mu; 569 666 570 667 "Hot Stream Prandtl Number" … … 587 684 588 685 "Overall Heat Transfer Coefficient Clean" 589 Thermal.Uc/HotSide.HeatTransfer.hcoeff +Thermal.Uc* pt/Kwall+Thermal.Uc/ColdSide.HeatTransfer.hcoeff=1;686 Thermal.Uc/HotSide.HeatTransfer.hcoeff +Thermal.Uc*Geometry.pt/Geometry.Kwall+Thermal.Uc/ColdSide.HeatTransfer.hcoeff=1; 590 687 591 688 "Overall Heat Transfer Coefficient Dirty" 592 Thermal.Ud*(1/HotSide.HeatTransfer.hcoeff + pt/Kwall+1/ColdSide.HeatTransfer.hcoeff + Rfc +Rfh)=1;689 Thermal.Ud*(1/HotSide.HeatTransfer.hcoeff +Geometry.pt/Geometry.Kwall+1/ColdSide.HeatTransfer.hcoeff + Geometry.Rfc + Geometry.Rfh)=1; 593 690 594 691 "Duty" … … 614 711 615 712 "Number of Units Transference for Hot Side" 616 HotSide.HeatTransfer.NTU*HotSide.HeatTransfer.WCp = Thermal.Ud* Atotal;713 HotSide.HeatTransfer.NTU*HotSide.HeatTransfer.WCp = Thermal.Ud*Geometry.Atotal; 617 714 618 715 "Number of Units Transference for Cold Side" 619 ColdSide.HeatTransfer.NTU*ColdSide.HeatTransfer.WCp = Thermal.Ud* Atotal;716 ColdSide.HeatTransfer.NTU*ColdSide.HeatTransfer.WCp = Thermal.Ud*Geometry.Atotal; 620 717 621 718 if Thermal.Eft >= 1 #To be Fixed: Effectiveness in true counter flow ! -
trunk/eml/streams.mso
r501 r523 38 38 T as temperature (Brief = "Stream Temperature"); 39 39 P as pressure (Brief = "Stream Pressure"); 40 z(NComp) as fraction (Brief = "Stream Molar Fraction");41 40 h as enth_mol (Brief = "Stream Enthalpy"); 42 41 v as fraction (Brief = "Vapourization fraction"); 42 z(NComp) as fraction (Brief = "Stream Molar Fraction"); 43 43 end 44 44 -
trunk/sample/heat_exchangers/PHE_diagram.pfd
r439 r523 28 28 <Show_Grid>1</Show_Grid> 29 29 <Snap_to_Grid>1</Snap_to_Grid> 30 <Width> 993</Width>31 <Height> 312</Height>30 <Width>1031</Width> 31 <Height>569</Height> 32 32 <X>0</X> 33 33 <Y>0</Y> … … 37 37 <Show_Grid>1</Show_Grid> 38 38 <Snap_to_Grid>1</Snap_to_Grid> 39 <Width> 993</Width>39 <Width>1031</Width> 40 40 <Height>0</Height> 41 41 <X>0</X> … … 46 46 <Id_String>simple_sink_1</Id_String> 47 47 <Block_Name>hot_out</Block_Name> 48 <Image_File_Name>/ home/bicca/Desktop/biblioteca/biblioteca/trunk/eml/icon/Sink.png</Image_File_Name>48 <Image_File_Name>/media/sdb5/gerson/projetos/repositorio/biblioteca/trunk/eml/icon/Sink.png</Image_File_Name> 49 49 <X>633</X> 50 50 <Y>61</Y> … … 93 93 <Id_String>simple_sink_2</Id_String> 94 94 <Block_Name>cold_out</Block_Name> 95 <Image_File_Name>/ home/bicca/Desktop/biblioteca/biblioteca/trunk/eml/icon/Sink.png</Image_File_Name>95 <Image_File_Name>/media/sdb5/gerson/projetos/repositorio/biblioteca/trunk/eml/icon/Sink.png</Image_File_Name> 96 96 <X>638</X> 97 97 <Y>216</Y> … … 140 140 <Id_String>PHE_1</Id_String> 141 141 <Block_Name>PlateAndFrame</Block_Name> 142 <Image_File_Name>/ home/bicca/Desktop/biblioteca/biblioteca/trunk/eml/heat_exchangers/icon/phe.png</Image_File_Name>142 <Image_File_Name>/media/sdb5/gerson/projetos/repositorio/biblioteca/trunk/eml/heat_exchangers/icon/phe.png</Image_File_Name> 143 143 <X>318</X> 144 144 <Y>92</Y> … … 151 151 <Base_Models> 152 152 <Block_Properties> 153 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 154 <Instance_Id>Geometry.</Instance_Id> 155 <Model_Name>PHE_Geometry</Model_Name> 156 <T_Connection>0</T_Connection> 157 <Parameters> 158 <Desc>Geometry.Lv</Desc> 159 <Index>0</Index> 160 <Values>155</Values> 161 <Status>4</Status> 162 <Unit>cm</Unit> 163 </Parameters> 164 <Parameters> 165 <Desc>Geometry.Nplates</Desc> 166 <Index>0</Index> 167 <Values>129</Values> 168 <Status>4</Status> 169 </Parameters> 170 <Parameters> 171 <Desc>Geometry.NpassHot</Desc> 172 <Index>0</Index> 173 <Values>2</Values> 174 <Status>4</Status> 175 </Parameters> 176 <Parameters> 177 <Desc>Geometry.NpassCold</Desc> 178 <Index>0</Index> 179 <Values>2</Values> 180 <Status>4</Status> 181 </Parameters> 182 <Parameters> 183 <Desc>Geometry.Dports</Desc> 184 <Index>0</Index> 185 <Values>15</Values> 186 <Status>4</Status> 187 <Unit>cm</Unit> 188 </Parameters> 189 <Parameters> 190 <Desc>Geometry.Lw</Desc> 191 <Index>0</Index> 192 <Values>70</Values> 193 <Status>4</Status> 194 <Unit>cm</Unit> 195 </Parameters> 196 <Parameters> 197 <Desc>Geometry.pitch</Desc> 198 <Index>0</Index> 199 <Values>3.7</Values> 200 <Status>4</Status> 201 <Unit>mm</Unit> 202 </Parameters> 203 <Parameters> 204 <Desc>Geometry.pt</Desc> 205 <Index>0</Index> 206 <Values>0.70</Values> 207 <Status>4</Status> 208 <Unit>mm</Unit> 209 </Parameters> 210 <Parameters> 211 <Desc>Geometry.Kwall</Desc> 212 <Index>0</Index> 213 <Values>17</Values> 214 <Status>4</Status> 215 <Unit>W/m/K</Unit> 216 </Parameters> 217 <Parameters> 218 <Desc>Geometry.Rfh</Desc> 219 <Index>0</Index> 220 <Values>0</Values> 221 <Status>4</Status> 222 <Unit>m^2*K/kW</Unit> 223 </Parameters> 224 <Parameters> 225 <Desc>Geometry.Rfc</Desc> 226 <Index>0</Index> 227 <Values>0</Values> 228 <Status>4</Status> 229 <Unit>m^2*K/kW</Unit> 230 </Parameters> 231 <Parameters> 232 <Desc>Geometry.PhiFactor</Desc> 233 <Index>0</Index> 234 <Values>1.17</Values> 235 <Status>4</Status> 236 </Parameters> 237 </Block_Properties> 238 </Base_Models> 239 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 240 <Instance_Id>Geometry.</Instance_Id> 241 <Model_Name>Geometry</Model_Name> 242 <T_Connection>0</T_Connection> 243 </Block_Properties> 244 </Sub_Models> 245 <Sub_Models> 246 <Block_Properties> 247 <Base_Models> 248 <Block_Properties> 153 249 <Model_File_Path>streams</Model_File_Path> 154 250 <Instance_Id>InletHot.</Instance_Id> 155 251 <Model_Name>stream</Model_Name> 156 252 <T_Connection>1</T_Connection> 157 <Variables>158 <Desc>InletHot.F</Desc>159 <Index>0</Index>160 <Values>820.489</Values>161 <Status>3</Status>162 <Unit>kmol/h</Unit>163 </Variables>164 <Variables>165 <Desc>InletHot.T</Desc>166 <Index>0</Index>167 <Values>360</Values>168 <Status>3</Status>169 <Unit>K</Unit>170 </Variables>171 <Variables>172 <Desc>InletHot.P</Desc>173 <Index>0</Index>174 <Values>2</Values>175 <Status>3</Status>176 <Unit>atm</Unit>177 </Variables>178 253 <Variables> 179 254 <Desc>InletHot.z</Desc> … … 185 260 <Status>3</Status> 186 261 </Variables> 187 <Variables>188 <Desc>InletHot.h</Desc>189 <Index>0</Index>190 <Values>-27533</Values>191 <Status>3</Status>192 <Unit>kJ/kmol</Unit>193 </Variables>194 <Variables>195 <Desc>InletHot.v</Desc>196 <Index>0</Index>197 <Values>0</Values>198 <Status>3</Status>199 </Variables>200 262 </Block_Properties> 201 263 </Base_Models> … … 214 276 <Model_Name>stream</Model_Name> 215 277 <T_Connection>1</T_Connection> 216 <Variables>217 <Desc>InletCold.F</Desc>218 <Index>0</Index>219 <Values>2903.47</Values>220 <Status>3</Status>221 <Unit>kmol/h</Unit>222 </Variables>223 <Variables>224 <Desc>InletCold.T</Desc>225 <Index>0</Index>226 <Values>293</Values>227 <Status>3</Status>228 <Unit>K</Unit>229 </Variables>230 <Variables>231 <Desc>InletCold.P</Desc>232 <Index>0</Index>233 <Values>2</Values>234 <Status>3</Status>235 <Unit>atm</Unit>236 </Variables>237 278 <Variables> 238 279 <Desc>InletCold.z</Desc> … … 244 285 <Status>3</Status> 245 286 </Variables> 246 <Variables>247 <Desc>InletCold.h</Desc>248 <Index>0</Index>249 <Values>-33442.8</Values>250 <Status>3</Status>251 <Unit>kJ/kmol</Unit>252 </Variables>253 <Variables>254 <Desc>InletCold.v</Desc>255 <Index>0</Index>256 <Values>0</Values>257 <Status>3</Status>258 </Variables>259 287 </Block_Properties> 260 288 </Base_Models> … … 321 349 <Base_Models> 322 350 <Block_Properties> 323 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>351 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 324 352 <Instance_Id>HotSide.HeatTransfer.</Instance_Id> 325 353 <Model_Name>PHE_HeatTransfer</Model_Name> 326 354 <T_Connection>0</T_Connection> 327 <Variables> 328 <Desc>HotSide.HeatTransfer.Phi</Desc> 329 <Index>0</Index> 330 <Values>1</Values> 331 <Status>3</Status> 332 </Variables> 333 </Block_Properties> 334 </Base_Models> 335 <Model_File_Path>heat_exchangers/HEX_Engine</Model_File_Path> 355 </Block_Properties> 356 </Base_Models> 357 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 336 358 <Instance_Id>HotSide.HeatTransfer.</Instance_Id> 337 359 <Model_Name>HeatTransfer</Model_Name> … … 343 365 <Base_Models> 344 366 <Block_Properties> 345 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>367 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 346 368 <Instance_Id>HotSide.PressureDrop.</Instance_Id> 347 369 <Model_Name>PHE_PressureDrop</Model_Name> … … 349 371 </Block_Properties> 350 372 </Base_Models> 351 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>373 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 352 374 <Instance_Id>HotSide.PressureDrop.</Instance_Id> 353 375 <Model_Name>PressureDrop</Model_Name> … … 429 451 </Block_Properties> 430 452 </Base_Models> 431 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>453 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 432 454 <Instance_Id>HotSide.Properties.</Instance_Id> 433 455 <Model_Name>Properties</Model_Name> … … 435 457 </Block_Properties> 436 458 </Sub_Models> 437 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>459 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 438 460 <Instance_Id>HotSide.</Instance_Id> 439 461 <Model_Name>Main_PHE</Model_Name> … … 455 477 <Base_Models> 456 478 <Block_Properties> 457 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>479 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 458 480 <Instance_Id>ColdSide.HeatTransfer.</Instance_Id> 459 481 <Model_Name>PHE_HeatTransfer</Model_Name> 460 482 <T_Connection>0</T_Connection> 461 <Variables> 462 <Desc>ColdSide.HeatTransfer.Phi</Desc> 463 <Index>0</Index> 464 <Values>1</Values> 465 <Status>3</Status> 466 </Variables> 467 </Block_Properties> 468 </Base_Models> 469 <Model_File_Path>heat_exchangers/HEX_Engine</Model_File_Path> 483 </Block_Properties> 484 </Base_Models> 485 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 470 486 <Instance_Id>ColdSide.HeatTransfer.</Instance_Id> 471 487 <Model_Name>HeatTransfer</Model_Name> … … 477 493 <Base_Models> 478 494 <Block_Properties> 479 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>495 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 480 496 <Instance_Id>ColdSide.PressureDrop.</Instance_Id> 481 497 <Model_Name>PHE_PressureDrop</Model_Name> … … 483 499 </Block_Properties> 484 500 </Base_Models> 485 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>501 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 486 502 <Instance_Id>ColdSide.PressureDrop.</Instance_Id> 487 503 <Model_Name>PressureDrop</Model_Name> … … 563 579 </Block_Properties> 564 580 </Base_Models> 565 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>581 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 566 582 <Instance_Id>ColdSide.Properties.</Instance_Id> 567 583 <Model_Name>Properties</Model_Name> … … 569 585 </Block_Properties> 570 586 </Sub_Models> 571 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>587 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 572 588 <Instance_Id>ColdSide.</Instance_Id> 573 589 <Model_Name>Main_PHE</Model_Name> … … 585 601 <Base_Models> 586 602 <Block_Properties> 587 <Model_File_Path>heat_exchangers/ HEX_Engine</Model_File_Path>603 <Model_File_Path>heat_exchangers/PHE</Model_File_Path> 588 604 <Instance_Id>Thermal.</Instance_Id> 589 605 <Model_Name>Thermal_PHE</Model_Name> 590 606 <T_Connection>0</T_Connection> 591 <Variables>592 <Desc>Thermal.Eft</Desc>593 <Index>0</Index>594 <Values>0.98</Values>595 <Status>3</Status>596 </Variables>597 607 </Block_Properties> 598 608 </Base_Models> … … 610 620 <Desc>ChevronAngle</Desc> 611 621 <Index>0</Index> 612 <Values>A 45_Deg</Values>622 <Values>A30_Deg</Values> 613 623 <Status>4</Status> 614 624 </Parameters> … … 618 628 <Values>cold</Values> 619 629 <Status>4</Status> 620 </Parameters>621 <Parameters>622 <Desc>Nplates</Desc>623 <Index>0</Index>624 <Values>129</Values>625 <Status>4</Status>626 </Parameters>627 <Parameters>628 <Desc>NpassHot</Desc>629 <Index>0</Index>630 <Values>2</Values>631 <Status>4</Status>632 </Parameters>633 <Parameters>634 <Desc>NpassCold</Desc>635 <Index>0</Index>636 <Values>2</Values>637 <Status>4</Status>638 </Parameters>639 <Parameters>640 <Desc>Dports</Desc>641 <Index>0</Index>642 <Values>15</Values>643 <Status>4</Status>644 <Unit>cm</Unit>645 </Parameters>646 <Parameters>647 <Desc>PhiFactor</Desc>648 <Index>0</Index>649 <Values>1.17</Values>650 <Status>4</Status>651 </Parameters>652 <Parameters>653 <Desc>Lv</Desc>654 <Index>0</Index>655 <Values>155</Values>656 <Status>4</Status>657 <Unit>cm</Unit>658 </Parameters>659 <Parameters>660 <Desc>Lw</Desc>661 <Index>0</Index>662 <Values>70</Values>663 <Status>4</Status>664 <Unit>cm</Unit>665 </Parameters>666 <Parameters>667 <Desc>pitch</Desc>668 <Index>0</Index>669 <Values>3.7</Values>670 <Status>4</Status>671 <Unit>mm</Unit>672 </Parameters>673 <Parameters>674 <Desc>pt</Desc>675 <Index>0</Index>676 <Values>0.70</Values>677 <Status>4</Status>678 <Unit>mm</Unit>679 </Parameters>680 <Parameters>681 <Desc>Kwall</Desc>682 <Index>0</Index>683 <Values>17</Values>684 <Status>4</Status>685 <Unit>W/m/K</Unit>686 </Parameters>687 <Parameters>688 <Desc>Rfh</Desc>689 <Index>0</Index>690 <Values>9e-6</Values>691 <Status>4</Status>692 <Unit>m^2*K/W</Unit>693 </Parameters>694 <Parameters>695 <Desc>Rfc</Desc>696 <Index>0</Index>697 <Values>3.4e-5</Values>698 <Status>4</Status>699 <Unit>m^2*K/W</Unit>700 630 </Parameters> 701 631 </Block_Properties> … … 705 635 <Id_String>simple_source_1</Id_String> 706 636 <Block_Name>cold_in</Block_Name> 707 <Image_File_Name>/ home/bicca/Desktop/biblioteca/biblioteca/trunk/eml/icon/Source.png</Image_File_Name>637 <Image_File_Name>/media/sdb5/gerson/projetos/repositorio/biblioteca/trunk/eml/icon/Source.png</Image_File_Name> 708 638 <X>25</X> 709 639 <Y>31</Y> … … 768 698 <Id_String>simple_source_2</Id_String> 769 699 <Block_Name>hot_in</Block_Name> 770 <Image_File_Name>/ home/bicca/Desktop/biblioteca/biblioteca/trunk/eml/icon/Source.png</Image_File_Name>700 <Image_File_Name>/media/sdb5/gerson/projetos/repositorio/biblioteca/trunk/eml/icon/Source.png</Image_File_Name> 771 701 <X>29</X> 772 702 <Y>211</Y> -
trunk/sample/heat_exchangers/Sample_PHE.mso
r387 r523 54 54 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 55 55 exchanger.ChevronAngle = "A60_Deg"; 56 exchanger. Nplates = 129;57 exchanger. NpassHot = 4;58 exchanger. NpassCold = 2;59 exchanger. Dports = 15*'cm';60 exchanger. PhiFactor = 1.17;61 exchanger. Lv = 155*'cm';62 exchanger. Lw = 70*'cm';63 exchanger. pitch = 3.7*'mm';64 exchanger. pt = 0.70*'mm';65 exchanger. Kwall = 17 *'W/m/K';56 exchanger.Geometry.Nplates = 129; 57 exchanger.Geometry.NpassHot = 4; 58 exchanger.Geometry.NpassCold = 2; 59 exchanger.Geometry.Dports = 15*'cm'; 60 exchanger.Geometry.PhiFactor = 1.17; 61 exchanger.Geometry.Lv = 155*'cm'; 62 exchanger.Geometry.Lw = 70*'cm'; 63 exchanger.Geometry.pitch = 3.7*'mm'; 64 exchanger.Geometry.pt = 0.70*'mm'; 65 exchanger.Geometry.Kwall = 17 *'W/m/K'; 66 66 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 67 67 # Fouling 68 68 #++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 69 exchanger. Rfc= 3.4e-5*'m^2*K/W';70 exchanger. Rfh = 9e-6*'m^2*K/W';69 exchanger.Geometry.Rfc= 3.4e-5*'m^2*K/W'; 70 exchanger.Geometry.Rfh = 9e-6*'m^2*K/W'; 71 71 72 72 SPECIFY
Note: See TracChangeset
for help on using the changeset viewer.
