Skip to content

Instantly share code, notes, and snippets.

@adamwespiser

adamwespiser/4c_p79.clj

Created January 26, 2012 21:13
Show Gist options
  • Save adamwespiser/1685138 to your computer and use it in GitHub Desktop.
Save adamwespiser/1685138 to your computer and use it in GitHub Desktop.
Download ZIP
4clojure problem 79 Triangle Minimum Path
Raw
4c_p79.clj
(fn [col]
(first
(reduce #(map +
(map min (butlast %1)
(rest %1 ))
%2)
(reverse col))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment