X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_transition%2Flfpr.ma;h=8781d1fdf381bb0b1269cbaa019b0ae90da2e6d7;hb=f129bbbfda0e65a5f92ec086246f6e288376d4f9;hp=072675fba2805f0c45f796db4d02ac611009e58a;hpb=54c4e854515cbcb1376881e9aedad006bf6545f2;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lfpr.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lfpr.ma
index 072675fba..8781d1fdf 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lfpr.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_transition/lfpr.ma
@@ -19,7 +19,7 @@ include "basic_2/rt_transition/cpr_ext.ma".
 (* PARALLEL R-TRANSITION FOR LOCAL ENV.S ON REFERRED ENTRIES ****************)
 
 definition lfpr: sh → genv → relation3 term lenv lenv ≝
-                 λh,G. lfxs (cpm 0 h G).
+                 λh,G. lfxs (λL. cpm h G L 0).
 
 interpretation
    "parallel r-transition on referred entries (local environment)"