Module NZOfNatOrd (Import NZ:NZOrdSig').
Include NZOfNat NZ.
Include NZBaseProp NZ <+ NZOrderProp NZ.
Local Open Scope ofnat.
(* In addition, we can prove that [ofnat] preserves order. *)

Lemma ofnat_le : forall n m : nat, [n]<=[m] <-> (n<=m)%nat.