uniq(Data,Uniques) :- sort(Data,Uniques).