function dd2ps_Ps input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEntropy s "Specific entropy"; output Units.SI.DerDensityByPressure ddps "Derivative of density wrt. pressure at constant specific entropy"; end dd2ps_Ps;