Skip to content

Instantly share code, notes, and snippets.

@ochronus

ochronus/euler-9.clj

Created April 1, 2016 13:26
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save ochronus/a4cd55633da68b688654bf94c722279f to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save ochronus/a4cd55633da68b688654bf94c722279f to your computer and use it in GitHub Desktop.
Download ZIP
Raw
euler-9.clj
(defn palindrome? [s]
(= (reverse (str s) ) (seq (str s))))
(apply max
(filter palindrome?
(for
[a (range 100 1000)
b (range 100 1000)]
(* a b))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment