Module Type NZDivProp
(Import A : NZOrdAxiomsSig')
(Import B : NZDiv' A)
(Import C : NZMulOrderProp A).
(** Uniqueness theorems *)
(** A division by itself returns 1 *)
(** A division of a small number by a bigger one yields zero. *)
(** Same situation, in term of modulo: *)
(** * Basic values of divisions and modulo. *)
(** * Order results about mod and div *)
(** A modulo cannot grow beyond its starting point. *)
(* Division of positive numbers is positive. *)

Lemma mod_small_iff : forall a b, 0<=a -> 0<b -> (a mod b == a <-> a<b).