     (println "Total number of data lines:" (count lines))
     (mapv #(mapv read-string %) lines)))
 
-(def training-proportion 0.5) ;; proportion of training cases to use each generation
+(def training-proportion 0.1) ;; proportion of training cases to use each generation
 
 (defn define-fitness-cases
   "Returns a map with two keys: train and test. Train maps to a

   ;:print-behavioral-diversity true ;; requires maintaining @population-behaviors 
   :report-simplifications 0
   :final-report-simplifications 5000
   })



   :population-size 1000
   :max-generations 300
   :parent-selection :lexicase
   :genetic-operator-probabilities {:alternation 0.4 ;*** 0.2
                                    :uniform-mutation 0.4 ;*** 0.2
                                    :uniform-close-mutation 0.1
                                    ;*** [:alternation :uniform-mutation] 0.4
                                    :genesis 0.1 ;***
                                    }
   :alternation-rate 0.01
   :alignment-deviation 10
