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

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/gr_pat_pat_id.ma b/matita/matita/contribs/lambdadelta/ground/relocation/gr_pat_pat_id.ma
index e4dee24af..e20fb6e5f 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/gr_pat_pat_id.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/gr_pat_pat_id.ma
@@ -15,16 +15,16 @@
 include "ground/relocation/gr_pat_id.ma".
 include "ground/relocation/gr_pat_pat.ma".
 
-(* POSITIVE APPLICATION FOR GENERIC RELOCATION MAPS ***********************************************************)
+(* POSITIVE APPLICATION FOR GENERIC RELOCATION MAPS *************************)
 
-(* Advanced Forward lemmas on id ********************************************)
+(* Advanced destructions with gr_id *****************************************)
 
 (*** at_id_fwd *)
 lemma gr_pat_id_des (i1) (i2):
       @❪i1,𝐢❫ ≘ i2 → i1 = i2.
 /2 width=4 by gr_pat_mono/ qed-.
 
-(* Main properties on id ****************************************************)
+(* Main constructions with gr_id ********************************************)
 
 (*** at_div_id_dx *)
 theorem gr_pat_div_id_dx (f):