X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Flenv_weight.ma;h=c9d79e5f5195ffc74e9ee8445b531b8c62f8a6c6;hb=5832735b721c0bd8567c8f0be761a9136363a2a6;hp=9bd6e8260683402fded51e555c58d5f3aaee9eec;hpb=064980eacc2efe70ffee96134d75dfa37506fc36;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_weight.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_weight.ma index 9bd6e8260..c9d79e5f5 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_weight.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_weight.ma @@ -17,7 +17,7 @@ include "basic_2/grammar/lenv.ma". (* WEIGHT OF A LOCAL ENVIRONMENT ********************************************) -let rec lw L ≝ match L with +rec definition lw L ≝ match L with [ LAtom ⇒ 0 | LPair L _ V ⇒ lw L + ♯{V} ].