Function that calculates the pressure of saturated vapor based on temperature
function pressureSatVap_T input Modelica.Units.SI.Temperature T "Temperature of refrigerant"; output Modelica.Units.SI.AbsolutePressure p "Pressure of saturated refrigerant vapor"; end pressureSatVap_T;