theorem Th92:
  - x*y = (-x)*y
proof
  thus - x*y = (-1)*(x*y) by Th91
    .= (-1)*x*y by Th66
    .= (-x)*y by Th91;
end;
