<>function [xc,yc,R,a] = circfit(x,y) </P>
<>%CIRCFIT Fits a circle in x,y plane </P>
<>% </P>
<P>% [XC, YC, R, A] = CIRCFIT(X,Y) </P>
<P>% Result is center point (yc,xc) and radius R.A is an </P>
<P>% optional output describing the circle's equation: </P>
<P>% </P>
<P>% x^2+y^2+a(1)*x+a(2)*y+a(3)=0 </P>
<P>% by Bucher izhak 25/oct/1991 </P>