[Haskell-cafe] Stuck on design problem