[Haskell-cafe] usage of traversal