.TRANSFORM.HeatAndMassTransfer.ClosureRelations.HeatTransfer.Functions.TwoPhase.CHF.EPRI_flux

Information

Prediction of the critical heat flux using the EPRI correlation as presented in 1982 EPRI Parametric Study of CHF Data Vol. 1-3

"Outputs"

CHF_EPRI => Critical heat flux predicted by EPRI [kW/m^2]

CHF_EPRI_Avg => Average heat flux based on total heater power [kW/m^2]

L_EPRI => Location of CHF event [m]

x_EPRI_local => quality at location of predicted CHF [-]

"Inputs"

G => mass flux per subchannel [kg/m^2s]

A_heated => total heated area per heater element [m^2]

A_test => flow area per subchannel [m^2]

L_heated => heated length per heater element [m]

x_in => inlet quality [-]

h_fg => latent heat of vaporization [J/kg]

Pr => reduced pressure [-]

K_g => grid spacer pressure loss coefficient [-]. Set default K_g = 1.

cwall toggels cold wall effect correction factor -> 1/0 = on/off

nu toggels nonuniform heat flux effect correction factor -> 1/0 = on/off

toggle_vis => toggle visibility of the convergence plot. 'on'/'off'

Interface

function EPRI_flux
  input SI.HeatFlux q_flux "Local heat flux";
  input SI.HeatFlux q_avg "Average heat flux";
  input Real x_th "Local thermodynamic quality";
  input SIadd.MassFlux G "Mass flux";
  input Real x_th_in "Thermodynamic quality at inlet";
  input SI.Pressure P_red "Reduced pressure (i.e., P/P_crit)";
  input SIadd.NonDim K_g = 1.0 "Grid spacer pressure loss coefficient";
  input Boolean cwall = false "=true to use cold wall correction factor";
  input Boolean nu = false "=true to use nonuniform heat flux correction factor";
  output SI.HeatFlux CHF "Critical heat flux prediction";
end EPRI_flux;