获取prolog中的所有列表元素

Question

我需要使用prolog获取列表外部的所有列表元素。 ['1','2','3',a,b,c]成为X='1','2','3',a,b,c 我需要如上所示的结果X.

是否可以获得结果？

Answer 1

这将显示您要求的内容（我假设您对显示目的严格感兴趣）。

print_list(L) :-
    write('X='),
    print_list_aux(L), !.

print_list_aux([H1,H2|T]) :-
    print(H1),
    write(','),
    print_list_aux([H2|T]).
print_list_aux([X]) :-
    print(X),
    nl.
print_list_aux([]) :- nl.

示例：

?- print_list(['1', '2', a, b]).
X='1','2',a,b
true.

?- 

如果您使用write/1代替print/1，则会删除输出中数字的引号，因此它会是：X=1,2,a,b。