theorem
  (a * b) |^ i = a |^ i * (b |^ i) by Th37;
