A standard genetic algorithm implemented in clojure