]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambda_delta/basic_2/grammar/term_weight.ma
- we introduced the pointer_step rc in the perspective of proving
[helm.git] / matita / matita / contribs / lambda_delta / basic_2 / grammar / term_weight.ma
index 00050032d0a9df6634fbc02d4c112d506d75ff4d..d8f39a3a154de4d7c53ca040220ef80ee4a118e2 100644 (file)
@@ -26,18 +26,18 @@ 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.
 
 (* Basic eliminators ********************************************************)
 
-axiom tw_wf_ind: ∀R:predicate term.
-                 (∀T2. (∀T1. #[T1] < #[T2] → R T1) → R T2) →
-                 ∀T. R T.
+axiom tw_ind: ∀R:predicate term.
+              (∀T2. (∀T1. #{T1} < #{T2} → R T1) → R T2) →
+              ∀T. R T.
 
 (* Basic_1: removed theorems 11:
             wadd_le wadd_lt wadd_O weight_le weight_eq weight_add_O
-                 weight_add_S tlt_trans tlt_head_sx tlt_head_dx tlt_wf_ind
+            weight_add_S tlt_trans tlt_head_sx tlt_head_dx tlt_wf_ind
             removed local theorems 1: q_ind
 *)