view general/numerical/maxnorm.m @ 4:e44f49929e56

Adding reorganised general toolbox, now in several subdirectories.

% maxnorm - additive normalisation of vectors
%
% maxnorm :: [[N]] -> [[N]], real.
function [y,m]=maxnorm(x)
	k=max(x);
	if isfinite(k), y=x-k;
	else y=zeros(size(x)); 
	end
end