[Haskell-cafe] Map in Terms of Fold in terms of Map