theorem :: REAL_1'22:  :: right to left - requirements REAL
  -a = 0 implies a = 0;
