% File: E7_038.M

clear;

% x is Eo/No in dB
x = -1:0.5:15;

% Generating  Pp(x)

Pp = zeros(length(x),1);

for (i = 1:1:length(x))
  Pp(i) = sqrt(2*10^(x(i)/10));
end;

Pp = q(Pp);

fprintf('\nSee Window for plot.\n');

% Plotting results
semilogy(x,Pp);
xlabel('EbNodB');
title('BER for BPSK Signaling');
%axis;




