% zeromean - additive normalisation to zero mean
%
% zeromean :: 
%    [D:[[E]]] ~'E dimensional array of size D', 
%    1..D      ~'dimension to normalise along' 
% -> [D] ~'shifted data'.
function x=zeromean(x,dim), x=addnorm(@(y)mean(y,dim),x); end

