p=b2pw(b,n,ppr);

function p=b2pw(b,n,ppr);
d=0;
for i=2:n+1
    d=d+b(i)*2^(n-i+1);
end
if d==0;
    p=-1;
else 
    p=ppr(d);
end