序言中的交換功能

Question

我需要用B/A將序言中的術語A/B替換掉。

A和B是變量（可以是一個數字，大寫字母或小寫字母）

我的意思是，什麼是對的斜線右側應在左側，反之亦然。

實例：
A/10應該是10/A
9/3應該是3/9
5/B應當B/5

我希望這是清楚的。謝謝。

Answer 1

很簡單：

swap(X/Y, Y/X). 

或者可以使用統一的 '內聯'，這裏的樣品：

?- forall(member(A, [a/3, b/6]), (A=X/Y, B=Y/X, writeln(B))). 
3/a 
6/b 
true.