Skip to content

Commit

Permalink
Reformatting; lein release :minor
Browse files Browse the repository at this point in the history
  • Loading branch information
lspector committed Dec 11, 2016
1 parent afaa474 commit 9f81283
Showing 1 changed file with 7 additions and 10 deletions.
17 changes: 7 additions & 10 deletions src/clojush/pushgp/genetic_operators.clj
Original file line number Diff line number Diff line change
@@ -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
Expand Down Expand Up @@ -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)
Expand Down Expand Up @@ -599,4 +597,3 @@ be set globally or eliminated in the future."
)))


;; @@

0 comments on commit 9f81283

Please sign in to comment.