function ununique(d)
   [~,a]=unique(d);d(a)=[];unique(d)
end

d=[]
ununique(d);
d=[-1, 0, 1]
ununique(d)
d=[1, 1]
ununique(d)
d=[3, 0, 0, 1, 1, 0, 5, 3]
ununique(d)
d=[-34, 0, 1, -34, 4, 8, 4]
ununique(d)