merging two sequences in clojure

seq-merge.clj

(defn seq-merge [a-seq b-seq]
  (cond (empty? a-seq) b-seq ;; retur non-empty sequence if any of the sequence is empty
        (empty? b-seq) a-seq
        :else (let [first-a (first a-seq)
                    first-b (first b-seq)]
                (if (< first-a first-b) ;;if picking the first item, the rest of  a-seq or vice versa
                  (cons first-a
                        (seq-merge (rest a-seq) b-seq))
                  (cons first-b
                        (seq-merge a-seq (rest b-seq)))))))