prolog中的交换函数

我需要用B/A替换prolog中的术语A/B

A和B是变量（可以是数字、大写字母或小写字母）

我的意思是，斜线右边的东西应该在左边，反之亦然

示例：
A/10应该是10/A
9/3应该是3/9
5/B应该是B/5

我希望这是清楚的。谢谢。

非常简单：

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.

非常简单：

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.

---

你忘了问问题。对不起，我认为这很明显，但我的问题是如何在序言中做到这一点…你忘了问问题。对不起，我认为这很明显，但我的问题是如何在序言中做到这一点…非常感谢，这真的很有帮助！非常感谢，这真的很有帮助！