samer@4: % forels - do an action for each element of an array in order
samer@4: %
samer@4: % forels :: 
samer@4: %    (A->action) ~'action to apply to each element', 
samer@4: %    [[Size]->A] ~'array of elements of type',
samer@13: %    options iterate_options
samer@13: % => void.
samer@4: %
samer@4: % Note, the array can be multidimensional - the standard order
samer@4: % cycles through the earlier indices before the later ones, eg
samer@4: % rows, then columns, then slices etc.
samer@4: 
samer@13: function forels(f,X,varargin)
samer@4: 	N=numel(X);
samer@4: 	iterate(@g,1,varargin{:});
samer@4: 
samer@4: 	function i=g(i)
samer@4: 		if i>N, i=[]; else f(X(i)); i=i+1; end
samer@4: 	end
samer@4: end