crude PP lambertw function