X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fdrop1%2Fgetl.ma;h=83889c30aaa663aff785f0a1f1d8aa774ba172cd;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=1a761e160746deaaec552483cf783f2926f0cb49;hpb=639e798161afea770f41d78673c0fe3be4125beb;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_1/drop1/getl.ma b/matita/matita/contribs/lambdadelta/basic_1/drop1/getl.ma
index 1a761e160..83889c30a 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/drop1/getl.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/drop1/getl.ma
@@ -18,7 +18,7 @@ include "basic_1/drop1/fwd.ma".
 
 include "basic_1/getl/drop.ma".
 
-theorem drop1_getl_trans:
+lemma drop1_getl_trans:
  \forall (hds: PList).(\forall (c1: C).(\forall (c2: C).((drop1 hds c2 c1) 
 \to (\forall (b: B).(\forall (e1: C).(\forall (v: T).(\forall (i: nat).((getl 
 i c1 (CHead e1 (Bind b) v)) \to (ex2 C (\lambda (e2: C).(drop1 (ptrans hds i)