RevLexMat(N:INTEGER):MAT
RevLexMat(3); Mat([ [0, 0, -1], [0, -1, 0], [-1, 0, 0] ]) -------------------------------