quicksort in clojure