Saturation vapor pressure dependent on temperature
function p_sat input Modelica.Units.SI.Temperature T; output Modelica.Units.SI.Pressure value; end p_sat;