Haskell random walk implementation.