Function: CDMA

function[cr, dt, mag, thetad, thetar] = CDMA(a,b)
% Gives cross product, dot product, magnitude, and angle between vectors in
% degrees and radians
cr = cross(a,b);
% Cross product
dt = dot(a,b)
% Dot product
mag = sqrt(sum(cr.^2));
% Magnitude of vectors
MagA = sqrt(sum(a.^2));
MagB = sqrt(sum(b.^2));
thetad = acosd(dot(a,b)/(MagA*MagB));
% Angle between in degrees
thetar = acos(dot(a,b)/(MagA*MagB));
% Angle between in radians
end