% expfun_int_osc.m - exponential function plots
% KJA, 2012

aminit;					% initialize FBS macros

% Set up time axis to be used for all plots
t=0:0.1:16;

% Re s = 0, real eigenvalues
y0=zeros(size(t));
y1=ones(size(t));

subplot(331)				% Small size to get fonts right
p1 = plot(t, y1, 'b-');

set(p1, 'LineWidth', AM_data_linewidth);
set(gca,'Ytick',[0 0.5 1]);
amaxis([0 4 -0 1.2])
xlabel('tint')
ylabel('y')
title('integrator')

% Re s = 0, complex eigenvalues
y = sin(t);

subplot(334)
p2 = plot(t/pi, y, 'b-', t/pi, y0, 'k');

set(p2, 'LineWidth', AM_data_linewidth);
set(gca, 'Ytick', [-1 0 1]);
amaxis([0 4 -1.2 1.2])
xlabel('tosc')
ylabel('y')
title('oscillatory');

amprint('expfun-int-osc.eps')
