%eigen.m

%Input stress matrix
s=[5   10  -8;
   10 -12   7;
   -8   7   19];

%Find eigevalues and eigenvectors of the stress matrix
[V,D]=eig(s);