Order two numerical lists: Difference between revisions

Content added Content deleted
Line 141:
<lang clojure>
(defn lex? [a b]
(reducecompare =a b))
(map (fn [[a b]] (<= (compare a b) 0) )
(map vector a b))))
</lang>