Specific enthalpy in vapor region for given pressure and temperature
function h2_PT input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.Temperature T "Temperature"; output Units.SI.SpecificEnthalpy h "Specific enthalpy"; end h2_PT;