X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Frelocation%2Fgr_isd_tl.ma;h=43e865131e56014b269b18177aae0020a0e7cad7;hb=dc605ae41c39773f55381f241b1ed3db4acf5edd;hp=05a3505e162a1268ca7a294e2282f7840514db24;hpb=2ed8d2abcc3b0687141b627061b63350a0b200bd;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tl.ma b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tl.ma index 05a3505e1..43e865131 100644 --- a/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tl.ma +++ b/matita/matita/contribs/lambdadelta/ground/relocation/gr_isd_tl.ma @@ -20,7 +20,7 @@ include "ground/relocation/gr_isd.ma". (* Constructions with gr_tl *************************************************) (*** isdiv_tl *) -lemma gr_isd_tl (f): 𝛀❪f❫ → 𝛀❪⫱f❫. +lemma gr_isd_tl (f): 𝛀❪f❫ → 𝛀❪⫰f❫. #f cases (gr_map_split_tl f) * #H [ elim (gr_isd_inv_push … H) -H // | /2 width=3 by gr_isd_inv_next/