X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fgr_isd_tls.ma;h=dc5b123cc05310f03f1ea7e49ac69372079f9b0e;hb=8bbe582d87984526f40182c4409cbfd43108cb79;hp=71375b46351038aa215d6812b6644a3055157fc1;hpb=55c768d7e45babb300b5010463ba3196a68f1bbe;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tls.ma b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tls.ma
index 71375b463..dc5b123cc 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tls.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tls.ma
@@ -15,11 +15,11 @@
 include "ground/relocation/gr_tls.ma".
 include "ground/relocation/gr_isd_tl.ma".
 
-(* DIVERGENCE CONDITION FOR GENERIC RELOCATION MAPS ***********************************************************)
+(* DIVERGENCE CONDITION FOR GENERIC RELOCATION MAPS *************************)
 
-(* Properties with iterated tail ********************************************)
+(* Constructions with gr_tls ************************************************)
 
 (*** isdiv_tls *)
-lemma gr_isd_tls (n) (g): 𝛀❪g❫ → 𝛀❪⫱*[n]g❫.
+lemma gr_isd_tls (n) (g): 𝛀❪g❫ → 𝛀❪⫰*[n]g❫.
 #n @(nat_ind_succ … n) -n /3 width=1 by gr_isd_tl/
 qed.