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

diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isu.ma b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isu.ma
index e731efcfc..2a81141fa 100644
--- a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isu.ma
+++ b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isu.ma
@@ -15,7 +15,7 @@
 include "ground/notation/relations/predicate_u_1.ma".
 include "ground/relocation/gr_isi.ma".
 
-(* UNIFORMITY CONDITION FOR GENERIC RELOCATION MAPS ***********************************************************)
+(* UNIFORMITY CONDITION FOR GENERIC RELOCATION MAPS *************************)
 
 (*** isuni *)
 inductive gr_isu: predicate gr_map ≝
@@ -29,7 +29,7 @@ interpretation
   "uniformity condition (generic relocation maps)"
   'PredicateU f = (gr_isu f).
 
-(* Basic inversion lemmas ***************************************************)
+(* Basic inversions *********************************************************)
 
 (*** isuni_inv_push *)
 lemma gr_isu_inv_push (g): 𝐔❪g❫ → ∀f. ⫯f = g → 𝐈❪f❫.
@@ -49,7 +49,7 @@ lemma gr_isu_inv_next (g): 𝐔❪g❫ → ∀f. ↑f = g → 𝐔❪f❫.
 ]
 qed-.
 
-(* Basic forward lemmas *****************************************************)
+(* Basic destructions *******************************************************)
 
 (*** isuni_fwd_push *)
 lemma gr_isu_fwd_push (g): 𝐔❪g❫ → ∀f. ⫯f = g → 𝐔❪f❫.