# 
# Numerical Mathematics and Computing, Fifth Edition
# Ward Cheney & David Kincaid
# Brooks/Cole Publ. Co.
# (c) 2003
#
# file: eigen
#
# Eigenvalues/eigenvectors
#
with(LinearAlgebra):
A := Matrix([[1,3,7],[-3,4,1],[2,-5,3]]);
(DD,V) := Eigenvectors(A);
evalf(%);