% Online source www.appliedmathematics.info/software/mfiles/svecsize.m
% Online user guide www.appliedmathematics.info/software/mfiles/GEOM_m.htm

% function ssize: Returns the square of the modulus of a 2D or 3D vector. 
function svecsize=svecsize(vec)
svecsize = dotproduct(vec,vec);
end 