X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fapps_2%2Fmodels%2Fli.ma;h=4d36f142788b2b4c4efe64aa8a6b14906bd1e828;hp=f0f2c0f6366c6fa57b13a1c958dca0db05365811;hb=cc6fcb70ca4f3cf01205ed722d75a2fdb2aaf779;hpb=41b61472d2c475e0f69e3dfc85539da3ad2bac1e

diff --git a/matita/matita/contribs/lambdadelta/apps_2/models/li.ma b/matita/matita/contribs/lambdadelta/apps_2/models/li.ma
index f0f2c0f63..4d36f1427 100644
--- a/matita/matita/contribs/lambdadelta/apps_2/models/li.ma
+++ b/matita/matita/contribs/lambdadelta/apps_2/models/li.ma
@@ -113,7 +113,7 @@ lemma li_repl (M) (L): is_model M ->
 | #lv1 #d #K #V #_ #Hd #IH #gv2 #Hgv #lv2 #Hlv destruct
   @li_veq [2: /4 width=4 by li_abbr, veq_refl/ | skip ] -IH
   @(veq_canc_sn … Hlv) -Hlv //
-  /4 width=1 by ti_comp, vlift_comp, (* 2x *) veq_refl/
+  /4 width=1 by ti_comp, vpush_comp, (* 2x *) veq_refl/
 | #lv1 #d #K #W #_ #IH #gv2 #Hgv #lv2 #Hlv
   @li_veq /4 width=3 by li_abst, veq_refl/
 | #lv1 #d #I #K #_ #IH #gv2 #Hgv #lv2 #Hlv