Copyright © EDF 2002 - 2024
ThermoSysPro Version 4.1
function Water_sat_P
input Units.SI.AbsolutePressure P "Pressure";
input Integer fluid "Fluid number - 1: IF97 - 7: SimpleWater";
output ThermoSysPro.Properties.WaterSteam.Common.PropThermoSat lsat annotation(
Placement(transformation(extent = {{-100, 50}, {-60, 90}}, rotation = 0)));
output ThermoSysPro.Properties.WaterSteam.Common.PropThermoSat vsat annotation(
Placement(transformation(extent = {{60, 50}, {100, 90}}, rotation = 0)));
end Water_sat_P;