Data update

2023-09-01 09:35:06 -07:00 · 2023-09-01 09:35:06 -07:00 · 5af6d93694
commit 5af6d93694
parent 61b93a2cd1
858 changed files with 20572 additions and 2082 deletions
--- a/Task/Rep-string/Clojure/rep-string-1.clj
+++ b/Task/Rep-string/Clojure/rep-string-1.clj
@ -2,5 +2,5 @@
  (let [len        (count s)
        first-half (subs s 0 (/ len 2))
        test-group (take-while seq (iterate butlast first-half))
-        test-reptd (map (comp #(take len %) cycle) test-group)]
+        test-reptd (map #(take len (cycle %)) test-group)]
    (some #(= (seq s) %) test-reptd)))