function SNR0
snr_in_dB1=0:1:10;
snr_in_dB2=0:1:10;
for i=1:length(snr_in_dB1)
    [bpsk_ber]=bpsk_fading(snr_in_dB1(i));
    bpsk_ber_prb(i)=bpsk_ber;
end

for i=1:length(snr_in_dB2)
    [dscdma_ber]=dscdmabpsk(snr_in_dB2(i));
    dscdma_ber_prb(i)=dscdma_ber;
end
semilogy(snr_in_dB1,bpsk_ber_prb,'*r');
hold
semilogy(snr_in_dB2,dscdma_ber_prb);