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 addition *)
Lemma even_add : forall n m, even (n+m) = Bool.eqb (even n) (even m).