]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/grammar/lenv_weight.ma
- notation change for weight functions (following lambda)
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / grammar / lenv_weight.ma
index 537d32e5611f2e0ce975080963469a13a36df74a..7893bff32ce58267bcbf267af192c8ce8b891884 100644 (file)
@@ -19,14 +19,14 @@ include "basic_2/grammar/lenv.ma".
 
 let rec lw L ≝ match L with
 [ LAtom       ⇒ 0
-| LPair L _ V ⇒ lw L + #{V}
+| LPair L _ V ⇒ lw L + {V}
 ].
 
 interpretation "weight (local environment)" 'Weight L = (lw L).
 
 (* Basic properties *********************************************************)
 
-lemma lw_pair: ∀I,L,V. #{L} < #{(L.ⓑ{I}V)}.
+lemma lw_pair: ∀I,L,V. ♯{L} < ♯{L.ⓑ{I}V}.
 /3 width=1/ qed.
 
 (* Basic_1: removed theorems 2: clt_cong clt_head clt_thead *)