tic
BER=[];
Raw_BER=[];
SNR=10;
SimBits=[10000];
for k=1:size(SNR,2)
   % [BER_temp,Raw_BER_temp]=stbc_2t1r_bpsk_uncorr_Rayleigh(SNR,SimBits(k));
    BER=stbc_2t2r_bpsk_uncorr_Rayleigh(SNR,SimBits(k));
   % BER=[BER BER_temp];
   % Raw_BER=[Raw_BER Raw_BER_temp]
    clock;
end
toc