channel 2.m.txt

this is the code for orthogonal code divison multiple access

% RANDEXPO(a,n)
%   This function creates an exponentially distributed random variable
%   with parameter 'a'.  If a second argument is used, a vector of
%   'n' exponential variables is created.

function out = randexpo(a, n)

if nargin == 1
    out = -log(rand) / a;
end

if nargin == 2
    randvec = rand(1,n);
    out = -log(randvec) ./ a;
end