From 9f81283eece0823dda53907568b2c09406fbf092 Mon Sep 17 00:00:00 2001 From: Lee Spector Date: Sun, 11 Dec 2016 11:23:02 -0500 Subject: [PATCH] Reformatting; lein release :minor --- src/clojush/pushgp/genetic_operators.clj | 17 +++++++---------- 1 file changed, 7 insertions(+), 10 deletions(-) diff --git a/src/clojush/pushgp/genetic_operators.clj b/src/clojush/pushgp/genetic_operators.clj index 908e32f38..7ba391728 100644 --- a/src/clojush/pushgp/genetic_operators.clj +++ b/src/clojush/pushgp/genetic_operators.clj @@ -1,6 +1,4 @@ -;; gorilla-repl.fileformat = 1 -;; @@ (ns clojush.pushgp.genetic-operators (:use [clojush util random individual globals interpreter translate pushstate] clojush.instructions.tag @@ -280,13 +278,13 @@ (let [close-mutator (fn [instr-map] (let [closes (get instr-map :close 0)] (assoc instr-map :close - (if (< (lrand) uniform-close-mutation-rate) - (if (< (lrand) close-increment-rate) ;Rate at which to increase closes instead of decrease - (inc closes) - (if (<= closes 0) - 0 - (dec closes))) - closes)))) + (if (< (lrand) uniform-close-mutation-rate) + (if (< (lrand) close-increment-rate) ;Rate at which to increase closes instead of decrease + (inc closes) + (if (<= closes 0) + 0 + (dec closes))) + closes)))) new-genome (map close-mutator (:genome ind))] (make-individual :genome new-genome :history (:history ind) @@ -599,4 +597,3 @@ be set globally or eliminated in the future." ))) -;; @@