Definition nZterm : list (Term A n) -> Prop.Definition canonical (a : list (Term A n)) : Prop := olist a /\ nZterm a.

Theorem canonical_imp_in_nzero : forall p : list (Term A n), canonical p -> forall a : Term A n, In a p -> ~ zeroP (A:=A) A0 eqA (n:=n) a.