theorem :: REAL_2'8
  - (a - b) = - a + b;
