Definition liste_rec_length_def (d : preDTA) (pl : prec_list)
(tl : term_list) : Prop :=
forall n : nat,
liste_reconnait d pl tl -> pl_tl_length pl n -> n = lst_length tl.

Lemma liste_rec_length :
forall (pl : prec_list) (tl : term_list) (d : preDTA) (n : nat),
liste_reconnait d pl tl -> pl_tl_length pl n -> n = lst_length tl.