X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fsubstitution%2Fllpx_sn_lpx_sn.ma;h=6a0a210ca523b23b41f207c87c8f158c5db4708d;hb=dffdece065d12d9961a6c3f1222f6d112030336f;hp=21a88ca0e21564894c6432764d1cca72e77b072f;hpb=87fbbf33fcc2ed91cc8b8a08e1c378ef49ac723d;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/substitution/llpx_sn_lpx_sn.ma b/matita/matita/contribs/lambdadelta/basic_2/substitution/llpx_sn_lpx_sn.ma index 21a88ca0e..6a0a210ca 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/substitution/llpx_sn_lpx_sn.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/substitution/llpx_sn_lpx_sn.ma @@ -19,7 +19,7 @@ include "basic_2/substitution/llpx_sn.ma". (* Properties on pointwise extensions ***************************************) -lemma lpx_sn_llpx_sn: ∀R. (∀I,L. reflexive … (R I L)) → +lemma lpx_sn_llpx_sn: ∀R. (∀L. reflexive … (R L)) → ∀T,L1,L2,d. lpx_sn R L1 L2 → llpx_sn R d T L1 L2. #R #HR #T #L1 @(f2_ind … rfw … L1 T) -L1 -T #n #IH #L1 * *