%The Uncertainty Lemon
%   kja070506
aminit;

% Generate the shape that we want
x=0.5:0.01:1.5;
ex=exp(4*x);
y=max((x-1).^2,0);
eyh=0.01*exp(9*(0.25+y));
eyl=0.01*exp(9*(0.75-y));

figure(1); clf; subplot(331);
loglog(ex, eyh, 'b-', ex, eyl, 'b-','Linewidth', AM_data_linewidth);
set(gca,'Xtick',[10 100 1000]); set(gca,'Ytick',[0.1 1 10]);

amaxis([3 1000 0.05 20])
xlabel('Frequency');
ylabel('Amplitude');

amprint('uncertainty-lemon.eps');

break

%
% Not sure what the code below doesn't
% Isn't needed for the text

x=logspace(-2,2);
y=x;
f=(x+1./x-1)/10;
yh=y.*(1.1+f);
yl=y./(1.1+f);
subplot(221)
pl=loglog(x,y,'b-',x,yh,'b--',x,yl,'b--');
set(gca,'Ytick',[0.01 1 100]);
set(pl,'Linewidth',AM_bode_linewidth);
grid on;
amaxis([0.01 100 0.001 1000]);
xlabel('u');ylabel('y');

