0.8.4-SNAPSHOT Arrow_down_16x16
  • (to-vals dom)

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/fd.clj:689 top

(defn to-vals [dom]
  (letfn [(to-vals* [is]
            (when is
              (let [i (first is)]
                 (cons (lb i)
                       (if-let [ni (drop-one i)]
                         (to-vals* (cons ni (next is)))
                         (to-vals* (next is))))))))]
    (to-vals* (seq (intervals dom)))))
Vars in clojure.core.logic.fd/to-vals:
Used in 0 other vars

Comments top

No comments for to-vals. Log in to add a comment.