X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fdelayed_updating%2Freduction%2Fifr_unwind.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fdelayed_updating%2Freduction%2Fifr_unwind.ma;h=f05d86db3078678331cd649e9abe405996c383b1;hb=4ac2becfaa45abb18acb2bdf3db5d2587cadb6d4;hp=21e4ac27fac27dea7ae8c91a9ed629b509f3d66a;hpb=f5b6fd3125c0aefa1db23fbdd23b887fa964f385;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/delayed_updating/reduction/ifr_unwind.ma b/matita/matita/contribs/lambdadelta/delayed_updating/reduction/ifr_unwind.ma
index 21e4ac27f..f05d86db3 100644
--- a/matita/matita/contribs/lambdadelta/delayed_updating/reduction/ifr_unwind.ma
+++ b/matita/matita/contribs/lambdadelta/delayed_updating/reduction/ifr_unwind.ma
@@ -34,7 +34,7 @@ include "delayed_updating/syntax/path_depth_reverse.ma".
 
 lemma ifr_unwind_bi (f) (p) (q) (t1) (t2):
       t1 ϵ 𝐓 → t1⋔(p◖𝗦) ⧸≬ 𝐈 →
-      t1 ➡𝐟[p,q] t2 → ▼[f]t1 ➡𝐟[⊗p,⊗q] ▼[f]t2.
+      t1 ➡𝐢𝐟[p,q] t2 → ▼[f]t1 ➡𝐢𝐟[⊗p,⊗q] ▼[f]t2.
 #f #p #q #t1 #t2 #H1t1 #H2t1
 * #n * #H1n #Ht1 #Ht2
 @(ex_intro … (↑♭q)) @and3_intro