proposition: Lemma tricho_lt_3 : forall a1 a2 b1 b2 n1 n2 r1 r2, t2_length b1 + t2_length b2 < t2_length (gcons a1 b1 n1 r1) + t2_length (gcons a2 b2 n2 r2).
proof: Proof. intros;apply Nat.add_lt_mono; apply length_b. 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)