4clojure 62: reimplement iterate