finitud · February 4, 2012 18:57
diff --git a/finitud-4clojure-solution22.clj b/finitud-4clojure-solution22.clj
 ;; finitud's solution to Count a Sequence
 ;; https://4clojure.com/problem/22

 (fn [x]
  ((fn [x n]
    (if (= (rest x) ())
      n
      (recur (rest x) (+ n 1)))
      )
  x 1))
	;; finitud's solution to Count a Sequence
	;; https://4clojure.com/problem/22

	(fn [x]
	((fn [x n]
	(if (= (rest x) ())
	n
	(recur (rest x) (+ n 1)))
	)
	x 1))