小编COM*_*COM的帖子

我正在使用 swi-prolog 来获取给定列表中所有正整数的总和

到目前为止，这是我的代码，请帮助我解决哪里出错了

sumPos([] ,0).
sumPos([Head | Tail], X) :- Head > 0,
    sumPos(Tail, N), 
    X is N+Head.

为了测试我正在使用

sumPos([1,-2,3,-5], X).

答案应该是 X=4 但我得到了错误