   [ind]
   (auto-simplify-plush ind
                        (:error-function clojush.problems.demos.odd/argmap)
-                       1000
+                       5 ;1000
                        100))
 
 (test-autosimp-genome ind-test)


(defn apply-simplification-step-to-genome
  [genome simplification-step-probabilities]
  (let [transformation-map (select-random-weighted-item simplification-step-probabilities)]
    ;;;MAKE CHANGES HERE

(defn auto-simplify-plush
  "Automatically simplifies the genome of an individual without changing its error vector on

(def ind-test
  (make-individual :genome 
                   '({:close 0, :instruction exec_shove}
                      {:close 0, :instruction exec_eq :silent true}
                      {:close 1, :instruction boolean_dup :silent false}
                      {:close 0, :instruction boolean_eq :silent true}
                      {:close 0,
                       :instruction code_stackdepth :silent false}
                      {:close 0,
                       :instruction boolean_yankdup}
                      {:close 0, :instruction 64}
