Mercurial > hg > ishara

view sequences/@seq/min.m @ 19:1eb0ea29ec40

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Doesn't belong here.
author samer
date Thu, 17 Jan 2013 13:32:19 +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