view support/normcol.m @ 6:e2a029a70df3

rearranged directories

function [x n] = normcol(x)
%NORMCOL normalise the columns to unit length
%
% [x n] = normcol(x)
%
% normalises the columns of the input matrix x and returns a vector n
% containing the initial norm of the columns.
%
% ----------------------------------------------------------- %
%  Daniele Barchiesi, [e-mail]       %
%  Centre for Digital Music, Queen Mary University of London  %
%  Apr. 2011                                                  %
% ----------------------------------------------------------- %
n = sqrt(sum(conj(x).*x,1));
x = x*diag(1./n);