Prolog：将列表中的最后一个元素移到前面

Question

是否有一些内置的谓词或简单方法将列表中的最后一个元素移到前面？我提出的唯一方法是存储最后一个元素的谓词，将其从原始列表中删除，然后执行append(Last Elem, Original List, New List)，这有点麻烦。

Answer 1

我不知道是否有任何内置谓词，但这可以用非常简单的代码实现：

moveLast([], []).
moveLast(L, [H|T]) :- append(T, [H], L).