samer@44: function varargout=with_columns(f,x,varargin)
samer@44: 	slices=cslices(x,2);
samer@44: 	[varargout{1:nargout}]=f(slices{:},varargin{:});
samer@44: end
samer@44: 
samer@44: function y=cslices(x,dim)
samer@44: 	if nargin<2, dim=length(size1(x)); end
samer@44: 	y=map(@(i)sli(x,i,dim),num2cell(1:size(x,dim)));
samer@44: end