proposition: Lemma is_limit_ab : forall alpha beta n gamma, is_limit (gcons alpha beta n gamma) -> zero t2< alpha \/ zero t2< beta.
proof: Proof. inversion 1; [trivial |]. generalize H5 H2 ;case gamma. - inversion 2. - inversion_clear 1. inversion_clear H7. + left;apply le_lt_trans with t;auto with T2. + right; apply le_lt_trans with t0;auto with T2. + right; apply le_lt_trans with [t,t0];auto with T2. + right;apply le_lt_trans with t;auto with T2. + lt_clean. + lt_clean. 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)