X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fclen%2Fdefs.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_1%2Fclen%2Fdefs.ma;h=64209a6f7768eea2fcc5ec5fb63464657c4fbd7d;hb=ab2f735d97d2b9c965f13527d5f6f61048d29b22;hp=1230db5c84102763388f5668bda3edafd0883f70;hpb=c3904c007394068ed823575e3be3d73a9ad92cce;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 1230db5c8..64209a6f7 100644
--- a/matita/matita/contribs/lambdadelta/basic_1/clen/defs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_1/clen/defs.ma
@@ -18,6 +18,6 @@ include "basic_1/C/defs.ma".
 
 include "basic_1/s/defs.ma".
 
-let rec clen (c: C) on c: nat \def match c with [(CSort _) \Rightarrow O | 
-(CHead c0 k _) \Rightarrow (s k (clen c0))].
+rec definition clen (c: C) on c: nat \def match c with [(CSort _) \Rightarrow 
+O | (CHead c0 k _) \Rightarrow (s k (clen c0))].