Contents - Index


FC_Horizontal_Cylinder_Bank

 

 

Procedure FC_Horizontal_Cylinder_Bank(Fluid$, T_s, T_infinity, P, D, S, N : h, Nusselt, Ra) returns the heat transfer coefficient, Nusselt number, and Raleigh number associated with free convection for a vertically aligned bank of horizontal cylinders.  

 

The correlation that is used is from Kitmura et al. (2016).  The procedure computes the ratio of the Nusselt number for the Nth cylinder from the bottom of a heated bank (or from the top of a cooled bank) relative to the first cylinder and then applies this ratio to the Nusselt number calculated for a single horizontal cylinder in free convection using the procedure FC_horizontal_cylinder_ND.  In this way the results are consistent with the single cylinder results as N goes to 1.  In addition to the heat transfer coefficient, the procedure returns the Nusselt number (based on diameter) and Raleigh number (based on diameter and temperature difference).  These dimensionless numbers are therefore consistent with those used in other procedures for free convection even though the definitions found in Kimura et al. (2016) are different.

 

Inputs:

Fluid$ - string name of any fluid in the EES database. The fluid can be an ideal gas or a real fluid (but not a brine).

T_s - surface temperature of the plate in [C], [K], [F], or [R].

T_infinity - bulk temperature of the fluid in [C], [K], [F], or [R].

P -  ambient pressure in [Pa], [kPa], [bar], [MPa], [atm], or [psia]

D - diameter of the cylinder [m] or [ft]

S - center-to-center distance between cylinders [m] or [ft]

N - number of cylinder (1 = bottom for heated or top for cooled)

 

Outputs:

hc - heat transfer coefficient in [W/m^2-K] or [Btu/hr-ft^2-R]

Nusselt - Nusselt number based on cylinder diameter [-]

Ra - Raleigh number based on DT and cylinder diameter [-]

 

Example: 

$UnitSystem SI Mass J C kPa

$VarInfo D S Units = 'm'

$VarInfo T_s T_infinity Units = 'C'

$VarInfo P Units = 'kPa'

$VarInfo h Units='W/m^2-K'

 

Fluid$ = 'Water'

D = 3 [mm]*Convert(mm,m)

S = 10 [mm]*Convert(mm,m)

N = 5

T_s = 25 [C]

T_infinity = 20 [C]

P = Po#

 

CALL FC_Horizontal_Cylinder_Bank(Fluid$, T_s, T_infinity, P, D, S, N : h, Nusselt, Ra)

 

{Solution:

h=568.6 [W/m^2-K]

Nusselt=2.832 

Ra=2258}

 

 

Free Convection Index