[Haskell-cafe] foldr (.) id