我需要从键盘输入(列表)获得一个没有重复但没有使用XSB prolog中的inbuild setof(或任何其他内置函数)的列表。
我如何编写自己的setof函数?
输入和输出应如下所示:
|?-list([a,b,c,d,a,b,c,d,e,f],L).
L=[a,b,c,d,e,f];
提前致谢。
答案 0 :(得分:1)
使用member / 2它很容易:只需复制每个元素,使用递归列表/ 2,检查输入列表的头部,它不在目标列表中。检查可以由member / 2执行,你需要编写自己的...整个程序应该是4行代码。