X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_2%2Frelocation%2Fnstream_isid.ma;h=98dc8f2203cdc9faea979096a21421593f10d630;hp=4f3e415eb7616b96a1de5c719a31f6b994b0fbac;hb=bd53c4e895203eb049e75434f638f26b5a161a2b;hpb=3b7b8afcb429a60d716d5226a5b6ab0d003228b1 diff --git a/matita/matita/contribs/lambdadelta/ground_2/relocation/nstream_isid.ma b/matita/matita/contribs/lambdadelta/ground_2/relocation/nstream_isid.ma index 4f3e415eb..98dc8f220 100644 --- a/matita/matita/contribs/lambdadelta/ground_2/relocation/nstream_isid.ma +++ b/matita/matita/contribs/lambdadelta/ground_2/relocation/nstream_isid.ma @@ -19,7 +19,7 @@ include "ground_2/relocation/rtmap_isid.ma". (* Specific inversion lemmas ************************************************) -lemma isid_inv_seq: ∀f,n. 𝐈⦃n⨮f⦄ → 𝐈⦃f⦄ ∧ 0 = n. +lemma isid_inv_seq: ∀f,n. 𝐈❪n⨮f❫ → 𝐈❪f❫ ∧ 0 = n. #f #n #H elim (isid_inv_gen … H) -H #g #Hg #H elim (push_inv_seq_dx … H) -H /2 width=1 by conj/ qed-.