Calculation of the mean convective heat transfer coefficient kc for a developed turbulent fluid flow through an even gap at heat transfer from both sides. Note that additionally a failure status is observed in this function to check if the intended boundary conditions are fulfilled. See more information.
function kc_evenGapTurbulent extends Modelica.Icons.Function; import MIN = Modelica.Constants.eps; input Modelica.Fluid.Dissipation.HeatTransfer.Channel.kc_evenGapTurbulent_IN_con IN_con "Input record for function kc_evenGapTurbulent" annotation( Dialog(group = "Constant inputs")); input Modelica.Fluid.Dissipation.HeatTransfer.Channel.kc_evenGapTurbulent_IN_var IN_var "Input record for function kc_evenGapTurbulent" annotation( Dialog(group = "Variable inputs")); output SI.CoefficientOfHeatTransfer kc "Convective heat transfer coefficient" annotation( Dialog(group = "Output")); output SI.PrandtlNumber Pr "Prandtl number" annotation( Dialog(group = "Output")); output SI.ReynoldsNumber Re "Reynolds number" annotation( Dialog(group = "Output")); output SI.NusseltNumber Nu "Nusselt number" annotation( Dialog(group = "Output")); output Real failureStatus "0== boundary conditions fulfilled | 1== failure >> check if still meaningful results" annotation( Dialog(group = "Output")); end kc_evenGapTurbulent;