function showtri ( )

%% showtri() is demonstrated by computing the Inverse of the 5-by-5 Forsythe Matrix.
%
  fprintf ( 1, '\n' )
  fprintf ( 1, 'showtri():\n' );
  fprintf ( 1, '  Use LTriSolM() to compute the inverse of the Forsythem matrix\n' );

  n = 5;
  L = eye(n,n) - tril(ones(n,n),-1);
  disp ( 'L' );
  disp ( L );
  X = LTriSolM(L,eye(n,n));
  disp ( 'X' );
  disp ( X );

  return
end

