samer@4: function foreach(f,X,varargin)
samer@4: % foreach - do an action for each element in a cell array in order
samer@4: %
samer@4: % foreach :: (A->action), {[N]->A} -> action.
samer@4: % foreach :: (A->action), {[N]->A}, options {} -> action.
samer@4: %
samer@4: % Takes the same options as iterate.
samer@4: 
samer@4: 	iterate(@g,X,varargin{:});
samer@4: 
samer@4: 	function x=g(x)
samer@4: 		f(x{1});
samer@4: 		x=x(2:end);
samer@4: 	end
samer@4: end