function  [t]=rtour(n) 

%  generate a random tournament matrix of order n

if (n<=0), 'hey, hey...', break, end

t=zeros(n);
for i=1:n
   for j=i+1:n
             t(i,j)=(rand(1)>.5+eps);
             t(j,i)=1-t(i,j);
   end
end