theorem Th22:
  1.F_Real + 1.F_Real <> 0.F_Real;
