X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Flenv_length.ma;h=f608f8c3c26189e7910c2f36ce4257c4f29239c8;hb=5832735b721c0bd8567c8f0be761a9136363a2a6;hp=29fee0ef19a566c53eba8bdfe69feef387d672b6;hpb=064980eacc2efe70ffee96134d75dfa37506fc36;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_length.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_length.ma index 29fee0ef1..f608f8c3c 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_length.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_length.ma @@ -16,7 +16,7 @@ include "basic_2/grammar/lenv.ma". (* LENGTH OF A LOCAL ENVIRONMENT ********************************************) -let rec length L ≝ match L with +rec definition length L ≝ match L with [ LAtom ⇒ 0 | LPair L _ _ ⇒ ⫯(length L) ].