prolog - Prolog-cut & 失败

Question

我有这个函数 comb(2,[1,2,3],A) 女巫找到与列表元素的组合。现在我想制作一个函数，女巫将所有这些组合放在一个列表中，而无需;在命令行中发送：

 R=[[1, 2],[1, 3],[2, 3]]

代替：

 A = [1, 2] ;
 A = [1, 3] ;
 A = [2, 3] ;

Answer 1

findall(A, comb(2, [1, 2, 3], A), R).