]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/rt_computation/cprs_ext.ma
update in basic_2 and apps_2
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_computation / cprs_ext.ma
index e69b27a31f70c6f746c36825e17b788ad3ea0929..8ae117db23c093c8074d7b4a31feeb5c859ed051 100644 (file)
@@ -17,9 +17,9 @@ include "basic_2/rt_computation/cpms.ma".
 
 (* CONTEXT-SENSITIVE PARALLEL R-COMPUTATION FOR BINDERS *********************)
 
-definition cprs_ext (h) (G): relation3 lenv bind bind ≝
-                             cext2 (λL. cpms h G L 0).
+definition cprs_ext (h) (n) (G): relation3 lenv bind bind ≝
+           cext2 (λL. cpms h G L n).
 
 interpretation
    "context-sensitive parallel r-computation (binder)"
-   'PRedStar h G L I1 I2 = (cprs_ext h G L I1 I2).
+   'PRedStar h n G L I1 I2 = (cprs_ext h n G L I1 I2).