% calcula energia de una banda
% funcion empleada para el calculo del fingerprints

function E=calc_energ(x)

[M,N]=size(x);

if M>=N
    E=x'*x;
else
    E=x*x';
end
