Module Type NZParityProp
(Import A : NZOrdAxiomsSig')
(Import B : NZParity A)
(Import C : NZMulOrderProp A).
(** Morphisms *)
#[global]
Instance Even_wd : Proper (eq==>iff) Even.
#[global]
Instance odd_wd : Proper (eq==>Logic.eq) odd.
(** Evenness and oddity are dual notions *)

(** Parity and successor of successor *)
Lemma Even_succ_succ : forall n, Even (S (S n)) <-> Even n.