IwoHerka/reduce.clj

Created June 20, 2019 17:12

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/IwoHerka/0b657a31d5b581d99311d03e1c7477d1.js"></script>
Save IwoHerka/0b657a31d5b581d99311d03e1c7477d1 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

	(defn reduce*
	[f acc coll]
	(if (empty? coll)
	acc
	(recur f (f acc (first coll)) (rest coll))))

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment