theorem
  A -- a = -- (a -- A) by Th71;
