X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fclen%2Fdefs.ma;h=a70c3ef675ba6be06dd199d0c4638b85bb3b07a7;hb=7b95759c5011a25f96d5171561ea79d063770db4;hp=07539ffadcf601c2d4f54ec78c9e0d9f39b0eef2;hpb=d795687ffe924872a5e36122c2bd3069d6409454;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_1/clen/defs.ma b/matita/matita/contribs/lambdadelta/basic_1/clen/defs.ma
index 07539ffad..a70c3ef67 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/clen/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/clen/defs.ma
@@ -14,13 +14,10 @@
 
 (* This file was automatically generated: do not edit *********************)
 
-include "Basic-1/C/defs.ma".
+include "basic_1/C/defs.ma".
 
-include "Basic-1/s/defs.ma".
+include "basic_1/s/defs.ma".
 
-definition clen:
- C \to nat
-\def
- let rec clen (c: C) on c: nat \def (match c with [(CSort _) \Rightarrow O | 
-(CHead c0 k _) \Rightarrow (s k (clen c0))]) in clen.
+let rec clen (c: C) on c: nat \def match c with [(CSort _) \Rightarrow O | 
+(CHead c0 k _) \Rightarrow (let TMP_1 \def (clen c0) in (s k TMP_1))].