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

diff --git a/matita/matita/contribs/lambdadelta/basic_1/wf3/fwd.ma b/matita/matita/contribs/lambdadelta/basic_1/wf3/fwd.ma
index 98eb5558c..d4718ec6e 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/wf3/fwd.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/wf3/fwd.ma
@@ -16,7 +16,7 @@
 
 include "basic_1/wf3/defs.ma".
 
-implied let rec wf3_ind (g: G) (P: (C \to (C \to Prop))) (f: (\forall (m: 
+implied rec lemma wf3_ind (g: G) (P: (C \to (C \to Prop))) (f: (\forall (m: 
 nat).(P (CSort m) (CSort m)))) (f0: (\forall (c1: C).(\forall (c2: C).((wf3 g 
 c1 c2) \to ((P c1 c2) \to (\forall (u: T).(\forall (t: T).((ty3 g c1 u t) \to 
 (\forall (b: B).(P (CHead c1 (Bind b) u) (CHead c2 (Bind b) u))))))))))) (f1: