Check for the easy case in rank_k_approximation().

[octave.git] / is_upper_triangular.m

function isUT = is_upper_triangular(A)
  %
  % Returns true if ``A`` is upper triangular, false otherwise.
  %
  isUT = isequal(A, triu(A));
end