A = {{1, -1/2, 0, -1}, {-1/3, 1, -1/2, 0}, {-1/3, 0, 1, 0}, {-1/3, -1/2, -1/2, 1}} RowReduce[A]