% RISI_KROG Ri"se v"crtan in o"crtan krog
% 	RISI_KROG(T) nari"se trikotnik ter v"crtan in o"crtan krog skupaj
%	s sredi"s"cema.
%       Trikotnik je podan kot matrika 3x2 to"ck, prvi stolpec so
%	x koordinate.

function risi_krog(T);
  TT=[T;T(1,:)]; %zaklju"cimo poligon
  clf;
  hold on;
  plot(T(:,1),T(:,2),'or');
  plot(TT(:,1),TT(:,2),'r');
  [So,ro]=ocrtan_krog(T);
  [Sv,rv]=vcrtan_krog(T);
  fi=linspace(0,2*pi,360);
  xo=So(1,1)+ro*sin(fi);
  yo=So(1,2)+ro*cos(fi);
  xv=Sv(1,1)+rv*sin(fi);
  yv=Sv(1,2)+rv*cos(fi);
  plot(xo,yo,'g');
  plot(xv,yv,'b');
  plot(So(1,1),So(1,2),'gx');
  plot(Sv(1,1),Sv(1,2),'bx');
  axis equal;
  hold off

