% trecirk, cirklar som tangerar varandra
  clear, clf
  x=[0 4 6.5]'; y=[1.42 6.18 4.75]';          
  xx=[x; 0]; yy=[y; y(1)];    
  plot(x,y,'o'), axis equal, hold on
  dx=diff(xx);  dy=diff(yy);  s=sqrt(dx.^2+dy.^2);

  A=[1 1 0; 0 1 1; 1 0 1];  r=A\s
  fi=0:2*pi/60:2*pi; 
  for j=1:3, fill(x(j)+r(j)*cos(fi) ,y(j)+r(j)*sin(fi),'y'),  end
  plot(x,y,'o', xx,yy,'--')


