mid=6;
last=11;

hold off
subplot(2,2,1)
semilogy(gm(1:last,1),gm(1:last,2),'k--')
hold on
semilogy(gm(1:last,1),gm(1:last,3),'k-.')
semilogy(gm(1:last,1),gm(1:last,4),'k-')

xlabel 'Model \alpha'
ylabel 'BER'
title '(a) BER vs. Model \alpha'

% axis([0 1 0.5e-1 0.5]);

a = axis;

x = a(1) + 1*(a(2)-a(1))/20;
y = 0.7e-1;

text(x,y, ['---  Gaussian Model     '; ...
           '.-.-. Gauss-Markov Model'; ...
           '\_\_\_\_ Known Channel  ' ]);

hold off
subplot(2,2,2)
semilogy(gm(mid:last,1),gm(mid:last,3),'k-.')
hold on
semilogy(gm(mid:last,1),gm(mid:last,4),'k-')

xlabel 'Model \alpha'
ylabel 'BER'
title '(b) BER vs. Model \alpha'

b = axis;

axis([gm(mid,1) 1 2.5e-2 5e-2])

hold off
