Clojure Problem 024: Clever algorithm implemented