theorem Th10:
  for x,y being ExtReal holds
   not x less_pred y implies y less_pred x or x = y
  proof
    let x,y be ExtReal;
    assume not x less_pred y & not y less_pred x;
    then x <= y & x >= y;
    hence thesis by XXREAL_0:1;
  end;
