X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Fcpts_aaa.ma;h=864c4849527151110673a363b288bbc6b5a5d140;hb=9605ffc88831066a901ea4eb8e419f277662f372;hp=fb99d63286c236b07c26c1757297612bc7afa14c;hpb=bd53c4e895203eb049e75434f638f26b5a161a2b;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpts_aaa.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpts_aaa.ma
index fb99d6328..864c48495 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpts_aaa.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpts_aaa.ma
@@ -20,7 +20,7 @@ include "basic_2/rt_computation/cpts_drops.ma".
 (* Properties with atomic arity assignment for terms ************************)
 
 lemma cpts_total_aaa (h) (G) (L) (T1):
-      ∀A. ❪G,L❫ ⊢ T1 ⁝ A → ∀n. ∃T2. ❪G,L❫ ⊢ T1 ⬆*[h,n] T2.
+      ∀A. ❨G,L❩ ⊢ T1 ⁝ A → ∀n. ∃T2. ❨G,L❩ ⊢ T1 ⬆*[h,n] T2.
 #h #G #L #T1 #A #H elim H -G -L -T1 -A
 [ #G #L #s #n /3 width=2 by ex_intro/
 | #I #G #K #V1 #B #_ #IH #n -B