General Naive Bayes Implementation in Haskell