function [vec] = val(f,n)

pp = P(n);
l = 2^n;

for k = 1:l
    vec(k) = f(pp(k));
end;



end

