theorem
  <* x *> - A = <* x *> iff not x in A by Lm6;
