theorem
  seq is constant implies (seq ^\k) is constant;
