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

Doesn't belong here.
author samer
date Thu, 17 Jan 2013 13:32:19 +0000
parents 3f77126f7b5f
children b1280319413e
rev   line source
samer@3 1
samer@3 2 % min - min mapped over sequence (ie NOT aggregate)
samer@3 3 function o=min(A,B,DIM),
samer@3 4 if nargin==2 && ~isempty(B), o=binfun(A,B,@min@(a,b),sprintf('max(%s,%s)',a,b));
samer@3 5 else
samer@3 6 if nargin<3, o=fnseq(@min,A);
samer@3 7 else o=fnseq(@(x)min(x,[],DIM),A);
samer@3 8 end
samer@3 9 end
samer@3 10 end
samer@3 11