k-payl/gist:8136784

Created December 26, 2013 18:04

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/k-payl/8136784.js"></script>
Save k-payl/8136784 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

gistfile1.prolog

	symm(List) :- iter(List, []).
	iter(L, L):-!.
	iter([_\|L], L):-!.
	iter([H\|T], Akk) :- iter(T, [H\|Akk]).

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