5 lines
48 B
Prolog
5 lines
48 B
Prolog
swap(A,B,B,A).
|
|
|
|
?- swap(1,2,X,Y).
|
|
X = 2,
|
|
Y = 1.
|
swap(A,B,B,A).
|
|
|
|
?- swap(1,2,X,Y).
|
|
X = 2,
|
|
Y = 1.
|