Copyright © EDF 2002 - 2024
ThermoSysPro Version 4.1
function Water_sat_P_der
input Units.SI.AbsolutePressure p "Pression";
input Real p_der "derivative of pressure";
output ThermoSysPro.Properties.WaterSteamSimple.PropThermoSat dlsat annotation(
Placement(transformation(extent = {{-85, 15}, {-15, 85}}, rotation = 0)));
output ThermoSysPro.Properties.WaterSteamSimple.PropThermoSat dvsat annotation(
Placement(transformation(extent = {{15, 15}, {85, 85}}, rotation = 0)));
end Water_sat_P_der;