function cp2_Ph input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEnthalpy h "Specific enthalpy"; output Units.SI.SpecificHeatCapacity cp "Specific heat capacity at constant presure"; end cp2_Ph;