Clojure core.logic primer translated to tests