A Haskell spam filter based on Peter Seibel's in his book Practical Common Lisp