transferMoments.m

% This function is part of the NMSM Pipeline, see file for full license.
%
% This function transfers the location of moment to the position
% indicated. 
%
% (2D matrix, 2D matrix, 2D matrix, 2D matrix) -> (2D matrix)
% Returns moments at a different location


function moment = transferMoments(oldPosition, newPosition, moment, force)

moment = cross(oldPosition - newPosition, force, 2) + moment;
end