(* File: ML_int.v    (last edited on 25/10/2000  (c) Klaus Weich  *)
(* Axiomisation of the ML type "int" *)

Axiom less_dec : forall x y : Int, {Less x y} + {~ Less x y}.
Axiom
notequal_notless_greater :
forall x y : Int, ~ Equal x y -> ~ Less x y -> Less y x.