This routine computes the Lambert function, W-1(x).
function lambert_Wm1 extends Modelica.Icons.Function; input Real x; output Real y; end lambert_Wm1;