我试着做这个练习,我应该构建一个prolog程序,当给定一个数字和一个列表时,它返回一个没有数字倍数的列表。现在我要说的是:
rm([],[]).
rm(N, [Head|Tail], Result):-
Head mod N =:= 0,
rm(N, Tail, Result).
rm(N, [Head|Tail], [Head|Result]):-
Head mod N =\= 0,
rm(N, Tail, Result).
这不管用,我也不太明白为什么。
我希望有人能解释一下为什么这不管用。
谢谢
发布于 2017-09-23 07:17:00
如果使用SWI,则可以进行功能设计:
:-use_module(library('lambda.pl')).
removeMultiples(N, In, Out) :-
exclude(N+\X^(X mod N =:= 0), In, Out).
https://stackoverflow.com/questions/46380831
复制