Module ZOrderProp (Import Z : ZAxiomsMiniSig').
Include ZMulProp Z.
(** Instances of earlier theorems for m == 0 *)
Ltac zinduct n := induction_maker n ltac:(apply order_induction_0).
(** Theorems that are either not valid on N or have different proofs on N and Z *)

Theorem le_le_pred : forall n m, n <= m -> P n <= m.