Fast push monad in Haskell - View it on GitHub