Derivative of specific entropy wrt. pressure at liquid saturation for given pressure
function ds1satp_P input Units.SI.Pressure p "pressure"; output Real dsp(unit = "m3/(kg.K)") "derivative of entropy"; end ds1satp_P;