haskell nucleotide-count