X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Freduction%2Fcix_lift.ma;h=59d408deeb79114a9d156bae26c0b00a7fae62a9;hb=52e675f555f559c047d5449db7fc89a51b977d35;hp=7a3d5e68b24254e84e823599b635880153446ce2;hpb=75fac6d60f67a4dfa38ea6c2cc45a18eda5d8996;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_lift.ma b/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_lift.ma
index 7a3d5e68b..59d408dee 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_lift.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/reduction/cix_lift.ma
@@ -21,7 +21,7 @@ include "basic_2/reduction/cix.ma".
 
 lemma cix_lref: ∀h,g,G,L,i. ⇩[i] L ≡ ⋆ → ⦃G, L⦄ ⊢ ➡[h, g] 𝐈⦃#i⦄.
 #h #g #G #L #i #HL #H elim (crx_inv_lref … H) -h #I #K #V #HLK
-lapply (ldrop_mono … HLK … HL) -L -i #H destruct
+lapply (drop_mono … HLK … HL) -L -i #H destruct
 qed.
 
 (* Properties on relocation *************************************************)