(* CNS de reconnaissance d'une liste de terme par une prec_list *)

Lemma pl_path_rec_equiv_0_1 :
forall (d : preDTA) (a : ad) (la ls : prec_list) (hd : term)
(tl : term_list),
reconnaissance d a hd ->
liste_reconnait d la tl ->
pl_path_rec_equiv_0_def d la tl ->
pl_path_rec_equiv_0_def d (prec_cons a la ls) (tcons hd tl).