X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Fcpue.ma;h=a22002aede2a9afdbe569255c6d924490b2f1542;hp=95c2b56ff01e6e80553e4ed08c60bd445156c651;hb=f308429a0fde273605a2330efc63268b4ac36c99;hpb=87f57ddc367303c33e19c83cd8989cd561f3185b

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpue.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpue.ma
index 95c2b56ff..a22002aed 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpue.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/cpue.ma
@@ -19,7 +19,7 @@ include "basic_2/rt_computation/cpms.ma".
 (* EVALUATION FOR T-UNBOUND RT-TRANSITION ON TERMS **************************)
 
 definition cpue (h) (G) (L): relation2 term term ≝
-           λT1,T2. ∃∃n. ⦃G, L⦄ ⊢ T1 ➡*[n,h] T2 & ⦃G, L⦄ ⊢ ⥲[h] 𝐍⦃T2⦄.
+           λT1,T2. ∃∃n. ⦃G,L⦄ ⊢ T1 ➡*[n,h] T2 & ⦃G,L⦄ ⊢ ⥲[h] 𝐍⦃T2⦄.
 
 interpretation "evaluation for t-unbound context-sensitive parallel rt-transition (term)"
    'PRedITEval h G L T1 T2 = (cpue h G L T1 T2).