RosettaCodeData/Task/Remove-duplicate-elements/Prolog/remove-duplicate-elements-4.pro
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

2 lines
63 B
Prolog

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