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