becojo · December 25, 2013 15:07
diff --git a/gistfile1.clj b/gistfile1.clj
 (defn insert [coll, n]
  (let [parts (split-with (partial > n) coll)]
    (concat (first parts) [n] (last parts))))

 (defn insertion-sort [coll]
  (reduce (fn [sorted item]
    (insert sorted item)) nil coll))
	(defn insert [coll, n]
	(let [parts (split-with (partial > n) coll)]
	(concat (first parts) [n] (last parts))))

	(defn insertion-sort [coll]
	(reduce (fn [sorted item]
	(insert sorted item)) nil coll))