Question: Power Method for Matrices

I need to find the eigenvalues for a matrix using the power method in Maple 14 . I want to iterate Xn+1=PXn until it has reached a certain degree of accuracy where P is my matrix and X is a column vector. 

I have tried:

> while(abs(X1-X0)>0.0000001);

> do

> X1 := X0

> X1 := PT.X0

> end do;

but I get this error: 'Error, unable to parse'

Please could someone help?

Please Wait...