proposition: Lemma le_one_cons : forall a b n c, one t2<= gcons a b n c.
proof: Proof. intros. apply le_trans with [a,b];auto with T2. case a; case b; auto with T2. Qed.
imports: Coq(Arith List Lia Compare_dec Relations Wellfounded RelationClasses) hydras(Epsilon0) hydras(More_Arith Restriction) hydras(ON_Generic) hydras(rpo.term rpo.rpo) hydras(T2) hydras(Compat815)