function lambda1_Ph input Units.SI.AbsolutePressure p "Pressure"; input Units.SI.SpecificEnthalpy h "Specific enthalpy"; output Units.SI.ThermalConductivity lambda "Thermal conductivity"; end lambda1_Ph;