% [alpha_model Gauss GM Known]
gm = [
0 0.4944 0.4944 0.019
0.25 0.4944 0.3446 0.019
0.5 0.4944 0.1748 0.019
0.75 0.4944 0.1086 0.019
0.9 0.4944 0.0686 0.019
0.975 0.4944 0.0518 0.019
0.98 0.4944 0.0512 0.019
0.985 0.4944 0.0496 0.019
0.99 0.4944 0.049 0.019
0.995 0.4944 0.0486 0.019
];

last=10;

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 '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  ' ]);
