function tsat extends Modelica.Icons.Function; input SI.Pressure p "Pressure"; output SI.Temperature t_sat "Temperature"; end tsat;