view toolboxes/distance_learning/mlr/regularize/regularizeMKLFull.m @ 0:e9a9cd732c1e tip

first hg version after svn

function r = regularizeMKLFull(W, X, gradient)
%
% r = regularizMKL(W, X, gradient)
%
%

    [d,n,m] = size(X);

    if gradient
        r = X;
    else
        r = 0;
        for i = 1:m
            r = r + sum(sum(W(:,:,i) .* X(:,:,i)));
        end
    end
end