core-logic

cjsauer 2018-02-26T17:46:15.000794Z

Looks like the solution is to use the != function, as described here: https://groups.google.com/forum/#!topic/minikanren/JCKJV7k7lGU

cjsauer 2018-02-26T17:51:23.000187Z

Turns out rembero is a core.logic function already as well, in case anyone is interested:

(defne rembero
  "A relation between l and o where x is removed from
   l exactly one time."
  [x l o]
  ([_ [x . xs] xs])
  ([_ [y . ys] [y . zs]]
     (!= y x)
     (rembero x ys zs)))

1