modulo

(Toolbox/modulo.m in BrainStorm 2.0 (Alpha))

Function Synopsis

mod = modulo(index,N)

Help Text

MODULO - Compute the modulo
 function mod = modulo(index,N)

Cross-Reference Information

bst_mriviewer                      C:\BrainStorm_2001\Toolbox\bst_mriviewer.m
pcs_params                         C:\BrainStorm_2001\Toolbox\pcs_params.m

Listing of function C:\BrainStorm_2001\Toolbox\modulo.m

function mod = modulo(index,N)
%MODULO - Compute the modulo
% function mod = modulo(index,N)

%<autobegin> ---------------------- 26-May-2004 11:30:59 -----------------------
% --------- Automatically Generated Comments Block Using AUTO_COMMENTS ---------
%
% CATEGORY: Utility - Numeric
%
% At Check-in: $Author: Mosher $  $Revision: 13 $  $Date: 5/26/04 9:59a $
%
% This software is part of BrainStorm Toolbox Version 2.0 (Alpha) 24-May-2004
% 
% Principal Investigators and Developers:
% ** Richard M. Leahy, PhD, Signal & Image Processing Institute,
%    University of Southern California, Los Angeles, CA
% ** John C. Mosher, PhD, Biophysics Group,
%    Los Alamos National Laboratory, Los Alamos, NM
% ** Sylvain Baillet, PhD, Cognitive Neuroscience & Brain Imaging Laboratory,
%    CNRS, Hopital de la Salpetriere, Paris, France
% 
% See BrainStorm website at http://neuroimage.usc.edu for further information.
% 
% Copyright (c) 2004 BrainStorm by the University of Southern California
% This software distributed  under the terms of the GNU General Public License
% as published by the Free Software Foundation. Further details on the GPL
% license can be found at http://www.gnu.org/copyleft/gpl.html .
% 
% FOR RESEARCH PURPOSES ONLY. THE SOFTWARE IS PROVIDED "AS IS," AND THE
% UNIVERSITY OF SOUTHERN CALIFORNIA AND ITS COLLABORATORS DO NOT MAKE ANY
% WARRANTY, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO WARRANTIES OF
% MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, NOR DO THEY ASSUME ANY
% LIABILITY OR RESPONSIBILITY FOR THE USE OF THIS SOFTWARE.
%<autoend> ------------------------ 26-May-2004 11:30:59 -----------------------

% History --------------------------------
% JCM 08-Sep-2003 Commenting
% ----------------------------------------

inter = index/N;
if inter<0
   inter2 = -inter;
else 
   inter2 = inter;
end;
if  inter2 >1
   mod = N * (inter2-1);
else
   mod = sign(index) * index;
end;

if inter<0
   mod  = N-mod;
end;
if inter==0
   mod = N;
end        

mod = round(mod);