theorem :: REAL_2'17_4
  a = - b - (- a - b);
