Jump to content

Order two numerical lists: Difference between revisions

Line 140:
 
<lang clojure>
(defn lex? [a[x b& xs] [y & ys]]
(cond
(let [sa (count a) sb (count b)]
(if (= sax sby) (lex xs ys)
(<> (compare ax by) 0) false
:else (> sb sa))true))
</lang>
 
Anonymous user
Cookies help us deliver our services. By using our services, you agree to our use of cookies.