function circplot(cx,cy,r,s,varargin)
global AM_data_linewidth
%kja 000805
aminit;
fi=-pi:0.02:pi;
x=cx+r*cos(fi);y=cy+r*sin(fi);
cp=plot(x,y,s,varargin{:});
set(cp,'Linewidth', AM_data_linewidth);