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

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):