function out = sepclust(center)
%SEPCLUST seprate clusters by finding the minimum distance between
%cluster centroids

%CARSON KAO, May 23, 1997

center_num = size(center,1);
index_cij = combinat([1:center_num],2)';	%combinat any 2 centers
index_c = index_cij(:);
temp_out = [];
for i = 1:2:length(index_c)-1,
    temp = sum((center(index_c(i),:)-center(index_c(i+1),:)).^2);
    temp_out = [temp_out; temp];
end  
out = min(temp_out);