X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fstatic%2Flsuba_lsubr.ma;h=dc36ae778feb0f1aa4e8c09228bef2f3e0b44747;hb=98fbba1b68d457807c73ebf70eb2a48696381da4;hp=3655ce1127730488ee2969cf60ded48bc3bcca3e;hpb=65e6209e0758832835ba8d14304a1548d059a634;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/static/lsuba_lsubr.ma b/matita/matita/contribs/lambdadelta/basic_2/static/lsuba_lsubr.ma index 3655ce112..dc36ae778 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/static/lsuba_lsubr.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/static/lsuba_lsubr.ma @@ -20,5 +20,5 @@ include "basic_2/static/lsuba.ma". (* Forward lemmas with restricted refinement for local environments *********) lemma lsuba_fwd_lsubr: ∀G,L1,L2. G ⊢ L1 ⫃⁝ L2 → L1 ⫃ L2. -#G #L1 #L2 #H elim H -L1 -L2 /2 width=1 by lsubr_pair, lsubr_beta/ +#G #L1 #L2 #H elim H -L1 -L2 /2 width=1 by lsubr_bind, lsubr_beta/ qed-.