RosettaCodeData/Task/Generic-swap/Prolog/generic-swap.pro

6 lines
48 B
Prolog
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
swap(A,B,B,A).
?- swap(1,2,X,Y).
X = 2,
Y = 1.