Skip to content

Instantly share code, notes, and snippets.

@swannodette

swannodette/seqs.clj

Forked from fogus/seqs.prolog
Created March 9, 2011 20:46
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save swannodette/862975 to your computer and use it in GitHub Desktop.
Save swannodette/862975 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
seqs.clj
(defn-e nth-o [n l o]
((1 (?a . ?d) a))
((_ (?a . ?d) _) (nth-o (dec n) d o)))
@fogus
Copy link

fogus commented Mar 10, 2011

Would love to pick your brain on this one day.

@swannodette
Copy link
Author

@fogus Pick away :) It's the pattern matching syntax that I plan on implementing in the near future to make it easier to map Prolog programs to their miniKanren cousins.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment