update in ground

[helm.git] / matita / matita / contribs / lambdadelta / ground / relocation / tr_pap_tls.ma

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/tr_pap_tls.ma b/matita/matita/contribs/lambdadelta/ground/relocation/tr_pap_tls.ma
index da8ea1519527fc2299f606b796ea0a4ae5b1496c..ef36b6f3388519015fcad8b8127c97b8bbfda9ad 100644 (file)
--- a/matita/matita/contribs/lambdadelta/ground/relocation/tr_pap_tls.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/tr_pap_tls.ma
@@ -24,7 +24,7 @@ lemma tr_pap_plus (p1) (p2) (f):
 #p1 #p2 elim p2 -p2
 [ * #p #f //
 | #i #IH * #p #f
-  <pplus_succ_dx <tr_pap_succ <tr_pap_succ
+  <pplus_succ_dx <tr_cons_pap_succ <tr_cons_pap_succ
   <IH -IH >nsucc_inj //
 ]
 qed.