X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fdrop%2Ffwd.ma;h=0b7876eeae7e27e9f662abc50b1c1ef31bf66373;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=a77911cae174b05991a0bac5c91520a1cfc0c169;hpb=8de8cf8adfa6fcda91047eb2c25535893ede046a;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_1/drop/fwd.ma b/matita/matita/contribs/lambdadelta/basic_1/drop/fwd.ma
index a77911cae..0b7876eea 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/drop/fwd.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/drop/fwd.ma
@@ -22,7 +22,7 @@ include "basic_1/r/props.ma".
 
 include "basic_1/C/fwd.ma".
 
-implied let rec drop_ind (P: (nat \to (nat \to (C \to (C \to Prop))))) (f: 
+implied rec lemma drop_ind (P: (nat \to (nat \to (C \to (C \to Prop))))) (f: 
 (\forall (c: C).(P O O c c))) (f0: (\forall (k: K).(\forall (h: nat).(\forall 
 (c: C).(\forall (e: C).((drop (r k h) O c e) \to ((P (r k h) O c e) \to 
 (\forall (u: T).(P (S h) O (CHead c k u) e))))))))) (f1: (\forall (k: