RosettaCodeData/Task/Remove-duplicate-elements/Prolog/remove-duplicate-elements-4...

3 lines
63 B
Prolog

?- distinct([A, A, 1, 2, 3, 2, 3, 4],Xs).
Xs = [A, 1, 2, 3, 4]