September Morn Update

2019-09-12 10:33:56 -07:00 · 2019-09-12 10:33:56 -07:00 · aac6731f2c
commit aac6731f2c
parent 4e2d22a71d
6856 changed files with 141342 additions and 21127 deletions
--- a/Task/Knuth-shuffle/Clojure/knuth-shuffle.clj
+++ b/Task/Knuth-shuffle/Clojure/knuth-shuffle.clj
@ -1,4 +1,4 @@
 (defn shuffle [vect]
  (reduce (fn [v i] (let [r (rand-int i)]
-                      (assoc v i (v r) r (v i)))
+                      (assoc v i (v r) r (v i))))
          vect (range (dec (count vect)) 1 -1)))