theorem ThB18:
  a * b = 0_G implies a = 0_G
proof
  assume a * b = 0_G;
  then (-b) = (-b) + a by Th11;
  hence thesis by Th7;
end;
