X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fgr_isi_eq.ma;h=7a1967d00f5a9fd03b8dfcc11169b33bd12a1070;hp=fd631c333a19eaa2944231b6eeafedf5bd18e37f;hb=2ed8d2abcc3b0687141b627061b63350a0b200bd;hpb=b367de0252e88d6b0476648d5ceac7e4aeffca27 diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isi_eq.ma b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isi_eq.ma index fd631c333..7a1967d00 100644 --- a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isi_eq.ma +++ b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isi_eq.ma @@ -15,9 +15,9 @@ include "ground/relocation/gr_tl_eq_eq.ma". include "ground/relocation/gr_isi.ma". -(* IDENTITY CONDITION FOR GENERIC RELOCATION MAPS ***********************************************************) +(* IDENTITY CONDITION FOR GENERIC RELOCATION MAPS ***************************) -(* Properties with gr_eq *********************************************************) +(* Constructions with gr_eq *************************************************) (*** isid_eq_repl_back *) corec lemma gr_isi_eq_repl_back: @@ -33,7 +33,7 @@ lemma gr_isi_eq_repl_fwd: gr_eq_repl_fwd … gr_isi. /3 width=3 by gr_isi_eq_repl_back, gr_eq_repl_sym/ qed-. -(* Main inversion lemmas with gr_eq ****************************************************) +(* Main inversions with gr_eq ***********************************************) (*** isid_inv_eq_repl *) corec theorem gr_isi_inv_eq_repl (g1) (g2): 𝐈❪g1❫ → 𝐈❪g2❫ → g1 ≡ g2. @@ -43,7 +43,7 @@ cases (gr_isi_inv_gen … H2) -H2 /3 width=5 by gr_eq_push/ qed-. -(* Alternative definition with gr_eq ***************************************************) +(* Alternative definition with gr_eq ****************************************) (*** eq_push_isid *) corec lemma gr_eq_push_isi (f): ⫯f ≡ f → 𝐈❪f❫.