function velocityOfSound_ph extends Modelica.Icons.Function; input Modelica.SIunits.Pressure p "Pressure"; input Modelica.SIunits.SpecificEnthalpy h "Specific enthalpy"; output Modelica.SIunits.Velocity a "Speed of sound"; end velocityOfSound_ph;