 ;;;; setup
 
 (def my-interpreter (push/interpreter))
-(def cohort-size 100)
 (def program-size 1000)
 (def erc-scale 10)
 (def erc-prob 3/5)


(defn launch-some-workers
  [interpreter bindings how-many]
  (cp/with-shutdown! [net-pool (cp/threadpool 100)]
    (doall
      (lazy/upmap net-pool
        #(.write *out*

(with-handler! #'run-program-in-standardized-interpreter
  "If an interpreter raises an exception, dump a new prisoner file."
  [java.lang.StackOverflowError, java.lang.NullPointerException]
  (fn [e interpreter program bindings]
    (do
      (println
        (str "\n\nWRITING FILE >>>>>>> " (str e)))
      (println "\n\n saving prisoner: ")
      (spit-prisoner-file
        program
        bindings
        (.getMessage e)))
        ))

