is.diagonal.matrix: Test for diagonal square matrix
Description
This function returns TRUE if the given matrix argument x
is a square numeric matrix and that the off-diagonal elements are close
to zero in absolute value to within the given tolerance level. Otherwise,
a FALSE value is returned.