## Copyright © EDF 2002 - 2025
## ThermoSysPro Version 4.2
function propsat1_P_der input Units.SI.AbsolutePressure p "Pressure"; input Real p_der "Derivative of Pressure"; output ThermoSysPro.Properties.WaterSteamSimple.PropThermoSat der_pro; end propsat1_P_der;