% Show E0
% Illustrates the class E0.

clear all
clear class
close all
plot([-10 10],[0 0],':k',[0 0],[-10 10],':k')
axis equal
axis([-10 10 -10 10])
hold on

% Construct and display an E0 object...
E = E0(4,3);
E.Show('m')

% Construct and display a Point object...
P = Point(-2,-2);
P.Show('b')

% Display a message that indocates whether or not the ellipse referenced
% by E encloses the point referenced by P...
if E.Enclose(P)
    title('P is inside E','Fontsize',14)
else
    title('P is not inside E','Fontsize',14)
end
% Report the area of the ellipse referenced by E...
xlabel(sprintf('Area = %6.2f',E.Area()),'Fontsize',14)