isentropic specific enthalpy from p,s (preferably use water_hisentropic_dyn in dynamic simulation!)
function water_hisentropic import ThermoSysPro; extends Modelica.Icons.Function; input Units.SI.Pressure p "pressure"; input Units.SI.SpecificEntropy s "specific entropy"; input Integer phase = 0 "phase: 2 for two-phase, 1 for one phase, 0 if unknown"; output Units.SI.SpecificEnthalpy h "specific enthalpy"; end water_hisentropic;