在3元组中,如何将字符“#”作为元组的中间词。
谓词:重复(L1,L2)。
?重复([30,40,50],X)。
X = [(30,#,30),(40,#,40),(50,#,50)]。
?重复([80],X)。
X = [(80,#80)。
?重复([],X)。
X = []。
韩国社交协会
答案 0 :(得分:3)
您可以这样做:
duplicate([],[]).
duplicate([H|T], [(H, '#', H)|R]) :- duplicate(T,R).
难道不是很棒吗?