samer@3: function o=max(A,B,DIM), 
samer@3: 	if nargin==2 && ~isempty(B), o=binfun(A,B,@max,@(a,b)sprintf('max(%s,%s)',a,b));
samer@3: 	else 
samer@3: 		if nargin<3, o=fnseq(@max,A);
samer@3: 		else o=fnseq(@(x)max(x,[],DIM),A);
samer@3: 		end
samer@3: 	end
samer@3: end
samer@3: