refactor clojure dna