X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fdelayed_updating%2Fsubstitution%2Ffsubst_lift.ma;h=bf5c9b6f660346131dd52ad058b14545fc059bcd;hb=e0c91d8a4422da0b39aca790e5826dc8a617b303;hp=c98698864fdb04ead636d08143cfc9dff5f65d1f;hpb=85fcff9664b400a1cf25f383505638ffe34222b6;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/delayed_updating/substitution/fsubst_lift.ma b/matita/matita/contribs/lambdadelta/delayed_updating/substitution/fsubst_lift.ma
index c98698864..bf5c9b6f6 100644
--- a/matita/matita/contribs/lambdadelta/delayed_updating/substitution/fsubst_lift.ma
+++ b/matita/matita/contribs/lambdadelta/delayed_updating/substitution/fsubst_lift.ma
@@ -29,7 +29,7 @@ lemma lift_fsubst_sn (f) (t) (u) (p): u ϵ 𝐏 →
 | * #q #Hq #H1 #H0
   @(ex2_intro … H1) @or_intror @conj // *
   [ <list_append_empty_dx #H2 destruct
-    elim (lift_root f q) #r #_ #Hr /2 width=2 by/
+    elim (lift_path_root f q) #r #_ #Hr /2 width=2 by/
   | #l #r #H2 destruct
     @H0 -H0 [| <lift_append_proper_dx /2 width=3 by ppc_lcons/ ]
   ]