Rewrite Random.Generators in terms of Random monad