returns pressure for given T and s
function pressure_Ts extends Modelica.Icons.Function; input Temperature T "Temperature"; input SpecificEntropy s "Specific entropy"; input FixedPhase phase = 0 "2 for two-phase, 1 for one-phase, 0 if not known"; output AbsolutePressure p "Pressure"; end pressure_Ts;