view general/numerical/maxnorm.m @ 6:0ce3c2070089

Removed duplicate code and fixed doc in timed_action.

% 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