function mostralinsol(A,b)
  % Mostra la soluzione di un sistema lineare.
  % Attenzione: Funziona soltanto nel caso in cui A e'
  % di rango massimo e la condizione del teorema di
  % Rouche'--Capelli e' verificata.

  X=A\b;
  K=null(A);
  if size(K,2) == 0
    disp ('L''unica soluzione del sistema e'' il vettore');
    disp X
  else
    disp('Le soluzioni del sistema sono tutti e soli i vettori della forma X + V, dove');
    X
    disp('e V e'' un vettore dato da una qualsiasi combinazione lineare dei vettori');
    disp(K);
  end