proposition: Lemma tricho_lt_7 : forall a1 b1 n1 c1 c2, length c1 + length c2 < length (cons a1 b1 n1 c1) + length (cons a1 b1 n1 c2).
proof: Proof. intros. apply plus_lt_compat; apply length_c. Qed.
imports: EPSILON0 Arith List Omega Compare_dec Relations Wellfounded Max Tools More_nat AccP not_decreasing EPSILON0 More_nat Gamma0_prelude Gamma0_length term rpo