function endfire(C,FS)
%endfire(C,FS)
%Generates a pretty picture that demonstrates the endfire phenomenon.
%Take quite a while to finish plotting.


initpolar(6*C/5);
%plot(6*C,6*C);
%hold on;
%plot(-5*C,-5*C);

mini = floor(C*FS/340.83);
Number_Of_Detectable_Angles = 2*mini+1
Characteristic_Frequency = 340.83/(2*C)
if mini == 0, return, end
for i=-mini:mini
	twomicplot(i,C,FS);
	pause(.2)
end

rmaxis(gcf)