bit_gen.m

瑞利衰落信道下

%gives the complex fade coefficients
%output power is approximately unity
%inputs:max_doppler_freq (Hz); sample_freq (Hz); num_samples

function [bit_vec] = bit_gen(num_bits, seed)
   
    rand('state',seed);
    bit_vec=rand(num_bits,1);
    bit_vec=(bit_vec>0.5);