Mercurial > hg > ishara

view sequences/@seq/min.m @ 6:0ce3c2070089

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Removed duplicate code and fixed doc in timed_action.
author samer
date Mon, 14 Jan 2013 14:33:37 +0000
parents 3f77126f7b5f
children b1280319413e
line wrap: on
line source

% min - min mapped over sequence (ie NOT aggregate)
function o=min(A,B,DIM), 
	if nargin==2 && ~isempty(B), o=binfun(A,B,@min@(a,b),sprintf('max(%s,%s)',a,b));
	else 
		if nargin<3, o=fnseq(@min,A);
		else o=fnseq(@(x)min(x,[],DIM),A);
		end
	end
end