Skip to content

Instantly share code, notes, and snippets.

@swannodette

swannodette/cast-tastic.clj

Forked from sjl/cast-tastic.clj
Created June 21, 2011 04:34
Show Gist options
  • Save swannodette/1037248 to your computer and use it in GitHub Desktop.
Save swannodette/1037248 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
cast-tastic.clj
(apply max
(for [y (range 100 999)
z (range y 999)
:let [x (* y z)]
:when (let [s (seq (str x))]
(= s (reverse s)))]
x))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment