0.8.4-SNAPSHOT Arrow_down_16x16
  • (qsorto l r r0)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source clojure/core/logic/bench.clj:386 top

(defne qsorto [l r r0]
  ([[] _ r])
  ([[x . lr] _ _]
     (fresh [l1 l2 r1]
       (partitiono lr x l1 l2)
       (qsorto l2 r1 r0)
       (qsorto l1 r (lcons x r1)))))
Vars in clojure.core.logic.bench/qsorto:
Used in 0 other vars

Comments top

No comments for qsorto. Log in to add a comment.