Ainda não tem acesso? Estude com a gente! Matricule-se
Ainda não tem acesso? Estude com a gente! Matricule-se

Consegui implementar meu próprio reduce, o que acharam?

(defn meu-reduce
  ([fnc elementos]
   (meu-reduce fnc (first elementos) (next elementos)))
  ([fnc acumulador elementos]
   (if (seq elementos)
     (recur fnc (fnc acumulador (first elementos)) (next elementos))
     acumulador)))

(println "meu reduce" (meu-reduce + [1 2 3]))