theorem Th18:
  a |^ b = 1_G implies a = 1_G
proof
  assume a |^ b = 1_G;
  then b" = b" * a by GROUP_1:12;
  hence thesis by GROUP_1:7;
end;
