Specific entropy at vapor saturation for given pressure
function s2sat_P input Units.SI.Pressure p "pressure"; output Units.SI.SpecificEntropy s "specific entropy"; end s2sat_P;