X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Freduction%2Flpx.ma;h=b10b13a28999b03cdba2ca9f8f805f4e8d62b672;hb=dffdece065d12d9961a6c3f1222f6d112030336f;hp=2482329c7d041b4a2d58fbd8f1e09365708b4199;hpb=87fbbf33fcc2ed91cc8b8a08e1c378ef49ac723d;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/reduction/lpx.ma b/matita/matita/contribs/lambdadelta/basic_2/reduction/lpx.ma
index 2482329c7..b10b13a28 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/reduction/lpx.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/reduction/lpx.ma
@@ -19,7 +19,7 @@ include "basic_2/reduction/cpx.ma".
 (* SN EXTENDED PARALLEL REDUCTION FOR LOCAL ENVIRONMENTS ********************)
 
 definition lpx: ∀h. sd h → relation3 genv lenv lenv ≝
-                λh,g,G. lpx_sn (λ_.cpx h g G).
+                λh,g,G. lpx_sn (cpx h g G).
 
 interpretation "extended parallel reduction (local environment, sn variant)"
    'PRedSn h g G L1 L2 = (lpx h g G L1 L2).