[Haskell-cafe] How to understand such a `case` ?