[Haskell-cafe] Mapping string to a function