This function computes the specific enthalpy in two-phase for R134a
depending on the inputs for absolute pressure and specific entropy.
It makes use of cubic spline functions for liquid and vapor
specific enthalpy as well as specific entropy.
function hofpsTwoPhase
extends Modelica.Icons.Function;
input AbsolutePressure p "Pressure";
input SpecificEntropy s "Specific entropy";
output SpecificEnthalpy h "Specific enthalpy";
end hofpsTwoPhase;