Derivative of temperature wrt. specific enthalpy at constant pressure in vapor region for given pressure and specific enthalpy
function dT2hp_Ph input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEnthalpy h "Specific enthalpy"; output Real dThp "Derivative of temperature wrt. specific enthalpy at constant pressure"; end dT2hp_Ph;