Prolog，列表列表正好包含另一个列表

Question

我基本上想要实现的是，给定列表 A 的列表，我想要一个谓词来检查列表 B 的元素是否完全包含在列表 A 中。

所以例如：

A = [[1,2]，[3,4]，[5]，[]]B = [1,2,3,4,5]

和

A = [[1,2]，[3,4]，[5]，[]]B = [2,5,3,4,1]

将导致 true，但是

A = [[1,2]，[3,4]，[5]，[]]B = [1,2,3,4]

和

A = [[1,2]，[3,4]，[5]，[]]B = [1,2,3,4,5,6]

都会导致错误。

这在Prolog中可能吗？

确切的意思是：顺序并不重要，它只需要包含所有元素。另外，假设 B 列表不包含重复项。因此，如果 A 包含重复项，我们应该因此得到 false。

Answer 1

微不足道的答案：

?- flatten([[1,2],[3,4],[5],[]], [1,2,3,4,5]).
true.
?- flatten([[1,2],[3,4],[5],[]], [1,2,3,4]).
false.
?- flatten([[1,2],[3,4],[5],[]], [1,2,3,4,5,6]).
false.

或

foo(A, B) :- % because I don't know how to call it
    flatten(A, B).

如果您谈论的是集合：

bar(A, B) :-
    flatten(A, A_flat),
    sort(A_flat, A_sorted),
    sort(B, A_sorted).

如果您不想删除重复项，可以使用msort/2。

如果问题是"我如何实现flatten/2"，您可以在SO上找到几个答案。