playing with map generation routines in clojure