%%%%%%%%%%%%%%%%%%%%%     Triangle Plot     %%%%%%%%%%%%%%%%%%%%%
%
% PLOTTRI
% Usage: PLOTTRI(tri,col)
% Inputs:  tri - a vector who components are the vertices of the 
%          triangle to be plotted
%          col - color the sides 
           
function dum = plottri(tri,col)             
    
   seg1 = [tri(1),tri(2)];
   seg2 = [tri(2),tri(3)];
   seg3 = [tri(3),tri(1)];
  
   w1= geoseg(seg1);
   w2= geoseg(seg2);
   w3= geoseg(seg3);
 
   plot(real(w1),imag(w1),['-',col]);
   plot(real(w2),imag(w2),['-',col]);
   plot(real(w3),imag(w3),['-',col]);
   drawnow;

   clear w1;
   clear w2;
   clear w3;
   dum =[];