[Haskell-cafe] Case studies, step two