function abc_check ( )

%
%  Get the incidence matrix for the three-field graph:
%
  A = abc_inc()
%
%  Convert A from sparse to full storage.
%
  A = full ( A )
%
%  Compute the transition matrix.
%
  T = inc_to_transition ( A )
%
%  Request the eigenvectors and eigenvalues of T.
%
  [ Vec, Val ] = eig ( T )
%
%  Compute the square of the norms of the eigenvalues.
%
  diag ( Val * Val' )

  return
end
