小编use*_*463的帖子

假设我有一个清单[1, 1, 1, 1].我需要一种方法来检查IF中这个列表中的每个元素都是相等的返回yes否则返回no而不使用任何内置谓词. list(3,3)- >>是的,list(3,3,6)- >>不,我想出了这个规则,但它不起作用

equal([E1,E2|T]):- E1=:=E2,
       equal([E2,E3|T]).