theorem Th60:
  H |^ a |^ b = H |^ (a * b)
proof
  the carrier of H |^ a |^ b = carr(H |^ a) |^ b by Def6
    .= (carr H |^ a) |^ b by Def6
    .= carr H |^ (a * b) by Th47
    .= the carrier of H |^ (a * b) by Def6;
  hence thesis by GROUP_2:59;
end;
