clear all
load triangle5964.dat
t=triangle5964;
n=t(1,1);
l=t(2:n+1,1);
xx(l)=t(2:n+1,2);
yy(l)=t(2:n+1,3);
tri=t(n+2:end,:);

hold off
figuresize(138,166)
set(gca,'position',[0 0 1 1])

for ii=1:3
	x(ii,:)=xx(tri(:,ii));
	y(ii,:)=yy(tri(:,ii));
end
	x(4,:)=x(1,:);
	y(4,:)=y(1,:);
  x(5,:)=nan;
  y(5,:)=nan;
  x=x(:);
  y=y(:);
	plot(x,y,'linewidth',.05);
axis tight

set(gcf,'paperpositionmode','auto');

print -djpeg triangle