Density in steam region for given pressure and specific enthalpy
function d2_Ph input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEnthalpy h "Specific enthalpy"; output Units.SI.Density d "Density"; end d2_Ph;