% pp2test - script to activate 'phaseplot'

% (c) 2014-11-02, Philip D Loewen


disp('======================== ')
figure
A = [1, 1; 4, -2]
disp('Eigenvalues:'), eig(A)
phaseplot

disp('======================== ')
figure
A = [-1, -4; 1, -1]
disp('Eigenvalues:')
eig(A)
phaseplot

disp('======================== ')
figure
A = [0.1, 1; 1, 0]
disp('Eigenvalues:')
eig(A)
phaseplot

disp('======================== ')
figure
A = [5, -1; 3, 1]
disp('Eigenvalues:')
eig(A)
phaseplot

disp('======================== ')
figure
A = [1, 2; -5, -1]
disp('Eigenvalues:'), eig(A)
phaseplot


return;      % Premature return -- delete this line in Step 9

disp('======================== ')
figure
A = [-1.5, 1; -0.25, -0.5]
disp('Eigenvalues:')
eig(A)
phaseplot
