Definition T2M : Term -> mon n.Definition eqT (a b : Term) : Prop := T2M a = T2M b.

(* Specifications: *)
Lemma eqT_refl : reflexive _ eqT.
Lemma eqT_sym : symmetric _ eqT.
Lemma eqT_trans : transitive _ eqT.
Theorem eqTerm_imp_eqT : forall a b : Term, eqTerm a b -> eqT a b.
Theorem eqTerm_dec : forall x y : Term, {eqTerm x y} + {~ eqTerm x y}.
Theorem eqT_zerop_is_eqTerm : forall a b : Term, eqT a b -> zeroP a -> zeroP b -> eqTerm a b.
Theorem zeroP_dec : forall x : Term, {zeroP x} + {~ zeroP x}.
Theorem zeroP_comp_eqTerm : forall a b : Term, zeroP a -> eqTerm a b -> zeroP b.
Theorem nzeroP_comp_eqTerm : forall a b : Term, ~ zeroP a -> eqTerm a b -> ~ zeroP b.