% sub5p17circle.m
subplot(1,1,1);
theta=0.0:pi/20:2*pi
r=ones(1,41);
polar(theta,r,'b-o');
