%*************************************************************************************
%         This function generates random +1/-1 sequence with independent identically 
%			 distributed symbols
%
%         AUTHOR: Wenbin Luo
%			 DATE  : 04/28/01
%
%			 SYNOPSIS: x = bingen(L)
%         L ---> number of random symbols               
%***********************************************************************************

function x = bingen(L)
%generate L symbols randomly with value +1 or -1
x = rand(1,L);
x(find(x<0.5)) = -1;
x(find(x >=0.5)) = 1;