Add length checks to the wood functions, and fix wood_hessian1().

[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