function retval = convpow(P, n)
  retval = [1];
  for j=1:n
    retval = conv(retval, P);
  endfor
endfunction