theorem
  A * H1 * H2 = A * (H1 * carr H2) by Th10;
