CharPoly(M:MAT, X:POLY):LIST
Use R ::= QQ[x]; CharPoly(Mat([[1,2,3],[4,5,6],[7,8,9]]), x); -x^3 + 15x^2 + 18x -------------------------------