X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_2%2Frelocation%2Frtmap_id.ma;h=7f71ecf1bb04368eeb6360bfbfe7f35cc16bf63c;hb=bd53c4e895203eb049e75434f638f26b5a161a2b;hp=0c63147efa39ece95b02e44997ce55228da12a29;hpb=3b7b8afcb429a60d716d5226a5b6ab0d003228b1;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/ground_2/relocation/rtmap_id.ma b/matita/matita/contribs/lambdadelta/ground_2/relocation/rtmap_id.ma index 0c63147ef..7f71ecf1b 100644 --- a/matita/matita/contribs/lambdadelta/ground_2/relocation/rtmap_id.ma +++ b/matita/matita/contribs/lambdadelta/ground_2/relocation/rtmap_id.ma @@ -19,13 +19,13 @@ include "ground_2/relocation/rtmap_isid.ma". (* Basic properties *********************************************************) -lemma id_isid: 𝐈⦃𝐈𝐝⦄. +lemma id_isid: 𝐈❪𝐈𝐝❫. /3 width=5 by eq_push_isid/ qed. (* Alternative definition of isid *******************************************) -lemma eq_id_isid: ∀f. 𝐈𝐝 ≡ f → 𝐈⦃f⦄. +lemma eq_id_isid: ∀f. 𝐈𝐝 ≡ f → 𝐈❪f❫. /2 width=3 by isid_eq_repl_back/ qed. -lemma eq_id_inv_isid: ∀f. 𝐈⦃f⦄ → 𝐈𝐝 ≡ f. +lemma eq_id_inv_isid: ∀f. 𝐈❪f❫ → 𝐈𝐝 ≡ f. /2 width=1 by isid_inv_eq_repl/ qed-.