Saturation pressure (psat) as a function of temperature
function p_sat
extends Modelica.Icons.Function;
input Q.TemperatureAbsolute T "Temperature" annotation(
Dialog(__Dymola_label = "<html><i>T</i></html>"));
output Q.PressureAbsolute p_sat "Saturation pressure" annotation(
Dialog(__Dymola_label = "<html><i>p</i><sub>sat</sub></html>"));
end p_sat;