X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fgrammar%2Fterm_weight.ma;h=3787abe9355594a583a9700667efd455089b54ac;hb=99573d95dbebe2ec3dac5eda7b1dde2fe819ce3f;hp=3f9fbef8775b55a2e353acea9aafbedceca23a44;hpb=380ceb6b6552fd9ebd48d710ab12931d5d97e465;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/grammar/term_weight.ma b/matita/matita/contribs/lambdadelta/basic_2/grammar/term_weight.ma index 3f9fbef87..3787abe93 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/grammar/term_weight.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/grammar/term_weight.ma @@ -12,6 +12,7 @@ (* *) (**************************************************************************) +include "basic_2/notation/functions/weight_1.ma". include "basic_2/grammar/term.ma". (* WEIGHT OF A TERM *********************************************************) @@ -26,7 +27,7 @@ interpretation "weight (term)" 'Weight T = (tw T). (* Basic properties *********************************************************) (* Basic_1: was: tweight_lt *) -lemma tw_pos: ∀T. 1 ≤ #{T}. +lemma tw_pos: ∀T. 1 ≤ ♯{T}. #T elim T -T // qed.