Function to calculate some extra thermophysical properties in regions 1, 2, 3 and 5 as f(p,h)
function extraDerivs_ph extends Modelica.Icons.Function; input SI.Pressure p "Pressure"; input SI.SpecificEnthalpy h "Specific enthalpy"; input Integer phase = 0 "Phase: 2 for two-phase, 1 for one phase, 0 if unknown"; output Modelica.Media.Common.ExtraDerivatives dpro "Thermodynamic property collection"; end extraDerivs_ph;