list - Prolog - 复制一个列表

Question

我需要在序言中复制列表。

我有 list :

L = [a(string1,value1),a(string2,value2),a(string3,value3),a(string4,value4)].

输出将是:L = [string1, string2, string3, string4].

我该怎么做？

我可以通过代码复制整个列表:

copy([],[]).
copy([H|L1],[H|L2]) :- copy(L1,L2).

我尝试过类似的方法:

copy2([],[]).
copy2([H|L1],[K|L2]) :- member(f(K,_),H), copy2(L1,L2). 

但它不能正常工作。

但我只需要原始列表中的字符串。有人可以帮忙吗？

Answer 1

模式匹配用于分解参数:你可以这样做

copy([],[]).
copy([a(H,_)|L1],[H|L2]) :- copy(L1,L2).