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;