]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/delayed_updating/unwind/unwind2_rmap_unprotected.ma
update in delayed_updating
[helm.git] / matita / matita / contribs / lambdadelta / delayed_updating / unwind / unwind2_rmap_unprotected.ma
index b8cb1d2cf7cb176180bf3e5d16b24a6801097b86..df93a6709fa1e6f4a058d58306a4248bce6e94b4 100644 (file)
@@ -20,24 +20,24 @@ include "delayed_updating/syntax/path_structure.ma".
 
 (* Example of unprotected balanced path *************************************)
 
-definition b: path â‰ đžâ—–đ—”â—–đ—Ÿâ—–đ—ąđŸ.
+definition l3_b: path â‰ đžâ—–đ—”â—–đ—Ÿâ—–đ—ąđŸ.
 
-lemma b_unfold: đžâ—–đ—”â—–đ—Ÿâ—–đ—ąđŸ = b.
+lemma l3_b_unfold: đžâ—–đ—”â—–đ—Ÿâ—–đ—ąđŸ = l3_b.
 // qed.
 
-lemma b_balanced: âŠ—b Īĩ đ.
-<b_unfold <structure_d_dx
+lemma l3_b_balanced: âŠ—l3_b Īĩ đ.
+<l3_b_unfold <structure_d_dx
 /2 width=1 by pbc_empty, pbc_redex/
 qed.
 
-lemma b_closed: b Īĩ đ‚❨â’ģ,𝟎❩.
+lemma l3_b_closed: l3_b Īĩ đ‚❨â’ģ,𝟎❩.
 /4 width=1 by pcc_A_sn, pcc_empty, pcc_false_d_dx, pcc_L_dx/
 qed.
 
-lemma b_unwind2_rmap_unfold (f):
-      (âĢ¯f)∘𝐮❨𝟏❩ = â–ļ[f]b.
+lemma l3_b_unwind2_rmap_unfold (f):
+      (âĢ¯f)∘𝐮❨𝟏❩ = â–ļ[f]l3_b.
 // qed.
 
-lemma b_unwind2_rmap_pap_unit (f):
-      â†‘(fīŧ â§Ŗ❨𝟏❩) = â–ļ[f]bīŧ â§Ŗ❨𝟏❩.
+lemma l3_b_unwind2_rmap_pap_unit (f):
+      â†‘(fīŧ â§Ŗ❨𝟏❩) = â–ļ[f]l3_bīŧ â§Ŗ❨𝟏❩.
 // qed.