[polyml] `Exception- Overflow raised' during functor application