]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/delayed_updating/reduction/ifr_unwind.ma
update in delayed_updating
[helm.git] / matita / matita / contribs / lambdadelta / delayed_updating / reduction / ifr_unwind.ma
index 9bd4cd7c47f21e086d9798e24966f0b02c3c6cbf..21e4ac27fac27dea7ae8c91a9ed629b509f3d66a 100644 (file)
@@ -32,9 +32,9 @@ include "delayed_updating/syntax/path_depth_reverse.ma".
 
 (* Constructions with unwind ************************************************)
 
-theorem ifr_unwind_bi (f) (p) (q) (t1) (t2):
-        t1 Ο΅ π“ β†’ t1β‹”(p◖𝗦) β§Έβ‰¬ πˆ β†’
-        t1 βž‘𝐟[p,q] t2 β†’ β–Ό[f]t1 βž‘𝐟[βŠ—p,βŠ—q] β–Ό[f]t2.
+lemma ifr_unwind_bi (f) (p) (q) (t1) (t2):
+      t1 Ο΅ π“ β†’ t1β‹”(p◖𝗦) β§Έβ‰¬ πˆ β†’
+      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