function y = compute_linfball_projection(x,t)
% compute_linfball_projection - compute the projection on the l_\infty ball
%
%   y = compute_linfball_projection(x,t);
%
%   x is the projection of y on the set {a \ ||a|| <= t }
%
if t<0
    error('t should be > 0');
end
if t==0
    y = x*0;
    return;
end

y = x - SoftThresh(x,t);