[Haskell-beginners] Foldable for (,)