Using Power method, write a Fortran code to compute the largest and smallest eigenvalues and its corresponding eigenvectors of the following matrix,
[[1,3,-1],[3,2,4],[-1,4,10]]
