function dh2ps_Ps input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEntropy s "Specific entropy"; output Real dhps "Derivative of specific enthalpy wrt. pressure at constant specific entropy"; end dh2ps_Ps;