Jaccard similarity and Jaccard bag similarity implementation in Haskell