This function computes the number of phases for R1234yf depending
on the inputs for absolute pressure and specific entropy. It makes
use of cubic spline functions for liquid and vapor specific
entropy.
function getPhase_ps
extends Modelica.Icons.Function;
input Modelica.Units.SI.Pressure p "pressure";
input Modelica.Units.SI.SpecificEntropy s "specific entropy";
output Integer phase "number of phases";
end getPhase_ps;