[Haskell-cafe] An use case of the Free-Monad: logging