haskell nucleotide count v2