update in ground

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

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/tr_compose_pap.ma b/matita/matita/contribs/lambdadelta/ground/relocation/tr_compose_pap.ma
index 7854b2a69a6323058937fdf2fa9b1908c5b83ccc..5114c745b99757450aa38bfe5fef681e484b0d44 100644 (file)
--- a/matita/matita/contribs/lambdadelta/ground/relocation/tr_compose_pap.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/tr_compose_pap.ma
@@ -24,8 +24,8 @@ lemma tr_compose_pap (i) (f1) (f2):
       f2＠⧣❨f1＠⧣❨i❩❩ = (f2∘f1)＠⧣❨i❩.
 #i elim i -i
 [ * #p1 #f1 #f2
-  <tr_compose_unfold <tr_pap_unit <tr_pap_unit //
+  <tr_compose_unfold <tr_cons_pap_unit <tr_cons_pap_unit //
 | #i #IH * #p1 #f1 #f2
-  <tr_compose_unfold <tr_pap_succ <tr_pap_succ //
+  <tr_compose_unfold <tr_cons_pap_succ <tr_cons_pap_succ //
 ]
 qed.