(def order-list [Tier5 Tier10 Tier20 Tier30 Tier40 Tier50])
(def rank (into {} (map-indexed (fn [i x] [x i]) orders)))
(apply max-key rank [Tier20 Tier10 Tier30])-- You received this message because you are subscribed to the Google Groups "Clojure" group. To post to this group, send email to clojure@googlegroups.com Note that posts from new members are moderated - please be patient with your first post. To unsubscribe from this group, send email to clojure+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/clojure?hl=en
