Prolog-cut＆amp;失败

Question

我有这个功能梳子（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).