a={{-3,0,2},{1,-1,0},{-2,-1,0}}
MatrixForm[a]

MatrixForm[MatrixPower[a,100]]

Eigensystem[{{-3,0,2},{1,-1,0},{-2,-1,0}}]

p=Transpose[{{2,-2,1},{(1/3) (2-I (Sqrt[2])),-(1/3) I (-I+(Sqrt[2])),1},{(1/3) (2+I (Sqrt[2])),(1/3) I (I+(Sqrt[2])),1}}]
MatrixForm[p]

d=DiagonalMatrix[{-2,I (I+(Sqrt[2])),-I (-I+(Sqrt[2]))}]
MatrixForm[d]

s=MatrixPower[d,100]

MatrixForm[s]

MatrixForm[Simplify[p.s.Inverse[p]]]