X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_2%2Frelocation%2Frtmap_id.ma;h=7f71ecf1bb04368eeb6360bfbfe7f35cc16bf63c;hb=1fd63df4c77f5c24024769432ea8492748b4ac79;hp=c08e32055de35e02ccb1916ff3a47f14a407dfa5;hpb=91ab6965be539b7ed0f3208e1c1fffd17aa151f7;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 c08e32055..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-.