September 2017 Update

2017-09-23 10:01:46 +02:00 · 2017-09-23 10:01:46 +02:00 · ba8067c3b7
commit ba8067c3b7
parent bba7bfd280
14570 changed files with 153136 additions and 63871 deletions
--- a/Task/ABC-Problem/Clojure/abc-problem.clj
+++ b/Task/ABC-Problem/Clojure/abc-problem.clj
@ -10,7 +10,7 @@
 (defn abc
  "return lazy sequence of solutions (i.e. block lists)"
  [blocks [c & cs]]
-  (if-some c
+  (if (some? c)
    (for [b blocks :when (some #(= c %) b)
          bs (abc (omit blocks b) cs)]
      (cons b bs))