select(x)

function y = select(x)
  %       SELECT  tri par slection
  %               function y = select(x)
  %       but pdagogique : SORT est beaucoup plus rapide.
    x = x(:);
    n = length(x);
    y = zeros(n,1);
    for i = n:-1:1
      [y(i), I] = max(x(1:i));
      x(I)= x(i);
    end;