[Haskell-cafe] concatMap with state for Data.Vector?