% Generates Figure 8.2 (right)

t = linspace(0,1,1000);
th = 0*t;
for j=1:length(t)
    th(j)=theta(exp(-pi^2*t(j)));
end
plot(t,th,'k-','LineWidth',2);
axis([-0.008 1.008 -0.02 pi/2+0.02])
set(gca,'XTickMode','manual','XTick',[0 0.424 1],...
        'YTickMode','manual','YTick',[0 pi/2/sqrt(5) pi/2],'YTickLabel',{'0';'';'     '});
set(gca,'FontSize',18,'FontWeight','normal','FontName','Times');
grid on;
xlabel('{\itt}','FontWeight','normal','FontSize',24);
ylabel('\theta({\ite}^{-\pi^2{\itt}})','FontWeight','normal','FontSize',24);
text(-0.015,pi/2,'\pi/2','FontWeight','normal','FontSize',18,...
         'HorizontalAlignment','right','FontName','Times')
text(-0.015,pi/2/sqrt(5),'\pi/2/\surd5','FontWeight','normal','FontSize',18,...
         'HorizontalAlignment','right','FontName','Times')
set(get(gca,'YLabel'),'Position',[-0.065,0.95],'HorizontalAlignment','left');
%print -deps2c theta2.eps