%  sinlimplt -- plot to show how the squeeze law is used to establish
%               lim sin(x)/x as x->0
figure
x=-1:.0051:1;
set(gcf,'DefaultLineLineWidth',3,...
    'DefaultAxesFontSize',18,...
    'DefaultAxesPosition',[0.13 0.11 0.775 0.775],...
    'DefaultTextFontSize',18)
plot(x,sin(x)./x,'c5',x,cos(x),'c6',x,cos(x).^(-1),'c7');
axis([-1 1 0 1.5])
text(-.975,.975,'sin(x)/x')
text(-.8,.65,'cos(x)')
text(-.7,1.4,'1/cos(x)')
grid on
