clojure dna-count