a bayesian email spam filter in Haskell