function y_hat = compute_yhat_vpcell(X,Y,x,v,ker)
%nx = size(x,1); % for how many x's are we evaluating?
nx = length(x); % for how many x's are we evaluating?
y_hat = zeros(nx,1);
if nx>1, PROGstart(nx); end
for n=1:nx
  x_n = x{n};
  vx = 0;
  for i=v
    x_i = X{i};
    vx = vx + Y(i) * feval(ker,x_i,x_n);
  end
  y_hat(n) = sign(vx);
  if nx>1, PROGupdate(n); end
end
if nx>1, PROGend; end
return