## Copyright © EDF 2002 - 2025 ## ThermoSysPro Version 4.2
function psat extends Modelica.Icons.Function; input Units.SI.Temperature T "temperature (K)"; output Units.SI.Pressure p_sat "pressure"; end psat;