Thanks to Guarrigue, code for Serializer functor simplified using

[helm.git] / matita / matita / contribs / lambda_delta / basic_2 / reducibility / lcpr.ma

diff --git a/matita/matita/contribs/lambda_delta/basic_2/reducibility/lcpr.ma b/matita/matita/contribs/lambda_delta/basic_2/reducibility/lcpr.ma
index 51028c2409132e32aa0ceac0a40ab1706dbfbd4c..6f0527b332940193e48bbb8a556a2a2895d1dd04 100644 (file)
--- a/matita/matita/contribs/lambda_delta/basic_2/reducibility/lcpr.ma
+++ b/matita/matita/contribs/lambda_delta/basic_2/reducibility/lcpr.ma
@@ -18,7 +18,7 @@ include "basic_2/reducibility/ltpr.ma".
 (* CONTEXT-SENSITIVE PARALLEL REDUCTION ON LOCAL ENVIRONMENTS *************)
 
 definition lcpr: relation lenv ≝
-   λL1,L2. ∃∃L. L1 ➡ L & L [0, |L|] ▶* L2
+   λL1,L2. ∃∃L. L1 ➡ L & L ▶* [0, |L|] L2
 .
 
 interpretation