function C=rankmax(C)
  % Riduce una matrice ad una equivalente di rango massimo.

  % Esempio:
  %   size(rankmax(rand(3,2),rank(2,3)))
  %     ==>  [2,3]

  C=rref(C);
  i=ultimariga(C);
  C=C(1:i,:);