:-initialization(main). main :- list_to_set([1,3,2,3],Y), write(Y), nl.