samer@4: function x=normalise(x,dim)
samer@4: % normalise - make x zero mean and unit variance in given dimension
samer@4: %
samer@4: % normalise :: [Size], D:natural -> [Size].
samer@4: %
samer@4: % The return value has zero mean and unit variance in the
samer@4: % Dth dimension.
samer@4: 
samer@4: x=divnorm(@(z)std(z,1,dim),addnorm(@(y)mean(y,dim),x));
samer@4: