fact: Hypothesis induc : forall t t' t'', (t2_length t + t2_length t' + t2_length t'' < t2_length (gcons a1 b1 n1 c1) + t2_length (gcons a2 b2 n2 c2) + t2_length (gcons a3 b3 n3 c3))%nat -> lt t t' -> lt t' t'' -> lt t t''.
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)