Thermodynamics properties in region 1, independent variables p and h
function prop1_Ph input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEnthalpy h "Specific enthalpy"; output ThermoSysPro.Properties.WaterSteamSimple.ThermoProperties_ph pro; end prop1_Ph;