                 :not-a-clone not-a-clone-diversifying?
                 :minimum-genetic-difference minimum-genetic-difference-diversifying?
                 :different-errors different-errors-diversifying?
+                :new-instruction-diversifying new-instruction-diversifying?
+                :new-size-diversifying new-size-diversifying?
                 :none (fn [ind argmap] i))
               i
               argmap)

             (not= errs (take (count errs) (:parent2-errors argmap))))))
    (assoc ind :diversifying true)))

(defn diversifying?
  "Returns ind with :diversifying set to true if it staisfies all test
  specified in (:autoconstructive-diversification-test argmap), or false
