function here = center_at_origin(M)
% centers the array (M) at the origin.  This sets the center of mass to be 0,0,0.

% centers the array at the origin.
% Created by Jim Work, University of South Carolina, August 13, 2003

a = 1

%centerX = 0;
%centerY = 0;
%centerZ = 0;

%for i = 1:size(M,1)
%   centerX = centerX + (M(i,2));
%   centerY = centerY + (M(i,3));
%   centerZ = centerZ + (M(i,4));
%end

%b= 2


%centerX = centerX/size(M,1);
%centerY = centerY/size(M,1);
%centerZ = centerZ/size(M,1);

%K= [];

%for i = 1:size(M,1)
 %  K(i,2) = M(i,2) - centerX;
  % K(i,3) = M(i,3) - centerY;
   %K(i,4) = M(i,4) - centerZ;
%end
%
%here = K;
here = 2

