Fix bug in Generator.hs
Generator is now Monad, available in GeneratorM