theorem
  (-1r)*z = -z;
