annotate general/numerical/normalise01.m @ 29:61921dceded1

More documentation on type system.

function x=normalise01(x,dim)
% normalise01 - scale and shift all values into the range [0,1].
%
% normalise01 :: [Size], D:natural -> [Size].

if nargin<2, 
	sz=size(x);
	dims=find(sz>1);
	if isempty(dims), dim=1; else dim=dims(1); end
end
	
x=divnorm(@(z)max(z,[],dim),addnorm(@(y)min(y,[],dim),x));