theorem ThB52:
  A * 0_G = A
proof
  thus A * 0_G = -(0_G) + A + 0_G by Th50
    .= -(0_G) + A by Th37
    .= 0_G + A by Th8
    .= A by Th37;
end;
