% Testroutine zum Programm 
% ConvexHull, Blatt 2

% Datenpunkte generieren
N = 50; 		% Anzahl 
P = rand(N,2);

% Aufruf des Programms
Q = ConvexHull(P);

% Ergebnis visualisieren
figure(1)
clf reset
fill(Q(:,1),Q(:,2),.7*[1 1 1])
hold on
plot(Q([1:end 1],1),Q([1:end 1],2),'LineWidth',2)
plot(P(:,1),P(:,2),'.','MarkerSize',20)
axis([-.1 1.1 -.1 1.1])