I really like this suggestion. I'm in the process of learning Haskell now, and plan on using this as a practical learning exercise.

Out of curiosity, how difficult did you find this to complete?