bulle(x)

  function x  = bulle(x)  
                              
  n = length(x);
  x = x(:).'; 
  for j = 1:n-1                
    for i = 1:n-1              
      if x(i) > x(i+1)         
        x([i,i+1]) = x([i+1,i]);      
       end;                     
    end;                       
  end;