X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fstatic%2Flsuba_lsubr.ma;h=dc36ae778feb0f1aa4e8c09228bef2f3e0b44747;hp=3655ce1127730488ee2969cf60ded48bc3bcca3e;hb=222044da28742b24584549ba86b1805a87def070;hpb=3ef251397627da80aeea0cf08b053a4bc781ef88 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-.