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