selected=[];
not_selected=[];
for i=1:8
used=[];
for m=1:8
used=
if ismember(m,used)==0
for n=1:8
used=[used m];
if ismember(n,used)==0
for o=1:8
used=[used n]
if ismember(o,used)==0
temp=[i m n o];
selected=[selected;temp];
end
end
end
end
end
end
end
select=sort(selected,2);
permutation=unique(select,'rows');